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富士 通 FM- 8 を 入手 し て 半年 に な り ま す . マシ ン 語 
プロ グラ ム 作 制 の ネッ ク で あっ た BIOS に つい て も , この 
間 に 諸 先輩 方 の 解明 が 進み , 自在 に サ プ シ ステ ム を 利用 で 
きる 状況 に な っ て きま し た . こう な る と , マシ ン 語 を 走ら 
せる と き に も BASIC ROM を つない で お か ね ば な ら な いと 
いう の は 場所 塞ぎ で あり , 第 一 眠っ て いる 裏 RAM が 可 哀 
想 な の で あり ます . 

本 モニ タ は , 一 且 BASIC か ら ス ター ト さ せれ ば DIP スイ 
ッ チ で ROM を 切り 離し て し まう こと が 可能 で , この 状態 
で メモ リ の ダン プ , 変更 , プリ ンタ 制御 。 カセ ッ ト 入 出力 
お よび プラ ンチ を 行ない ます . 











す が , 完全 に 
位置 自由 で す . BASIC か ら ロ ー ド し , EXEC&H7000 と 
する と タイ トル と “PRINTER OFF" を 表示 し て カー ソル 
を 出し , コマ ンド 待ち に な り ま す . ROM を 離す と き は , 


本 体 後面 の DIP ス イッ チ 9 番 また は 10 番 を OFF に し て くだ 
さい . SP は $7FFFE に セッ ト さ れ ま す が , M コ マン ド で $ 
7043 一 44 を 書き か える と 変更 で きま す . $FC00 一 $FC4F 














入力 は 原則 と し て [RET| キ ー に よる 確認 を 行なわ ず , 必 
要 桁 数 が 入力 され る と 決 へ 進み ます . 数 字 入力 は すべ て テ 
ン ・ キ ー 周 辺 が 16 進 キー に な り ( 図 1), [BS] キ ー が 使え ま 
す 








どの 時 点 で も [STOPI キ ー で コマ ンド に 戻り ます . 
WW コマ ンド : 画面 桁 数 を 40< ご 80 に 変更 . 
D コ マン ド : メ モリ ・ ダ ンプ . 開始 番地 と 終了 番地 を 入 
力 す る と リス ト を 出し 始め , [STOP] キー で 終了 , [ESC] キ 
ー で 一 時 停止 (た だ し [ESCI| が か か っ て いる 間 は [STOP | 
が 働か な い ). 
DD 一 一 16 メ 16 バ イト ・ チ ェ ッ ク ・ サ ム 付 き 16 進 ダン プ 
と ASCI ダ ンプ を 並べ て 出力 . 
DS 一 一 8X 8 バイ ト ・ チ ェ ッ ク ・ サ ム 付 き 16 進 ダン プ : 
DA 一 一 ASCT ダ ンプ 
を M コ マン ド : メモ リ 変 更 . 開始 番地 を 入力 する と 番地 















































$7020, $7046 に CS ウー ンク (sj バー シン 
$7043 一 44 7FFF SP の 値 
$70ED EE ビ 7FFF BASIC 復帰 時 の SP 
表 2 主 な サブ ルーチン 
アド レス | 内 容 
$71DB CRT 1 字 出 力 
$71EE プリ ンタ 1 宇 出 力 
以下 は $FCOE の ビッ ト 7 が 1 の と き CRT と プリ ンタ , 
0 の と き CRT のみ に 出 力 
$71CF 1 字 出 力 (AccA) 
$7176 改行 
$ 7249 AccA を 16 進 表示 
$ 7259 X reg を 16 進 表示 
$7321 X reg の 番地 か ら Acc 日 個 を キャ ラク タ と し て 表示 ( 制 
御 コ ー ド は ピリ オド ) 
$733B X reg の 番地 か ら 0 が ある まで キャ ラク タ と し て 表示 
(制御 コー ド 有 効 ) 
も 71AC キー ボー ド 1 字 入 力 (AccA) 
$71A2 キー 入力 を 待っ て AccA に 取る 
$718A 1 字 キ ー 入 力士 1 宇 出力 
$7229 AccA の 1 バイ ト 数 一 ASCII コ ー ド (D) 
$ 7265 AccA の ASCII コー ドー 数 値 (B) “ 
$7273 16 進 1 桁 の キー 入力 を 数 値 に し て AccB に 入れ る 
$72C5 16 進 2 析 の キー 入力 を AccD に 入れ る 
名 72C9 16 進 4 桁 の キー 入力 を AccD に 入れ る 
$7205 サ プ シ ステ ム HALT, FIRQ マ スク 
$721E | サ プ シ ステ ム RESTART, FIRQ マス ク を 元 に 戻す 
$79E0 1 行 入 力 .K コ ン バ パイ ラ 用 に お まけ 
メモ リ 内 容 , キャ ラク タ を 表示 し , 変更 を 可能 に する . 
[STOP| キ ー で 終了 . 


MN 一 一 16 進 数 入力 . スペース 
MO Pe シンジ 入力: 
F コ マン ド : メ モリ を 同一 デー タ で クリ ア . 


2 ペー ぺこ で 072<Z4 
キー で スキップ 
開始 番地 , 











RET 

















最終 番地 , 16 進 デー タ を 入力 . 
コマ ンド FE,。YV, G, C, B は デー タ 入 力 後 "ok? (Y)" 
と 確認 し て くる の で , [Y] を 入力 . 他 の キー で は コマ ンド に 
戻る . 
を V コ マン ド : メ モリ ・ ブ ロッ ク 移 動 . 先頭 番地 , 最終 番 
地 , 目的 地 の 先頭 番地 の 順に 入力 . 元 の 位置 と 重なり 合う 
領域 へ の 移動 も OK. 
yG コ マン ド : プ ブランチ. 実行 開始 番地 を 入力 する と FIER 
Q を 許可 し て 分 岐 する . 実行 中 [STOP| キー で コマ ンド に 戻 
る . プロ グラ ム の 終わ り は RTS($ 39)、SWI( $ 3F).SWI3 
($113F) の いずれ で も コマ ンド に 戻る . SWI ま た は [ST_ 
OP| キー で 戻っ た 場合 , レジ スタ が CC 一 PC の 順 で ワー ク 
・ ペ ー ジ 先頭 ($FC00 一 $FC0B) に 格納 され る . 
CC コマ ンド : ワー ク ・ ペ ー ジ 先頭 の 内 容 を レジ スタ に 入 
れ て , PC の 値 ($FC0A 一 0B) へ 分 岐 . 他 は G コ マン ド と 
同じ . 
を R コ マン ド : レジ スタ を 格納 し た $FC00 一 0B の 値 を 変 
更 . スペ ー ス ・ パ ペー で スキ ッ プ . 
P コ マン ド : プ リン タ の レデ ィ ・ チ ェ ッ ク を し て , プリ 
ンタ ・ フ ラグ を ON/OFF. 
し L コ マン ド 
LD 一 カセ ッ ト テ ー プ の マシ ン 語 デー タ を ロー ド . ファ 
イル 名 と ロー ド 開 始 番地 を 入力 し て くだ さい . 8 文字 また 
は [RET| が 入力 され る まで の 廊 字 列 が ファ イル 名 に な る . 
L?ーー テ ー プ 上 の サム を チェ ッ ク . ファ イル 名 の み 入 
力 . 
SS コマ ンド : カ セッ ト テ ー プ へ の セー プ ブ . ファ イル 名 。, 
先頭 番地 , 最終 番地 , 実行 開始 番地 を 入力 する と ,F-BAS 
IC と 共通 に 使え を る テー プ を 作る . 
HH コ マン ド : コマ ンド の リス ト を 表示 . 
コマ ンド : シス テム ・ ベ クト ル を 直し , SP を $7FFF 
に セッ ト し て BASIC の モニ タ ヘ ジャンプ. 当然 な が ら RO 
M が 離れ て いる と き に 実行 する と 制御 不能 に な る . 


る ー は nec mk RE 




















9999 j』 FHB INDEPENDENT HONITOR 
9999 H Version 1.9 
9999 j Eoded by 0. NOJIRI 
9999 H 

9999 PABE: EQU WFC 
9999 MMi EQU $99 
9999 SKFs EBU $9D 
9999 PRFs EQU $9E 
9999 MID: EQU $9F 
9999 ASTi EQU $9D 
9999 ESTg EDU $E 
7909 DR6 $7999 
7999 2999 BRA RESET 
7992 1699EF LBRA FIRO 
7995 169113 LBRA REBST 
7998 169936 LBRA RESET9 
799B 1FS9 RESET: TFR PC.D 
799D 8999B SUBD #i1 
7919 FDFFF6 STD *FFF6 
7913 C39093 ADDD # き 3 
7916 FDFFFA STD  *FFFA 
7919 C39993 ADDD # き 3 
791C FDFFF2 STD $FFF2 
791F _B6FC LDA # き PAGE 
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ROM を 離す と RESET, STOP 二 RESET が 使え な い の 
で , スト ッ プ ・ キ ー を 押す と いつ で も コマ ンド に 戻る よう 
に し て あり ます . 各 コ マン ド は $704Fー70AF の ルー プ か 
ら 単 純 に ジャ ンプ し , SWI3 で 終了 し て いま す . SWI2 は 
未 使 用 で , SWI お よび スト ッ プ ・ キ ー の FIRQ で は レジ ス 
タ を 格納 し て コマ ンド に 戻り ます . その 他 の FIRQ は $70 
FE か ら $79FD に 飛び ます . RTI($3B) に な っ て いる の 
で 変更 し て 活用 し て くだ さい . ユー ザー プロ グラ ム で サ プ 
シス テム が HALT さ れ て いる と き に THIRQ が か か る と 制御 ~ 
不能 に な る の で , HALT RESTART は モニ タ 内 ルー チン 
を 使う 方 が 良い で し ょ う . 








PS PS PS ーー そこ で そ そっ そっ そっ そこ そっ そっ 


何 か プ ログ ラム を $8000 以 降 に 転送 し て お き , ROM を 
つない で RESET. モニ タ を 入れ 直し て 裏 R AM を 見 る と , 
プロ グラ ム は ちゃ ん と 残っ て いる の で す . 

FM-7 で も ROM/RAM の 切り 換え は ディ ッ プ ・ ス イッ チ 
で よい わけ で す が , ソフ ト で も 切り 換え が で きま す . この 
切り 換え の ルー チン を 作り , $70A8 以 降 の 余白 か ら 飛 ば す 
と 便利 で す . な お , この 最後 は SWI3 ($11, $3F) と し 
て くだ さい . 

カセ モット 入出 力 に つい て は , 高速 モー ド で 使う 場合 、 ポ 
ー レ ー ト も 高く な っ て し まい ます (個人 で 使っ て いる 場合 
は この 方 が いい か も ?). そこ で , TIMER ル ー チ ン を 呼ぶ 
と き の 値 ($7755、 $77A6, $ 77B1. $77D3, $ 7803. 
$ 780A,、 $7811. $ 7818, $7826, $782D, $ 7834, $ 78 
3B, $7850、 $7857。 $7864 の 各 2 バ イト ) を 変え て くだ 
さい . 

また , 94 行 め の LDD #$CC57 を LDD #$C953 に , 10 
8 行 め の JMP $AFA2 を JMP $ABF4 に 変更 する と コマ 
ンド が 動作 し ます . 

DISK で 使う 場合 、 シ ステ ム ・ ス タッ ク の 設定 値 ($70 
43, 44 と $70EE, EF) を た と えば $6FFF に 変更 すれ ば 
OK で す . 

この プロ グラ ム と 本 誌 の 『 エ ディ タ ・ ア セン プラ 』 を リ 
ンク し て 使う と 便利 で す . ぜひ 一 度 試 し て みて くだ さい . 


参考 文献 

1) FM-8 活 用 研究 の 各 記 事 
2) F- BASIC 文 法 書 

6) 6809 ハ ンド プ ブック 


独立 モニ タ アセ ンプ ブル ・ リス ト 昌和 





7921 IFBB TFR ADP 
9926 7923 FE CLR <PRF 









9927 7925 8628 LDA #49 

9928 7927 979F STA <MID 

9929 7929 17919B LBSR CONS 

9939 792C Ce699 LDB #9 j Title 

9931 792E 1795AB LBSR DPCX 

9932 7031 Ce25 RESET1:LDB # き $25 j LF+'PRINTER 
9933 く 7933 1795A6 LBSR DPCX 

9934 7036 C633 LDB  #$3 く 5 "OFF" 

9935 7938 969E LDA <〈PRF 

9936 793 2792 BED RST1 

9937 793E C639 LDB #%39 ONI 

9938 703E 17059B RST1: LBSR DPCX 

9939 7941 19CE7FFF RESET9:LDS  #$7FFF 

9949 7945 86FCE LDRA WPABE 

9941 7947 1FBB TFR A。DP 

9942 7949 969E LDA <PRF 

9943 794B 847F ANDA #$7F j Printer STOF 
9944 7940 979E STA <PRF 

9945 794F 179124 CMD9: LBSR LIN 





9946 7952 863E LDA  #$3E 
9947 7954 179178 LBSR PRINT 
9948 7957 179148 LBSR_INKEY 





1O 


独立 モニ タ アセ ンプ ブル ・ リ スト 





9959 
951 
9952 
9953 
9954 
9955 
9956 
9957 
9958 
9999 
9969 
9961 
62 
9963 
964 
9965 
9966 
9967 
068 
9969 
9979 
971 
972 
073 
9974 
975 
9976 
9977 
078 
9979 
9989 
9081 
9982 
9083 
084 
9985 
9086 
687 
9088 
6089 
6099 
9091 

0092 
9093 
0094 
095 
9096 
9997 
9998 
9099 
9199 
9191 

102 
103 
9104 
195 
9196 
197 
198 
9199 
9119 
111 

112 
113 
114 
115 
9116 
117 

9118 
9119 

129 
9121 

9122 
123 
9124 
9125 
126 
E127 
9128 
129 
9159 
131 

132 
133 

9134 
9135 
9136 
137 
9138 
9139 
9149 
9141 

9142 
9143 
144 
9145 
9146 
9147 
9148 
9149 
159 
151 

9152 





7958 1CBF 
795C 8142 
79SE 275F 
7969 B144 
7962 192792E2 
7966 8157 
7968 192799F4 
796E 814D 
796E 19279431 
7972 8146 
7974 192794D2 
7978 8147 
797A 19279489 
797E 8156 
7989 192794EC 
7984 B159 
7986 1927952B 
798A B14C 
798C 1927986F 
7999 B153 
7992 192795FC 
7996 B148 
7998 19279539 
799C 8143 
799E 1927948B 
79A2 8152 
794 19279461 
79AB 12 

7989 12 

79AA 12 

79B 12 

79AC 12 

79AD 12 

79AE 209F 
79B9 C637 
79B2 
7985 
79B8 8159 
79BA 
79BC 
79BE 39 
79BF 
79C2 BDEC 
79C4 
79C6 B79IE9 
79C9 CCCC57 
79CE FD91IE1 
79CF 
79D1 
79D4 
79D7 CC91E9 
79DA FDFFF6 
79DD CC9107 
79E9 FDFFFA 
79E ミ 
79E6 FDFFF2 
79E9 4F 

79EA 1F8B 
79EC 19CE7FFF 
79F9 7EAFA2 
79F3 12 

79F4 979D 
79F6 B692 
79FB BSFD04 
70FB 192698FC 
79FF B692 
7191 BAFD94 
7194 B7FD94 
7197 BeC9 
7199 B7FD99 
719C ?592 
719E 970C 
7119 960D 
7112 347E 
7114 969C 
7116 3492 
7118 179991 
711B 1FBB 
711D Ce699 
711F 1F91 
7121 Ce9E 
7123 3502 
7125 A789 
7127 SA 

7128 26F9 
7126 16FF14 
712D 

7120 3403 
712F 969E 
7131 48 

7132 47 

7133 979E 
7135 3583 
7137 

7137 1799CB 
713A BEFCB2 
713D CC9199 
7149 ED81 
7142 969F 
7144 C619 
7146 ED81 
7148 CC9919 
714B ED81 
714D CC9991 





ANDC 
CNPA 
BEO 
CNPA 
LBEQ 
EHPa 
LBEQ 
ChPA 
LBEQ 
EhFa 
LBEO 
CMPA 
LBEO 
ChPA 
LBEQ 
ChPA 
LBEQ 
CNPA 
LBEG 
EhPA 
LBEQ 
ChFA 
LBEQ 
CMFA 
LBEQ 
CHFA 
LBEO 
NOP 
NOP 
NOP 
NOP 
NOP 
NOP 
BRA 
DKCHCKiLDB 
LBSR 
LBSR 
EMFA 
BEQ 
FDB 
RTS 
LBSR 
BSR 
LDA 
STA 
LDD 
STD 
LDA 
STA 
STA 
LDD 
STD 
LDD 
STD 
LDD 
STD 
CLRA 
TFR 
LDS 
JMF 
NOP 
STA 
LDA 
BITA 
LBNE 
LDA 
DRA 
STA 
LDA 
STA 
PULS 
STA 
LDA 
PSHS 
LDA 
FSHS 
LBSR 
TFR 
LDB 
TFR 
LDB 
PULS 
STA 
DECB 
BNE 
LBRA 
』 TEMPORARY 
LPTON: PSHS 
LDA 
ASLA 
人 SRA 
STA 
PULS 
j CONSODLE & 
CONS: LBSR 
LDX 
LDD 
STD 
LDA 
LDB 
STp 
LDD 
sTp 
LDD 


OKC1i 
EXITi 


FIRGOz 


RE6ST: 


FIRQ2: 








#$42 
EXIT 
き $44 
DANP 
#$57 
MIDTH 
# き $4D 
ME 
#$46 
FILL 
き $47 
JUNF 
#$56 
MOVE 
#$59 
LPT 
き $4 じ 
LOAD 
#$5 く 
SAVE 
# き $48 
HELP 
#$4 さ 
CALL 
# き $52 
REB 


CND9 
37 
DPCX 
INPUT 
# き $59 
OKC1 
$113F 


FRINT 
OKCHCK 
#67E 
$01E9 
# き CC57 
$61E1 
#$3B 
$81D1 
$91D7 
#$91E9 
*FFF6 
#$91D7 
$FFFA 
# き 9101 
$FFF2 


ADP 
57FFF 
*AFA2 


<AST 
W2 
*FD94 
TIMIR 
2 
*FD94 
*FD94 
WEB 
*sFD99 
A 
<CsT 
<AST 
U.Y,X。DP,B,A 
<CST 
| 

KEY 
DP,A 
WW 
D,X 
12 

^ 

人 


FIRG2 
RESET9 
LPT FLAG 
ACE 

く PRF 


く PRF 
ACE,PE 
MIDTH 
HLT 

# き 9FEB2 
#$9199 
2+ キ 
<WID 

# き 919 
キキ 
#$9919 
1 キキ 

き $9991 


日 





FIRG unmask 


Motor off 

CE in A 

CC in memory 
A_ back 


CE in A 











9153 
9154 
915S 
9156 
9157 
9158 
9159 
9169 
9161 
9182 
9163 
9164 
9165 
9166 
9167 
9168 
9169 
9179 
9171 
9172 
9173 
9174 
9175 
9176 
9177 
9178 
9179 
9189 
91B1 
9182 
9183 
9184 
9185 
9186 
9187 
9188 
9189 
9199 
9191 
9192 
9193 
9194 
9195 
9196 
9197 
9198 
9199 
9299 
9291 
9292 
9293 
9294 
9205 
9206 
9297 
9298 
9209 
9219 
9211 
9212 
921 ミ 
9214 
9215 
9216 
9217 
9218 
9219 
9229 
9221 
9222 
9223 
9224 
9225 
9226 
9227 
9228 
9229 
9239 
9231 
9232 
9233 
9234 
9235 
9236 
9237 
9238 
9239 
9249 
9241 
9242 
924 く 
9244 
9245 
9246 
9247 
9248 
9249 
9259 

251 
9252 
9253 
9254 
9255 
9256 


7159 
7152 
7154 
7156 
7159 
715C 
715F 
7162 
7165 
7166 
7166 
7168 
7164 
71eC 
716E 
7179 
7172 
7174 
7176 
7176 
7178 
717A 
717C 
717E 
7189 
7182 
7182 
7184 
7186 
7188 
718A 
7184 
718C 
718E 
7199 
7192 
7194 
7196 
7198 
719A 
719 ヒ 
719E 
7189 
71A2 
71A2 
7184 
7186 
71A8 
71AA 
71AC 
71AC 
71AE 
71B9 
71B3 
71B6 
71B8 
71BA 
71BC 
71BF 
71C2 
71C5 
71C7 
71C9 
71C9 
71CB 
71CC 
71CE 
71CF 
71CF 
71D1 
7103 
7105 
7107 
7109 
71DB 
71DD 
71DF 
71ES 
71E6 
71E8 
71EA 
71EC 
71EE 
71F9 
71F3 
71F4 
71F6 
71F9 
71FB 
71FE 
7299 
729 さ 
7295 
7295 
7297 
7299 
729B 
729E 
7219 
7212 
7214 
7217 
7218 
721C 


EDB1 
C699 
E784 
1799CS 
179989 
EC9E13 
FDFCB82 
179989 
39 


969F 
Ce59 
B128 
2792 
Ce28 
D79F 
8DC3 
113F 


3493 
8694 
B8DS3 
869D 
8D4F 
3583 


さ 493 
8629 
8D47 
3583 


3491 
9F9D 
8D12 
819D 
2798 
8129 
2592 
8D3S 
3581 
CeFF 
079D 
29FB 


さ 491 
8D96 
8199 
27FA 
3581 


3495 
80SS 
CC2999 
FDFC82 
8D66 
BD4B 
C689 
BeFC83 
FAFCB9 
F7FC89 
8057 
3585 


8094 
5A 
26FB 
39 


8D8A 
3495 
D69E 
2A02 
8D15 
3585 
3431 
8D26 
198EFC82 
BE9391 
AFA1 
A7A4 
8D32 

さ 5B1 
3495 
FeFD92 
54 
2SFA 
B7FD91 
Ce99 
F7FD99 
CA49 
F7FD99 
3585 


3492 
1FA8 
979E 
BeFD95 
2BFB 
1849 
689 
B7FD95 
BeFD95 
2AFB 
3582 


STD ,X++ 
LDB WO 
STB ,X 
LBSR RESTRT 
LBSR HLT 
LDD #%9C15 
STD *FC82 
LBSR RESTRT 
RTS 
j HIDTH CHANBE 
MIDTH: LDA <MID 
LDB #B9 
CMPA #49 
BE MID9 
LDB #49 
STB <WID 
BSR CONS 
FDB *113F 
FEED 
FSHS ACE 
LDA WW%A 
BSR PRINT 
LDA WSD 
BSR PRINT 
PULS AiCC,PE 
j PRINT A SPACE 
SPC: PSHS AiEC 
LDA 2 
BSR PRINT 
PULS AiCCiPC 


MID9i 


j LINE 
LINi 


SMIS 


ij TAKE KEY IN A REB AND DISPLAY 


INPUT: PSHS CC 
ELR <SKF 
INPUT9:BSR INKEY 
CHPA #%D 
BE INPUT1 
CHPA #$29 
BCS INPUT2 
BSR PRINT 
INPUT2:PULS CC,PC 
INPUT1iLDB #$FF 
STB <SKF 
BRA INPUT2 
j MAIT KEY & TAKE IN 2 RE6 
INKEY: PSHS CC 
INKEY9:BSR KEY 
CHPA #9 
BE INKEY9 
PULS CC,PC 
j KEY CODE INTO 8 REGB 
KEY: PSHS BiCC 
BSR HLT 
LDD #%2999 
STD $FC82 
BSR RESTRT 
BSR HLT 
LDB #$%89 
LDA *FC8S 
ORB $FC89 
STB $FC89 
BSR RESTRT 
PULS B,CC,PC 
j DISP B CHRS IN A 
STRINB:BSR PRINT 
DECB 
BNE STRING 
RTS 
j DISP ASCII IN A REG 
PRINT: BSR TPRINT 
FPSHS BCC 
LDB <PRF 
BPL PRINT9 
BSR LPRINT 
PRINT9:FULS B,CEC,PC 
TPRINTiPSHS X,Y,」CE 
BSR HLT 
LDY FCB2 
LDX #$9391 
STX  」Y++ 
STA ijY 
BSR RESTRT 
PULS Y,X,CC,PC 
LPRINT:PSHS BiCE 
LP1i LDB *$FD92 
LSRB 
BCS LP1 
STA  $FDg1 
LDB #9 
STB $FD99 
DRB #$49 
STB $FD99 
FULS B,CC,PC 
j SUB SYSTEM HALT 
HLTs PSHS 8 
TFR CC,A 
STA <CST 
LDA $FD95 
BMNI HLT9 
DRCC #$49 
LDA #$89 
STA $FD95 
LDA $FD95 
BPL HLT1 
PULS A,PC 


HLT9i 


HLT1i 


』 FIRG HASK 








0O 


独立 モニ タ アセ ンプ ブル ・ リ スト 








721E 
721E 
7229 
7223 
7225 
7227 
7229 
7229 
722B 
722C 
7220 
722E 
722F 
7239 
7231 
7232 
7233 
7234 
7235 
7236 
7237 
7239 
723B 
723D 
723F 
7241 
7243 
7245 
7247 
7249 
7249 
724B 
724D 
7250 
7252 
7255 
7257 
7259 
7259 
725B 
7250 
725F 
7261 
7263 
7265 
7265 
7267 
7269 
726B 
726D 
726F 
7271 
7273 
7273 
7275 
7278 
7278 
727C 
727E 
7289 
7282 
7284 
7286 
7288 
728A 
728C 
728E 
7299 
7292 
7294 
7298 
7298 
729A 
729C 
729E 
7289 
72A2 
7204 
72A6 
72A8 
72A4 
72AC 
72AE 
72B9 
72B2 
72B4 
72B6 
72B9 
728B 
72BD 
72BF 
72C1 
72C3 
72C5 
72C5 
72C7 
72C9 
72C9 
72CB 
72CD 
72CF 
72D2 
72D4 
72D6 


j SUB SYSTEHN RESTART 

















3492 RESTRT:PSHS 
7FFD95 ELR *FD95 
969C LDA <CST 
1FBA TFR ACE 
3582 PULS A,PC 
j BYTE IN A TO ASCII IN A&B 
3491 ENEODEIPSHS CE 
44 LSRA 
56 RORB 
44 LSRA 
56 RORB 
44 LSRA 
56 RORB 
44 LSRA 
56 RORB 
54 LSRB 
54 LSRB 
54 LSRB 
54 LSRB 
BB39 ADDA W%39 
B13A ENPR きき 53 
2592 BCS ENC1 
BB97 ADDA 7 
CB39 ENC1: ADDB WS39 
EC13A CHPB W%3 
2592 BCS ENC2 
CB97 ADDB W7 
<581 ENC2: PULS CC,PC 
j DISP A REB DATUM 
497 BYTEDP:PSHS BCE 
BDDC BSR ENCODE 
17FF7F LESR PRINT 
1E89 EX6 AiB 
17FF7A LBSR PRINT 
IE89 EX6 AiB 
587 PULS BiECiPE 
iDISP X RE 
497 DPRX: PSHS 。BCE 
IF19 TFR X,D 
BDER BSR BYTEDP 
1F98 TFR BA 
BDE6 BSR BYTEDP 
3587 PULS AiB4CCFE 
1 ASCII IN 6 TO NUHBER IN B 
<491 DECODE:PSHS CE 
1F89 TFR AiB 
C03 SUBB W%39 
Cl98 CHPB Ws 
2592 BCS DEC9 
C997 SUBB #7 
3581 DEE9: PULS CCPC 
1 TAKE B BIT NoKEYTOB 
ェ 403 BETNBBiPSHS A,CC 
17FF2 BBB9: LBSR INKEY 
gF9D ELR <SKF 
B198 EHPA WB 
273D BE BKC1 
B129 CHPA W%20 
273D BE BKC 
B11E EHPA WIC 
2718 BEO 6KCA 
B12E EHPA WS2C 
2718 BEO GkCE FM-7 の 場合 次 の と ころ を 変更 
B12B EHPA #%2B こ 
2718 BEO BKCE | _.、 内 
812D CHPA Ws20 | / デ BZ じ 
2718 BEQ GKCD プロ BB で 還 
819D CHPa WSD 
2718 BEO BKCE | 
B12E CHPA Ws2E | 
2616 BNE BKC 
B646 LDA #%46 
2912 BRA BKC 
B641 BKCAi LDA #W%41 
209E BRA BKC 
B642 BKCB: LDA WS42 
2094 BRA BKC 
B643 BKCC: LDA We43 
2906 BRA BKC 
B644 BKCD: LDA Ws44 
2992 BRA BKC 
B645 BKCE: LDA WS45 
BDB* BKC: BSR DECODE 
Cl9F EWPB WSF 
22BF BHI BBB9 
17FF16 LBSR PRINT 
3583 BKC2: PULS AiCC,PC 
CeF BKCI: LDB WSFO : when key = BS 
29FA BRA BKC2 
EeFF BKC3: LDB WSFF 
D79D STB <SKF j when key = SPACE 
29F4 BRA BKE2 
iTAKE 1 BYTE No KEY TOB 
Ee92 BETN1B:LDB #2 
2092 BRA BETN 
ij TAKE 2 BYTE No KEY TO D 
Ce94 BETN2BiLDB #4 
3431 BETN: PSHS X,YCE 
27E LEAS -2,8 
17FEB9 LBSR SPC 
6FE4 CLR ,8 
1F9B TFR B,A 
1F91 6N9:  TFR DX 











361 
9362 
936< 
9364 
0365 
9366 
367 
6368 
9369 
9379 
371 
372 
373 
374 
9375 
376 
377 
6378 
379 
0389 
381 
9382 
9383 
384 
385 
386 
9387 
9388 
9389 
0<99 
391 
0?92 
393 
@?94 
9395 
395 
397 
<98 
9399 
9409 
9491 
0402 
06493 
9404 
9495 
406 
0497 
9498 
9499 
9419 
411 
0412 
9413 
0414 
9415 
9415 
9417 
9413 
9419 
0429 
9421 
0422 
9423 
0424 
9425 
0426 
9427 
9428 
9429 
0439 
431 
432 
9433 
0434 
9435 
436 
437 
0438 
9439 
448 
441 
0442 
443 
444 
9445 
9446 
447 
9448 
449 
0459 
9451 
452 
453 
454 
9455 
9456 
457 
9458 
9459 
9469 
461 
462 
9463 
464 


72D8 
72D 
72DC 
72DE 
72E9 
72E2 
72E4 
72E6 
72E7 
72EB 
72E9 
72EA 
72EB 
72EC 
72ED 
72EE 
72F9 
72F2 
72F4 
72Fe 
72FB 
72FA 
72FB 
72FD 
72FF 
7391 
7393 
7395 
7397 
7x99 
739B 
7x6D 
7319 
7312 
7313 
7314 
7<15 
7316 
7317 
7318 
7319 
7<14 
731C 
731E 
731F 
7321 
7321 
7323 
7325 
7527 
7329 
7*28 
732D 
732F 
7331 
7333 
7336 
7337 
7339 
75?8 
733B 
733D 
733F 
7341 
7344 
7346 
7348 
7548 
7548 
7348 
7<9B 
734E 
7351 
7353 
7355 
7357 
7359 
7<SB 
735D 
7369 
7362 
7365 
7367 
7364 
736E 
7371 
7374 
7378 
737C 
737D 
737E 
737F 
7381 
7<83 
7384 
7386 
7388 
7389 
738 
738B 
738E 
738D 
738E 
7392 


8D99 BSR BETNBB 
1F92 TFR 0D,Y 
CIF9 CMPB #$FO9 j』 when key = BS 
272 く BEH 6N1 
CIiFF EHPB 革 $FF i when key = SPACE 
271B BEQ B6N3 
ECE4 LDD ,8 
S8 LSLB 
49 ROLA 
58 LSLB 
49 ROLA 
58 LSLB 
49 ROLA 
SB8 LSLB 
49 ROLA 
EDE4 STD 8 
1F29 TFR YiD 
8699 LDA 9 
E3E4 ADDD ,8 
EDE4 STD 8 
1F19 TFR X4D 
5A DECB 
26D9 BNE BN9 
ECE4 LDD ,S 
3262 BN3』 LEAS 2.8 
35B1 PULS X,YiCE,PE 
1F19 BN1s TFR X4D j when key = BS 
A77F STA -1.S 
E17F CHPB -1.S 
27CB EE0 BN9 
Ce6E LDB #BS j BS+SP+BS" 
1792CC LBSR DPCX 
ECE4 LDD ,5 
44 LSRA 
56 RORB 
44 LSRA 
58 RURB 
44 LSRA 
56 RURB 
44 LSRA 
56 RORB 
EDE4 STD ,8 
1F19 TFR XiD 
SC INCE 
29BS BRA 6N9 
ji DISP B BYTE CHR FRON X% 
3493 DPCi PSHS A,CC 
A689 DFC9:i LDA 」X+ 
BIFF CHPN #$FF 
2798 EEQ DC1 
817F CMFA 7F 
2704 BEQ DC1 
811F CMPA #$1F 
22092 EHI DC9 
B62E DC1: LDA  #%2E 
MHZ4 DC9: LBSR FRINT 
5 DECB 
26EA ENE DPC9 
3583 PULS A,CE,FC 
j DISF CHR FROM X TILL 9 
3493 DPCX9: PSHS AEC 
A689 DFX9: LDA ,」X+ 
2795 BEQ DPX1 
17FEBE LBSR FRINT 
29F7 BRA DPX9 
3583 DFX1i FULS ACE,PC 
H 
ij DAMF 
17FE84 DAHP: LBSR FRINT 
32EBEA LEAS -22.8 
17FES1 DHF9: LBSR INKEY 
8141 CNPR 者 $41 
279D BEG ADAMF 
8144 CNFA 44 
279E BEQD DDAMF 
8153 CHFA #%53 
26F1 BNE DNFP9 
BE9998 LDX 幸 B 
2998 ERA DHP1 
BE9229 ADAHP: LDX #$9229 
2993 BRA DHPI 
BE9119 DDAHP: LDX #$%9119 
AFE99911 DHFI: STX $11.8 
17FESE LBSR PRINT 
17FF5S LBSR GETN2B 
7E99913 STA  $%13.8 
A6E99911 LDA  $11.8 
54 LSRB 
54 LSRB 
54 LSRB 
8199 CMPA #9 
2798 BE DHP3 
54 LSRB 
8191 EHPA #1 
2792 BEQ  DMNP2 
54 LSRB 
S8 ASLB 
58 DHP2: ASLB 
58 DHPSi ASLB 
58 ASLB 
58 ASLB 
E7E99914 STB  $14.8 
17FF34 LBSR BETN2B 








&O 


独立 モニ タ アセ ンプ ブル ・ リ スト 





9465 
9466 
9467 
9468 
9469 
9479 
471 
9472 
9473 
9474 
9475 
9476 
9477 
9478 
9479 
9489 
9481 
9482 
9483 
9484 
9485 
9486 
9487 
9488 
9489 
9499 
9491 
9492 
949 
9494 
9495 
9496 
9497 
9498 
9499 
9599 
9501 
9592 
9593 
9594 
9595 
9596 
9507 
9598 
9599 
9519 
9511 
9512 
9513 
9514 
9515 
9516 
9517 
9S18 
9519 
95S29 
9521 
9522 
9523 
9524 
9525 
9526 
9527 
9528 
9529 
9539 
9531 
9532 
9533 
9534 
9535 
9536 
9537 
9538 
9539 
9549 
9541 

9542 
9543 
9544 
9545 
9546 
9547 
9548 
9549 
9559 
9551 

9552 
9553 
95S4 
9555 
9556 
9557 
95SB 
9559 
9569 
9561 

9562 
9563 
9564 
9565 
9566 
9567 
9568 





7395 
7399 
739C 
739F 
731 
7385 
7585 
7386 
7388 
73AC 
736E 
73B9 
73B2 
73B5 
75B8 
75BC 
75BE 
75C9 
73C3 
73C5 
73CB 
73CA 
73CD 
73D1 
73D4 
73D6 
73D7 
73D9 
73DB 
73DE 
73E1 
73E5 
73EB 
75EB 
73EF 
75F1 
73F5 
75F7 
73FB 
75FD 
73FF 
7491 
7494 
7497 
7499 
749B 
749D 
749F 
7411 
7413 
7414 
7416 
7418 
741B 
741D 
7429 
7423 
7426 
7428 
742C 
742E 
7432 
7436 
7439 
743D 
7441 
7443 
7445 
7449 
744B 
744D 
744E 
744F 
7451 
7453 
7456 
7454 
745E 
745E 
7469 
7464 
7465 
7467 
7469 
746E 
746E 
7471 
7475 
7477 
7479 
747B 
747E 
7489 
7482 
7485 
7486 
7488 
748A 
748D 
748F 
7492 
7495 
7499 
749D 


EDE99915 
17FDDA 
17FDBE 
C619 
8699 
A7ES 

SA 

26FB 
A6E99911 
8192 
272E 
Ce48 
179227 
BE9999 
E6E99912 
862B 
3494 
17FE9C 
1F19 
17FE61 
1F98 
17FE92 
39899199 
17FDAE 
3594 

SA 

26E3 
Ce59 
1791FE 
17FD95 
AEE9991 さ 
17FE71 
17FD97 
A6E99911 
8102 
2733 
E6E99912 
AEE99913 
B609 
A7E4 
A6B9 
17FE45 
17FD7B 
1F92 
ABES 
A7ES 
1F29 
ABE4 
A7E4 

SA 

26E9 
863A 
17FDB4 
A6E4 
17FE29 
17FDSF 
17FDSC 
A6E99011 
8109 
279B 
AEE99913 
E6E99912 
17FEEB 
AFE99913 
ACE99915 
2219 
1F19 
A6E99911 
8199 
2602 

58 

58 

C199 
268B 
17FD29 
A6E99911 
8192 
2737 
8693 
E6E909912 
3D 

CB98 
862D 
17FDSD 
Ce54 
17916B 
Ee6E99912 
8600 
7E4 
A6ES 
17FDCB 
ABE4 
A7E4 
17FCFD 
SA 

26F1 
8638 
17FD42 
R6E4 
17FDB7 
17FCE1 
AEE99913 
ACE99915 
1023FEFE 


SUMCL: 


SUHCL9: 


DHEAD: 


DANP9i 


DPR9z 


DANP2! 


DANP3: 


DANP4: 


DAMPSi 


CSUN: 


DANHP6: 


STD 
LBSR 
LBSR 
LDB 
LDA 
STA 
DECB 
BNE 
LDA 
CHPa 
BEB 
LDB 
LBSR 
LDX 
LDB 
LDa 
PSHS 
LBSR 
TFR 
LBSR 
TFR 
LBSR 
LEAX 
LBSR 
PULS 
DECB 
BNE 
LDB 
LBSR 
LBSR 
LDX 
LBSR 
LBSR 
LDa 
CHPA 
BEQ 
LDB 
LDX 
LDa 
STa 
LDA 
LBSR 
LBSR 
TFR 
ADDA 
STA 
TFR 
ADDA 
STA 
DECB 
BNE 
LDA 
LBSR 
LDA 
LBSR 
LBSR 
LBSR 
LDA 
CMPA 
BEQ 
LDX 
LDB 
LBSR 
STX 
CHPX 
BHI 
TFR 
LDA 
CHPA 
BNE 
ASLB 
ASLB 
CHPB 
BNE 
LBSR 
LDA 
EHPA 
BEQ 
LDa 
LDB 
UL 
ADDB 
LDA 
LBSR 
LDB 
LBSR 
LDB 
LDAa 
STa 
LDA 
LBSR 
ADDa 
STA 
LBSR 
DECB 
BNE 
LDa 
LBSR 
LDa 
LBSR 
LBSR 
LDX 
CHPX 
LBLS 


515,8 
LIN 
LPTON 
19 
] 
B,S 


SUMCL9 
$11.S 
2 
DAMP9 
48 
DPCX 
9 
12.S 
52B 

B 
PRINT 
XD 
ENCODE 
BA 
PRINT 
s109.X 
SPEC 

B 


DHEAD 
WS59 
DPCX 
LIN 
*13。S 
DPRX 
SPEC 
*11.8 
#2 
DaHP2 
$12.8 


_%15,8 


CSUN 
者 8 
PRINT 


BYTEDP 
LIN 
13。S 
515.8 
SUHCL 


H 


LF+ "Add 


"Sum 


LF+ Sumi 








9569 
579 
9571 
9572 
9573 
9574 
575 
9576 
9577 
578 
579 
589 
9581 
582 
9583 
9584 
9585 
9586 
9587 
9588 
9S89 
9599 
591 
592 
9593 
594 
9595 
9596 
9597 
9598 
9599 
9699 
9691 
692 
693 
9604 
9695 
9696 
667 
9608 
9609 
619 
9611 
612 
9613 
0614 
9615 
9616 
617 
618 
9619 
9620 
621 
622 
9623 
9624 
9625 
626 
9627 
9628 
629 
639 
9631 
632 
9633 
9634 
9635 
9636 
637 
638 
9639 
9649 
641 
642 
964 く 
9644 
645 
9646 
9647 
9648 
9649 
659 
9651 
9652 
9653 
9654 
655 
656 
657 
0658 
9659 
9669 
661 
9662 
9663 
9664 
9685 
9666 
9667 
9e68 
9669 
9e79 
9671 
9672 


74A1 
743 
74 さ 
7443 
74A3 
7446 
74AB 
74AB 
74AD 
74AF 
74B1 
74B3 
74B5 
74B7 
74B9 
74BB 
74BE 
74C1 
74C3 
74CS 
74CB 
74CB 
74CE 
74D1 
74D4 
7406 
74D9 
74DC 
74DE 
74E1 
74ES 
74E6 
74EB 
74EB 
74ED 
74EF 
74F2 
74F4 
74F6 
74F9 
74FB 
74FD 
74FF 
7591 
7593 
7595 
7597 
7599 
7599 
7599 
7599 
750C 
759E 
7519 
7512 
7514 
7516 
7518 
751A 
751C 
751E 
7SIE 
751E 
751E 
7521 
7524 
7526 
7529 
752B 
752D 
7520 
752D 
752p 
752D 
752D 
7539 
7533 
7535 
7537 
759 
753B 
75 さ D 
753F 
7541 
7543 
7544 
7546 
7548 
754A8 
7548 
754A 
754^a 
754D 
754F 
7552 
7554 
7557 
7554 
75SC 
75SF 
7561 
7584 
756e6 
7568 


113F 


17FD29 
327D 
17FCF7 
814E 
2798 
8143 
26F5 
Ce699 
2992 
Ce91 
E7E4 
17FD11 
17FE98 
1F91 
6F61 
17FCe65 
17FCAB 
17FCAB 
17FD8B 
17FCAE 
A684 
17FD79 
17FCA6 
Ce91 
17FE49 
391F 
17FC9C 
B62D 
17FCE4 
Ae6E4 
2797 
17FDDS 
1E89 
2093 
17FC91 
D69D 
CiFF 
2792 
A784 
さ 3991 
AC61 
26C4 
113F 


17FCC ミ 
327D 
1FBB 
Ce99 
1F91 
Ce9C 
ED61 
Ce91 
E7E4 
207 


17FEAE 
17FDAS 
1F92 
17FBB7 
ADA4 
113F 


17FC9F 
17FB7D 
DC9A 
DD9C 
1FBB 
Ce9E 
1F91 
Ce9E 
A682 
3492 
SA 
26F9 
35FF 
113F 


17FC82 
327E 
17FD77 
ED62 
17FD72 
39991 
EDE4 
17FDe6e 
1F92 
17FB4E 
1F29 
AE62 
E789 


H 
H 
H 
NEMi 


NEN9i 


NENIi 
NEN2: 


NEN21: 


NENSi 


NEN4: 
NEMSi 


NEN6i 


E6: 


で 。 と こ = < 


UNPi 


JHP0: 


CALL 


ーー 


ALL: 


CALL9: 


CALL1: 


FILL 


コー で 


FILL9s 


PIEE3t 


FDB 


LBSR 
LEAS 
LBSR 
CMPA 
BEG 
CNPA 
BNE 
LDB 
BRA 
LDB 
STB 
LBSR 
LBSR 
TFR 
ELR 
LBSR 
LBSR 
LBSR 
LBSR 
LBSR 
LDA 
LBSR 
LBSR 
LDB 
LBSR 
LEAX 
LBSR 
LDA 
LBSR 
LDA 
BEG 
LBSR 
EXG 
BRA 
LBSR 
LDB 
CNPB 
BEG 
STA 
LEAX 
CHPX 
BNE 
FDB 


CHAN6E REG 


LBSR 
LEAS 
TFR 
LDB 
TFR 
LDB 
STD 
LDB 
STB 
BRA 


BRANCH 


LBSR 
LBSR 
TFR 
LBSR 
JSR 
FDB 


LBSR 
LBSR 
LDD 
STD 
TFR 
LDB 
TFR 
LDB 
LDA 
FSHS 
DECB 
BNE 
FULS 
FDB 


BYTE 


LBSR 
LEAS 
LBSR 
STD 
LBSR 
ADDD 
STD 
LBSR 
TFR 
LBSR 
TFR 
LDX 
STB 


$115F j SM13 


j CHANBE MENURY 


FRINT 
-3S 
INKEY 
W$4E 
NEH1 
W$43 
EN9 
WO 
HEM2 
1 

。S 
FRINT 
BETN2B 
D,X 
1.8 
LPTON 
LIN 
LIN 
DPRX 
SPC 

了 ] 
BYTEDP 
SPC 
1 
DPC 
-1,X 
SPC 
W$2D 
PRINT 
1S 
NEN4 
6ETNIB 
AB 
MENS 
INPUT 
<SKF 
SFF 
MEM6 
ュ X 
1.X 
1.S 
MEMS 
$115F ) SM13 


PRINT 
-3,8 
DP,A 

を MM 
DX 
WMMt12 
1.8 

1 

8 
MEM21 


FRINT 

6ETN2B 

pY 

DKCHCK 

・ 

*$113F j SMIS 


Jump with req values in 
*FC99 - $FC9B 


PRINT 
DKCHCK 
く <MMt10 
く MM+12 
DP.8 
MM+14 
DX 
#14 
1 

A 


CALL1 
FEiU,YiX」DP,B,R」EE 
$113F 


DATA 


PRINT 
-4S 
BETN2B 
2.8 
BETN2B 
1 

,S 
BETN1B 
D.Y 
DKCHCK 
Y,D 
2,8 
人 + 








&O 


独立 モニ タ アセ ンプ ブル ・ リ スト 








9673 
9674 
9875 
9676 
9877 
9678 
9679 
9689 
681 
9682 
9683 
9684 
9685 
9686 
9687 
9688 
9689 
9699 
9e91 
9692 
9693 
9694 
9695 
9696 
9897 
9698 
9899 
9799 
9791 
9792 
0793 
9794 
9795 
9796 
9797 
9798 
9799 
9710 
9711 
9712 
9713 
9714 
9715 
9716 
9717 
9718 
9719 
9729 
9721 
9722 
9723 
9724 
9725 
9726 
9727 
9728 
9729 
9739 
9731 
9732 
97 さ 3 
9734 
973S 
9736 
9737 
9738 
9739 
9749 
9741 
9742 


9743 


9744 


9745 
9746 
9747 


9748 
9749 
9759 
9751 
9752 
9753 


9754 
9755 
9756 
9757 
9758 
9759 
9769 
9781 
9762 
976 く 
9764 
9765 
9766 
9767 


9768 


5eA 
756E 
75eE 
7579 
7579 
7579 
7579 
7573 
7575 
7578 
757A 
757D 
757F 
7582 
7584 
7587 
7589 
758C 
758E 
7590 
7593 
7595 
7597 
7599 
759B 
7590 
759F 
75A1 
7543 
75A5 
7587 
75A9 
75AB 
75AD 
7SAF 
75B1 
7583 
75BS 
7585 
75B5 
7585 
7588 
758A 
75BC 
75BE 
7SC1 
75E3 
7SCS 
75C7 
75E9 
75CE 
7SCE 
7509 
75D2 
750D5 
750D5 
75D7 
75DA 
75DC 
75DC 
75DE 
75E9 
7SE2 
75E4 
75Ee 
75E9 
7SEB 
7SEE 
7SF9 
7SFS 


7691 


7699 


7614 
7615 
7617 


761F 
7629 
7622 
7623 
7626 
7627 


762F 
7639 
7632 
7637 
7638 
763 
763F 
7849 
7643 
7644 
7646 
764B 
764C 
764E 


7654 


ACE4 
2SFA 
113F 


17FCSC 
327A 
17FDS1 
EDE4 
17FD4C 
ED62 
17FD47 
ED64 
17FB29 
EC64 
19A3E4 
220F 
AEE4 
19AE64 
A6B9 
A7A9 
AEe2 
23FB 
113F 
AE62 
EC62 
AR3E4 
E364 
IF92 
3991 
3121 
A682 
87A2 
ACE4 
22FB 
113F 


17FC17 
8609 
D69E 
2612 
BeFD92 
840A 
B192 
2797 
Ce49 
179919 
113F 
867F 
979E 
1eFASC 


Ce72 
179902 
113F 


3413 

8699 

ED7E 

1FS9 

E37E 
C3099C 
1F91 
17FD4D 
3593 
464D2D<820 
494E444559 
454E44454E 
5429 
4D4F4E4954 
4F5229 
5665727369 
6F6E20312E 
39 

99 

9A9D 
5052494E54 
455229 

99 

4F4E 

99 

4F4646 

99 ・ 
296F6EXF20 
285929 

99 

9A9D 
4572726F72 
99 

9A0D 
4164642929 
99 

53756D 

99 

9A9D 
53756D さ 29 
99 

9A9D 
466F75eE64 
20 

99 


MOVE1: 


HDVE3: 


NOVE2: 


MDVE4: 


Ss we oe 


PT: 


LPTIi 
LPT9i 


HELP: 


DPEXi 


CNPX 
BCS 
FDB 


LBSR 
LEAS 
LBSR 
STD 
LBSR 
STD 
LBSR 
STD 
LBSR 
LDD 
CHFD 
BHI 
LDX 
LDY 
LDA 
STA 
CHPX 
BLS 
FDB 
LDX 
LDD 
SUBD 
ADDD 
TFR 
LEAX 
LEAY 
LDA 
STA 
CHPX 
BHI 
FDB 


LBSR 
LDA 
LDB 
BNE 
LDA 
ANDA 
CMPA 
BEQ 
LDB 
LBSR 
FDB 
LDA 
STA 
LBRA 


LDB 
LBSR 
FDB 


PSHS 
LDA 
STD 
TFR 
ADDD 
ADDD 
TFR 
LBSR 
PULS 
FCC 
FCC 


FCC 


FCC 


FCB 
FDB 
FEE 


FCB 
FCC 
FCB 
FCE 
FCB 
FCC 


FCB 
FDB 
FCC 
FCB 
FDB 
FEE 
FCB 
FEC 
FCB 
FDB 
FCE 
FCB 
FDB 
FCCE 


FCB 


FILLI 
$113F 


FRINT 
-6.S 
SETN2B 
+S 
BETN2B 
24S 
5ETN2B 
4.S 
DKEHEK 
4.S 

xS 
NOVE2 
15 


PRINT 
き 9 

く PRF 
LPT9 
$FD92 
は | 
草 2 
LPT1 
WER 
DPCX 
5113F 
7F 
XPRF 
RESET1 


W%72 
DPCX 
%113F 


X,AiCE 
0 

-2.S 

FC,D 

-2.S 

WC 

D,X 

DPCX9 
XiAiCEiPE 
/FN-8 / 
/INDEPENDENT / 


/MONITOR / 


/Version 1.9/ 


9 
$989D 
7PRINTER / 


9 

70N/ 

9 

70FF/ 

9 

/ ok? (Y)/ 


9 

$9A9D 
7Error/ 
9 

$9A0D 
/Add / 
9 

7Sum/ 

9 

$9AgD 
/Sumi / 
9 

$9A9D 
/Fcund / 


i SMIS 


1 SMI3 


』 SMI3 


』 SMI3 


1 Penu 


ji SMIS 














9769 
9779 


9771 
9772 
9773 
9774 
9775 


776 


9777 
9778 
9779 
9789 
9781 
9782 
9783 
9784 
9785 
9786 
9787 
9788 
9789 
9799 
9791 
9792 
9793 
9794 
9795 
9798 
9797 
9798 
9799 
9899 
9891 
9892 
989? 
9804 
9805 
9896 
9897 
9898 
9B99 
9819 
9811 
9812 
9813 
9814 
9815 
9816 
9817 
9818 
9819 
9829 
9821 
9822 
9823 
9824 
9825 
9826 
9827 
9828 
9829 
9839 
9831 
9832 
9833 
9834 
9835 
9836 
9837 
9838 
9839 
9849 
9841 
9842 
9843 
9844 
9845 
9846 
9847 
9848 
9849 
9859 
9851 
9852 
9853 
9854 
985S 
9856 
9857 
9858 
9859 
9869 
9861 
9862 
9863 
9864 
9865 


7655 
7657 


765D 
7eSE 
7669 
7883 
7564 


7678 


7688 
7689 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7892 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7692 
7695 
7698 
7694 
769C 
769E 
75A9 
76A2 
7684 
76A6 
76A8 
76AA 
76AD 
76AF 
76B1 
7884 
76B7 
7689 
76BB 
76BD 
76C9 
76C2 
76C4 
76C6 
76C8 
76C9 
76CB 
76CD 
76CF 
76D1 
750 ミ 
76DS 
76D7 
76D? 
76DB 
76DD 
76DF 
76E1 
76E3 
7eE5 
76E6 
76EB 
76EB 
76ED 
76F9 
76F さ 
7eF4 
76F6 
7eF6 
7eFB 
76FA 
76FC 
76FE 
7799 
7792 
7794 
7796 
7798 
7798 
7798 
779C 


9A9D 
S368697929 
29 

99 

9820 

9899 

9a9D 
5B57294444 
=943532044 
41294D4E20 
4D43204620 
5229472059 
294C44294C 
3F 29532043 
SD 

99 


17FB3A 
179393 
1FBB 
Ce27 
D02C 
C627 
DD02E 
Ce1A 
1F91 
Ce<9 
1F92 
17FC1IC 
DD13 
D025 
17FC15 
C39991 
DD1S 
9313 
DD23 
17FC99 
DD24 
C698 
A689 
A7A9 
SA 
26F9 
8692 
9738 
8eFF 
9727 
1FBB 
Ce39 
1F91 
8690 
9722 
9728 
9729 
Ce9B 
7B9 
SA 
26FB 
179180 
Ce19 
BEFFFF 
179195 
5A 
26F7 


CeFF 
8D4D 
1FB8 
Ce39 
1F91 
8699 
Ce14 
8D4A 
CeFF 
8D3D 


DE23 
3334 


FDB $99D 
FCEC /Skip 


FCEB 9 

FDE  $9829 

FDB $9899 

FDE $9A9D 

FCC /[M DD DS DA NN HECF 


FCC /RBFLDL32 98 B]/ 


FEB 9 
RB 9 





ij CASSETTE MT INTERFACE 


EQU $65 
EQU $5C 
EBU $6E 
EBU $49 
EHU $19 
ERU  $11 
EOU $12 
ADDRES:EDU  $%1 マ 
ENDAD: EOU $15 
CFFi EQU  $17 
FOUND: EDU $18 
VFi EQU $19 
NAHE: EOU $1A 
DATH: EQU 22 
DATEND:EOU $27 
HBAD: EQU $2C 
DATH5: EQOU $2C 
DATENAiEDU $2E 
HB: EQOU  $39 


SAVE 


H 
3 
SAVE: LBSR PRINT 
LBSR NAMEIN 
TFR DP,A 
LDB WDATHt5 
STD <DATH5 
LDB WDATEND 
STD <DATENA 
LDB NAME 
TFR D.X 
LDB *WHB 
TFR D.Y 
LBSR GETN2B 
STD <ADDRES 
STD <DATHt3 
LBSR GETN2B 
ADDD WI 
STD <ENDAD 
SUBD <ADDRES 
STD <DATHt1 
LBSR GETN2B 
STD <DATEND+3 
LDB WB 
SAVE9: LDA ,X+ 
STA ,Y+ 
DECB 
BNE SAVE 
LDA W2 
STA <HB+B 
LDA WWFF 
STA <DATEND 
TFR DPiA 
LDB WHBt9 
TFR 0.X 
LDA WO 
STA <DATH 
STA <DATEND+1 
STA <DATEND+2 
LDB WII 
SAVE1: STA ,X+ 
DECB 
BNE SAVEI 
LBSR MOTON 
LDB #%19 
WAIT: LDX WSFFFF 
LBSR TIHER 
DECB 
BNE MAIT 
j WRITE HEAD BLOCK 
LDB WSFF 
BSR MRITEF 
TFR DP,A 
LDB WHB 
TFR D,X 
LDA 9 
LDB Ws14 
BSR BLKM 
LDR WsFF 
BSR WRITEF 
j MRITE FIRST DATA 
LDU <DaTHt1 
LEAU 19U 


/ 








&O 


独立 モニ タ アセ ンプ ブル ・ リ スト 





9886 
9867 
9868 
9869 
9879 
9871 
9872 
9873 
9874 
9875 
9876 
9877 
9878 
9879 
9889 
9881 
9882 
9883 
9884 
9885 
9886 
9887 
9888 
9889 
9899 
9891 
9892 
9893 
9894 
9895 
9896 
9897 
9898 
9899 
9999 
9991 
9902 
9903 
9904 
9995 
0906 
9997 
0998 
9999 
9919 
9911 
9912 
9913 
9914 
9915 
9916 
9917 
0918 
9919 
9929 
9921 
9922 
9923 
0924 
9925 
0926 
9927 
9928 
9929 
939 
9931 
9932 
9933 
9934 
9935 
9936 
9937 
9938 
9939 
9949 
9941 
9942 
5943 
9944 
06945 
9946 
6947 
9948 
949 
9959 
9951 
09952 
9953 
9954 
9955 
9956 
9957 
96958 
9959 
969 
9961 
9962 
9963 
9964 
9965 
6966 
9967 
9968 
9969 


779E 
7719 
7712 
7714 
7718 
7714 
771E 
7729 
7720 
7722 
7724 
7726 
7728 
7728 
772 
772C 
772E 
7739 
7732 
7734 
77 さ 4 
7736 
7738 
773A 
773C 
773E 
7749 
7742 
7745 
7747 
7747 
7747 
7749 
774C 
774D 
774F 
7759 
7759 
7752 
7754 
7757 
7754 
775C 
775E 
7761 
7763 
7766 
7768 
776B 
776D 
77eF 
7772 
7774 
7776 
7778 
777A 
777B 
777D 
7780 
7782 


7784 ふ 


7786 
7788 
778A 
778C 
778E 
7799 
7792 
7794 
7796 
7798 
7799 
7799 
779B 
779F 
7741 
7783 
77A5 
7788 
77AA 
77AC 
77AE 
77AF 
77B1 
77B4 
77Be 
77B8 
7789 
77BA 
77BE 
77BE 
77C9 
77C2 
77C4 
77Ce6 
77CB 
77CC 
77CE 
77D9 
770D2 
7705 
7707 
77D9 
770B 


1FB8 
Ce622 
1F91 
118399FF 
220E 
11839999 
2714 


1F ミ 9 
8691 
8D2A 
290C 


8691 
CeFF 
8D22 
C69A 
8D1S 
29E9 


Ce69A 
8D9F 
8eFF 
E699 
8D12 
CeFF 
8D95 
179139 
113F 


BeFF 
1799B4 
5A 
26FB 
9 


3492 
34109 
BE99FF 
170997E 
519 
8691 
17999F 
863E 
179998 
ュ 502 
179995 
9711 
1F98 
1709BE 
9B11 
9711 
C199 
2714 
5A 
689 
179089 
9BI1 
9711 
335F 
9C2E 
2602 
9E13 
9C15 
26E6 
9E2E 
29E2 
9611 
BD68 
39 


3434 
198E9999 
BD44 
26FE 
B046 
BE90IE 
804E 
BD39 
26F1 
4F 
BD3A 
BE9919 
8042 
BD2D 
58 

46 
3121 
198C 
9998 
2796 
8D21 
26FC 
20E7 
10BE9999 
BD17 
26FC 
8D19 
BE9918 
8021 
8D9E 
27C9 
3121 





TFR 
LDB 
TFR 
MRDATA:CMFU 
BHI 
CHPU 
BEG 
ji LAST DATA 
TFR 
LDA 
BSR 
BRA 
ij MAIN BODY 
MREONT:LDA 
LDB 
BSR 
LDB 
BSR 
BRA 
1 MRITE END 
MREND: LDE 
BSR 
LDA 
LDB 
BSR 
LDB 
BSR 
LBSR 
FDB 


= ご > < 


RITEF:LDA 
LBSR 
DECB 
ENE 
RTS 


DP,A 
#DATH 
D,X 
#$FF 
MRCONT 
9 
MREND 
BLOCK 
UiD 

1 
BLKW 
MREND 


に 3 
$FF 
BLKW 
#19 
WRITEF 
MRDATA 
BLOCK 
#19 
MRITEF 
きま FF 
#9 
BLKM 
#$FF 
MRITEF 
MOTOFF 
$113F ij SMIS 


#$FF 
WRITE 


MRITEF 


j CHT ONE BLOCEK MRITE 


BLKM: PSHS 
FSHS 
LDX 
LBSR 
FULS 
LDA 
LBSR 
LDA 
LBSR 
FULS 
LBSR 
STA 
TFR 
LBSR 
ADDA 
STA 
MLOOP: CHFB 
BEG 
DECB 
LDA 
LBSR 
ADDA 
STA 
LEAU 
CHFX 
BNE 
LDX 
MLOOP1iCEHFX 
BNE 
LDX 
BRA 
MLOOP2:iLDA 
BSR 
RTS 


X 
WSFF 
TIHER 
X 
1 
MRITE 
32 
WRITE 
^ 
MRITE 
SUN 
B,A 
MRITE 
<SUN 
<SUM 
WB 
MWLOOF2 


AM 
MRITE 
*SUM 
《SUN 
-1」U 
DATHS 
MLOOF1 
KADDRES 
(ENDAD 
NLUUP 
(DATENA 
NLOOF 
〈SUM 
WRITE 


i CHT QNE BYTE READ 


READ: PSHS 
CBREAD:LDY 
CRIi BSR 
BNE 
BSR 
LDX 
BSR 
BSR 
BNE 
CLRA 
CR2: BSR 
LDX 
BSR 
BSR 
LSLB 
RURA 
LEAY 
FDB 
FDB 
BEB 
CRS3: BSR 
BNE 
BRA 
CRSTDP:LDY 
CR4i BSR 
BNE 
BSR 
LDX 
BSR 
BSR 
BEG 


K,YE 
#9 
DIN 
CR1 
EDGE 
#39 
TIHER 
DIN 
ER1 


EDGE 
き 25 
TINER 
DIN 


1.Y 
198C 
9098 
CRSTQF 
DIN 
CR3 
CR2 

#9 

DIN 
CR4 
EDG6E 
24 
TINER 
DIN 
CBREAD 


LEAY 14Y 











9979 
971 
972 
9973 
9974 
975 
9976 
9977 
978 
9979 
0989 
981 
982 
9983 
9984 
8985 
986 
6987 
9988 
989 
9999 
991 
9992 
099 
9994 
9995 
996 
9997 
9998 
0999 
1999 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
1919 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1929 
1921 

1922 
1923 
1924 
1925 
1926 
1927 

1928 
1929 

199 
1931 

1032 
1933 
1934 
1935 
1936 
1937 
1938 
1939 
1949 
1991 

1942 
1943 
1944 
1945 
1946 
1947 
1948 
1949 
1959 
1951 

1952 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
1969 
1961 

1962 
196< 
1964 
1965 
1965 
1967 
1968 
1969 
1979 
1971 

1972 


1973 


77DD 
77DF 
77E1 
77E3 
77ES 
77EB 
77EA 
77EB 
77ED 
77EF 
77F1 
77F3 
77F5 
77F7 
77F8 
77FA 
77FD 
77FF 
7809 
7899 
7802 
7895 
7897 
7899 
789C 
789E 
7819 
7813 
7815 
7817 
781A 
781C 
7829 
7822 
7823 
7825 
7828 
782A8 
782C 
782F 
7831 
783 
7836 
7838 
783A 
783D 
783F 
7841 

7843 
7845 
7847 
7849 
784D 
784F 
7852 
7854 

7856 
7859 
78SB 
785D 

785F 

7861 

7863 
7866 

7868 
7868 
78eC 
786E 
7871 

7872 
7874 
7877 
7878 
787A 
787D 
787E 
7889 
7883 
7884 
7884 

7888 
788B 
788D 
788F 

7891 

7893 
7895 
7897 

7899 
789B 
789D 
78A9 
78A2 
78A4 
7887 
78A9 
78AB 
78AD 
78AF 
7BB1 

78B3 
78B5 
78BB 
78BA 


198C 
9992 
26E9 
35B4 
Fe6FD92 
C489 
39 
BDF8 
C189 
26FA 
BDF2 
C189 
26F4 
39 
391F 
8C9999 
26F9 
39 


3436 
BE9924 
8DF1 
8D63 
BE9006 
8DEA 
BD62 
BE9912 
8DE3 
8D5S 
BE9912 
8DDC 
19BE9999 
8DS9 
44 
250E 
BE9911 
8DCE 
8D49 
BE9911 
8DC7 
200E 
8E9924 
8DC9 
80?2 
8E9923 
8DB9 
2099 
3121 
198C 
9098 
26D7 
198E9999 
8D23 
BE9924 
8DA4 
8D16 
BE999C 
809D 
3121 
198C 
9092 
2797 
BE9916 
8D99 
20E3 
5B6 
CeC2 
F7FD99 
39 
CeC3 
F7FD99 
39 
CeC2 
F7FD99 
39 
CeC9 
F7FD99 
39 


198E9999 
17FF9E 
BiFF 
2694 
3121 
29FS 
B191 
2eED 
198C 
9008 
23E7 
17FEF9 
813E 
26E9 
17FEF2 
9719 
9711 
8109 
2696 
9E2C 
8e91 
9717 
17FEE1 
1F89 
D712 


FDB $198C 
FDB *9992 
BNE CR4 
PULS XY」B,PE 
DIN:  LDB $FD92 
ANDB Ws89 
RTS 
EDSE: BSR DIN 
CHPB Ws89 
BNE EDGE 
BSR DIN 
CHPB W%B9 
BNE EDGE 
RTS 
TINERi LEAX -1。* 
CMPX 
BNE TIMER 
RTS 
j CHT ONE BYTE MRITE 
WRITE: PSHS YiX,B,A 
LDX 36 
BSR TIMER 
CBOUT: BSR ZERO 
LDX We 
BSR TIMER 
BSR ONE 
LDX #18 
BSR TIMER 
BSR ZERO 
LDX W18 
BSR TIMER 
LDY W9 
MB9: BSR ONE 
LSRA 
BCS CO1 
C09:  LDX W17 
BSR TIMER 
BSR ZERO 
LDX Wi17 
BSR TIMER 
BRA NEXT 
Eoli  LDX 6 
BSR TIMER 
BSR 7ERO 
LDX 35 
BSR TINER 
BRA NEXT 
LEAY 1.Y 
FDB *198C 
FDB $9098 
BNE MBO 
LDY W9 
MB2: BSR DNE 
LDX 36 
BSR TIMER 
BSR 7ERO 
LDX W12 
BSR TIMER 
LEAY 1.Y 
FDB $108C 
FDR $9092 
BEO BYTEND 
LDX W22 
BSR TIMER 
BRA MB2 
BYTEND:PULS XYiBiAiPE 
ZERO: LDB WsC2 
STB $*FD99 
RTS 
DNE:  LDB WWCS 
STB *FD99 
RTS 
HOTON: LDB WSC2 
STB *FD99 
RTS 
MOTOFF:LDBE W%C9 
STB *FD99 
RTS 
j CHT ONE BLDEK READ 
BLKR: LDY W9 
BR9:  LBSR READ 
EHPA W$FF 
BNE BRI 
LEAY 1.Y 
BRA BR9 
EHPA WS%91 
BNE BLKR 
FDB *198C 
FDB $9998 
BLS BLKR 
LBSR READ 
CHPA W%3C 
BNE BLKR 
LBSR READ 
STA <TYFE 
STA <SUM 
CHPA 9 
BNE BLEN 
LDX <HBAD 
LDA 
STA <CFF 
LBSR READ 
TFR A,B 
STB <LEN 


NEXT: 


BR1: 


BLEN: 


j DATA IN AccA 


j DATA IN AccA 


: Always read if Head 


j BLOCK LENGTH 
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ん) 


独立 モニ タ アセ ンプ ブル ・ リ スト 




















1974 78BC 9B11 ADDA く SUM 1158 7968 8699 NAME1: LDA j CEPF FOUND reset 
1975 78BE 9711 STA <SUM 1159 796A Cee5 LDB WSK 
1976 78C9 C199 BRLOOP:CHPB #9 1169 796C 9717 NAMC2: STA 〈CFF 
1977 78C2 2729 BEH BRL9 1161 796E 9718 STA <FUUND 
1978 78C4 5 DECB 1162 7979 17FE69 LBSR DPCX 
1979 78C5 17FED1 LBSR READ 1163 7973 1FBB TFR DP,A 
1989 78C8 3404 FSHS B 1154 7975 Ce39 LDB WHE 
1981 78CA D617 LDB 〈CFF 1165 7977 1F91 TFR D,X 
19B2 78CC 2796 BE BRL4 j NODT THIS FILE 1166 7979 C698 LDB #WB 
198 く 78CE De619 LDB <VF 1167 797B 17F98 く LBSR DPC 
1984 78D9 2602 BNE BRL4 j VERIFY 1168 797E 1FBB TFR DP,A 
1985 78D2 8789 STA 1X+ 1169 7989 Ce22 LDB WWDATH 
1986 78D4 3594 BRL4: PULS B 1179 7982 1F91 TFR DiX 
19B7 78D6 9B11 ADDA 〈SUN 1171 7984 CEFFFB LDU WW-5 
1988 78D8 9711 STA <SUH 1172 7987 17FEEE LESR NOTON 
1989 78DA 3341 LEAU 1.U 117 さ 798A 3596 PULS A,B 
1999 78DC 11839909 EHPU # き 9 1174 798C 298B BRA LUAD2 
1991 7BE9 2692 BNE BRL1 1175 798E BIFF LOADS: CHFR 前 %FF 
1992 78E2 9E13 LDX <〈ADDRES 1176 7999 2647 BNE LOAD2 
1093 78E4 119323 BRL1: CHPU <DATH+1 1177 7992 9618 LDA <FOUND 
1994 78E7 260D7 BNE BRLOOP 1178 7994 2796 BEQ LOAD1 
1995 78E9 9E2E LDX 〈DATENA 1179 7996 17FEE5 LBSR HOTOFF 
1996 78EB 2003 BRL2: BRA BRLOOF 1189 7999 113F FDB  %113F ) SWIS 
1997 7BED 17FEA9 BRL9: LBSR READ 1181 799B 17F7E4 NAHEIN:LBSR SFE 
1998 78F9 9111 CHPA 〈SUM 1182 799E IFBB TFR DP,4 
1999 78F2 2691 BNE ERROR 118 さ 79A9 CE61A LDB #NAME 
1199 7BF4 39 RTS 1184 79A2 1F91 TFR D,X 
1191 78FS 17FF86 ERRUR: LBSR HOTOFF 1185 794 C698 LDB #B 
1192 7BFB C649 LDB WER 1186 79A6 17F7F9 NaN9: LBSR INKEY 
11963 78BFA 17FCDF LBSR DPCX 1187 799 819D CHFA #$D 
1194 78FD 113F FDB  $11XF j SMIS 1188 79AB 2711 BEG NAMN1 
1195 78FF H 1189 79AD 8198 EMFA #B 
1196 78FF j LOAD & VERIFY 1199 79AF 2715 BEG NAM2 
1197 78FF 日 1191 79B1 8129 EHPA #$29 
1198 78FF 17FB8CD LOAD: LBSR PRINT 1192 79B3 2SF1I ECS NAM9 
1199 7992 17F89D LD9: LBSR INKEY 119 く 79B5 17FB17 LBSR PRINT 
1119 7995 C699 LDB W9 1194 79B8 8789 STA ,X+ 
1111 7997 8B144 EHPA 544 1195 79BA Sa DECB 

1112 7999 2796 BE LD1 1196 79BB 26E9 BNE NANO 
111 く 799B B13F EMPA #$3F 1197 79BD 39 RTS 

1114 799D 26F3 BNE LD9 1198 79BE 8e20 NAM1i LDA  #$%20 
1115 799F C691 LDB WW1 1199 79C9 A7B9 STA ,X+ 
1116 7911 D719 LD1i STB <VF 1299 79C2 5a DECBE 

1117 7913 17FB8B9 LBSR PRINT 1291 79C3 26F9 BNE NAM1 
1118 7916 IFBB TFR DP,iA 1202 79CS5 39 RTS 

1119 7918 C627 LDB WDATEND 1293 79C6 C198 NAH2: CHFBE #B 
1129 7914 DD2E STD <〈DATENA |] 1204 79C8 27DC BE0D NAMO 
1121 791C 8D7D BSR NANEIN | 1295 79CA 8620 LDA  #$29 
1122 791E D619 LDB <VF 1296 79CC 91F LEAX -1.X% 
112 く 7929 2605 BNE LD2 1297 79CE 8784 STA ,X 
1124 7922 17F9A4 LBSR BETN2B 1298 79D9 <494 FSHS B 
1125 ・7925 DD13 STD <ADDRES | 1299 79D2 Ce6E LDB BS 
1126 7927 9F18 LD2: CLR <FOUND 1219 7904 17FC9S LBSR DFCX 
1127 7929 17FF4C LBSR HOTON 1211 7907 3504 FULS B 
1128 792C 1FB8 LOAD1: TFR DP,A 1212 7909 SC INCB 

1129 792E C639 LDB WHB 1213 79DA 29CR BRN NRHO 
1139 7939 DD2C STD <HBAD 1214 79E9 DRG %79E9 
11 く 1 7932 CE9999 LDU WW 1215 79E9 ij LINE INPUT 

1132 7935 DF23 STU <DATH+1 1216 79E9 BE943D LDX #W$%943D 
1133 7937 9F17 ELR <CFF 1217 79E3 17F7A4 LI9: LBSR INPUT 
1134 7939 17FF48 LOAD2: LBSR BLKR 1218 79E6 8A789 STA  」X+ 
1135 793C 9619 LDA KTYFE 1219 79E8 819D CHFA #$D 
1136 793E B190 ENHFA #9 122 79EA 26F7 BNE LIO 
1137 7949 264C BNE LOAD3 1221 79EC 869A LDN 
1138 7942 ij Mhen TYFE = HEAD 1222 79EE 17F7DE LBSR FRINT 
1139 7942 3496 PSHS AB 1223 79F1 BE943C LDX  W%943C 
1149 7944 17FF37 LBSR HOTOFF 1224 79F4 39 RTS 

1141 7947 1FBB TFR DP,A 1225 79FB DR6 $79FB 
1142 7949 C6309 LDB WWHB 1226 79FB 9690 TIHIR: LDA <〈AST 
1143 794B 1F91 TRR MX 1227 79FD 3B RTI 

1144 794D C618 LDB  #WNAME 1228 79FE H 

1145 794F IF92 TFR DiY 1229 79FE j END 

1146 7951 Ce08 LDE 8 1239 79FE 日 

1147 7953 Ae89 NAMC9: LDA ,X+ 1231 79FE : NHON Version 1.9 
1148 7955 AIA9 ENFA 4Yt 

1149 7957 269F BNE NRNCI 

1159 7959 58 DECB 

1151 7956 26F7 BNE NAMC9 

1152 795C Ce5C LDB WWLO 

1153 79SE 9638 LDA HB+8 

1154 7969 B192 CNFA #2 

1155 7962 2691 BNE ERROR ij Machine Code PFBN ? 

1156 7964 B691 LDA #1 

1157 7966 2904 BRA NAMC2 ij CEPF FOUND sst 旧 
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ON の ASY 議 及 。 ンプ フリ リ スト を 陸 み 上 げ る モニ タ 








ン 喝 喝 m 会 計 検査 陸 マ イコ ンク ラブ 滝沢 吉 人 

音声 モニ タ は MZ な ど て で 了 既に 発表 され て いる の で , っ) い 番地 を 入力 する と そこ か ら 256 バイ ト 分 表示 し , 入力 

いう も の か 知っ て いる 人 も 多い と 思い ます . これ は マシ ン 待ち に な り ま す . 後 は 16 進 で デー タ を 打ち 込ん で くだ さい . 

語 入力 時 に リア ル タ イ ム で その 値 を 音声 で 出力 し た り , 入 この 際 , FM- 8 で は テン ・ キ ー 部 が 図 1 の よう に な り ま す . 

力 し た 内 容 を 読み あげ た りす る も の で す . し た が っ て , 本 な お , [PF |-| PF9 | の キー は 次 の よう に 定義 きれ て いま す . 

に 掲載 され て いる マシ ン 語 を 入力 し た 後 は , 本 を 見 な が ら | 本 の 2 ーー ーー デーーーーー 3 

F M の 読み 上 げ て くれ る 声 を 聞け ば , 入力 ミス を 見 つけ る 8 2 がり 

こと が で きる わけ で す . 2 
| IPF8l: END 














合 し 1 方 [Pe]: 画面 を 読む 


回 テン キー 














医 み mee 5 コ こそ とう 
- ' 最後 に 
原理 は オー ディ オ ・ カ セッ ト 出 力 アド レス ($FD00) に 3 は に 
音声 デー タ を 書き 込ん で 声 を 出し て いる た め , 本 体 か ら 声 大 事 な こ と を 書き 忘れ まし た . F 
は 出 な い の で カセ モッ ト 用 の コネ クタ の マイ ク 端 子 を 接続 し M-7 で この プロ グラ ム を 使う と き は | 剛 還 回 較 
録音 状態 に し て くだ さい . ディ ッ プ ・ ス イッ チ の 4 を オン に し 団 還 回 回 
リス ト 1, 2 の プロ グラ ム を 入力 し て RUN し て くだ さい て 低速 モー ド に し て くだ さい (高速 
最初 に パス タート アド レス ?* と 聞い て くる の で , 入力 で 実行 する と 何 を 言っ て いる の か ぁ ゎ | 円 還 国 
し た い 番 地 ま た は 読み ト げ て 縮 し い 番 地 を 入力 し て くだ さき か ら な く な る の で ). [I] 還 [5p] 


mii リリ スト 1 音声 モニ タ BASIC プロ グラ ム ・ リ スト に で ニニ キテ ニニ ーー ーー ーー の | 


「 





20 CLEAR 2 。&H17FF DEFTNT ECD。T SD。P。X』Y。ZEDIM D(17) :DIM BZ(16) : DEF USR=% 
H183O』 DEFFNCH* (EE。P!) =RIBHT$ ("OO0O"+HEX 還 (F!) 。 三 ) g NEEY (6) GUSUB2OOi NEEY( フ ) GUSUB2 マ O 
: NEEY(B) BUBUE220』 HNKEY (9) GBDSUB25O』 MIDTHBO 。20』 REY6 。" チェ ッ グ サム "KEY7 プ 。 りり キ " ニニ スス ム "』 
KEY。" END" 

3 さ 0 KEY の 。" カリ メン フラ ヨム "sKEY1O。" スタ ー ト アト ドル スリ EKEY1 リョ KEY2。" "agKEY さ 。" "IKEY4。" "sgEDN 
SLE 0。18。1 1: B=PEEK(&H1 昌 さ Q) : TF B = &H34 THEN 4QELSE LUADM"VM" 

40 PRINT" FM- フ FMB オニ セイ モニ クタ? 

50_ PRINTiFRINT" INFUT エリ ア  &H2EOO 一 &HZFFF ( &H6FFF DISGK MODE )" 

60 INFUT "マタ ー ト アト ルス リョ BS=VaL ("8H" TS) 』EEY。"&H "+FNCH も (4 。8) 』 IFG ま =" "THENGUTU6OEL 
SETIFS  &&H2EOO THEN 5o 

7 の O_ CLBgPRINT" Rddr 。 +O +1 + 人 2 + さ +4 + 班 + ら 6 + プ + オ 日 +9 + オ 人 +TB +C +D +E +F Su 
mWsLUCATE9。17gFRINT "Sum"』 

8Q LTNE (56 8) (56 昌 8) 。 ロ RsLTNE (56 。Q) (56 179) DR LTNE (56 。 169) 一 (568』169) 。DR』 ミ iLTNE 
(568,0) 一 (56 179) 。 ロ R:LTNE (5OB 。O) 一 (50 。 179) 。 ロ RiLTNE(112。O) 一 (112。179) URLINE ( 
0』179) 一 (6 さ 1 。179) 。 DR 。 さ 

0_REY (6) ロ NiREY (7) UNgEEY (9) ロ NiEEY (B) ロ N 1 

100_ FUR A=S TU &HZFFF STEF 2556gFUDR X=O TO 15i LHCATE9 』X+1 FRINTFNCH も (4 。XX16+ 人 n) 』F ロ 
R _Y=Q_TOU 15iDX(Y) = じ VT (FNCH ま (2 。PEE ド (A+X+16 テ Y ) ) ) : NEXT YiFUT@(15+X※ さ る 。1) 一 (1 王 +Xx さ +1 。 
16) 。DX。 人 4: NEXT Xi X ニ 1 ロ 』 Y=1 

110 IF X で 1 呈 THEN X=61 ELBE IF X>61 THEN X=15:Y=Y+1 

120 IF Y < 1 THEN Y=16 ELSE IF Y>16 THEN Y=1 

13Q0 TINKEY$*: 昌 =SCREEN(X 。 Y) = LOEATEX 。 Ys FRTNTCHR(&HB7) 』 LODCATEX ,Y: FRINTCHR (BB) ir 
F_X MUD さ =OTHEN C=2』iD=1 ELSE ビ =1』D=2 

140 TFT ま = ビ HR ま (127) THENX=X+Di BHTD1 10ELSE TFT 和 ま =DHR ま (を &H1D ) THENX=Xー ビ 』 BDTU1 10ELBE TFT 
CHR*(&H1E) THENY= ニ Yー1 GUTU1 1OELSETF T$=CHR 和 も (&H1F) THENY=Y+1 : GUTD1 1OELSETFT$=" 。 "THENI 


あー リ 人 "ELBETF 了 ニー リ キリ THENT 生 ="EVELBETFT ま = リー" リ THENT ま =" じ "ELSETFT ま =". "THENT ="E" 
150 TFT ま = ビ HR も (HOD ) THENT 第 ="D "ELSETF T ま =CDHR 生 (8zH1C) THENT ま ="F" 
いら ひ EEROW 2 + ま THEN 11QELSE 1TF 1 まま > "FTHEN 110 





170 LUCATEX Ys PRTNTT』 ェ X= ニ X+D ェ F ま =USR(T) 
1B9T60Y6' 110 

















190 NEXTzEND 
200 FDR ロ =1 TD 16: BZ(D)=Q: NEXT』FDR PF=15 TU 6Q BTEF さ 』BET@(P 。1) 一 (F+1 。16) 。DZ T= ニ OiFD 
R_ ロ =1TO16』 Z=VAL("&H"+MKT ま (DX( ロ ー1 ) ) ) : 8Z( ロ ) =5%( ロ ) +Z =T+Z NEXT ロ HiLUCATE F。17:FRINT 
FNCH ま (2 。T) 』 NEXT PsT!=OFDR ロ =1 TU 16:LUCATE65。D:PRINTFNCH ま (2。8(D) ) : ET!ーT!+SZ( 
0) :NEXT ロ 

210 LUCATE 65,17:PRINT FNCH* ま (2。T!) 』gRETURN 

220 GSUB 240』END 

230 BODSUE 240』RETURN 19O 

240 8=OrFUR ロ =1 TU 6O STEF さ :』BETe(D。1) 一 ( ロ +1 。16) 。DZ: FOR F=O TU 15』POEE TB+PX16。 
VAL("H"+MKT も (DX(P) ) ) i NEXT: =B+1』 NEXT: RETURN 

250 FOUR F=1 TO 16 

260 FUR ロ =15 TU 60 STEP < 

270 BET@(DxBー1 。10xPー1 ) -( ロ B+16』Fx10+ 日 ) 。DZ』G。4 :PUT@ (DB-1 ,10xPー-1 ) 一 (日 +16。Fx10+B 
) 。 DX 。FRESET , 4: FUT@( ロ コー-1 。 10*Pー1) (B+16』F*10+B) 。D NOT 。4 

2BO F 還 =USR (CHR* (SCREEN( ロ 」F) ) ) 』F 和 =UBR (CHR ま (SCREEN ( ロ +1 。P) ) ) 

29O GET@( ロ x 昌 1 ,10xPー1) 一 ( ロ xB+16」F*10+ 日 ) 。D%』 は 。4:FUTG( ロ ヨー1 。 1OPー1 ) 一 (x+16。Px1O+B 
) , DX ,PRESET , 4: PUT@ (日 -1 10xFー1) 一 (HB+16。F*10+8) 。DZ 。NOT 。4 

300 NEXT ロ U,FzRETURN 


OO QO 26 BO 27 0 28 DS 2 QA9 2B aA9 2C aC 2D FF gzFS5 


BO OO FF EQO 1F EO QO さ F FC OF FC OO O7 FF B1 FF 』2a 1DOO B9 FO Q1 FE 07 FC 1F CO QF EQ 7F C1 FE QQO FF 
BO OO _FF EQ 7F FO QQO 7F FB OZ7 FE QO 0Q7 FF BOFF iCF | 1D10 FE OF FB Q7 FB QF EO 7F EQ IF aQ 3F 1 FF 0O 
EO OO FF FO OF FE OO 07 FF OO フ 7F EQO QO FF FO O さ 』 さ ミ 1D2O Q1 FE 07 FE 01 FB OF FB さ F FB 07 EQ SF CO 7F 
FF OO Q ス FF 日 O 1F F ヨ OO 1F FE OO FF EQO OO FF FO :B さ 1D3O 1F OO FF O1 FF BO 7E QO1 FE QO7 FE Q1 FB 07 FO 
03 FF QO_Q3 FF CO _QF FC QQ OF FF OO 7F EO QO 7F 』BE | 1D40O FB Q3 EQ 1F EO FF EQ OF BO 7F 3 FF BO 3E B1 
FC OO FF O O1 FF FO O1 FE OO O フ 7 FF EO O さ FE QO 』 ヨ 1 || 1D5O 07 FC O1 FA OF F4 6F FO OZ7 FO 7F EQO 7F CO 1F 
07 FF EO Q さ FC 0QO 0Q さ FF EO 03 F8 QO 1F FF EQO 07 iC7 || 1D60 7F C1 FF OO 7F Q6 FF Q5 FE QO FE O1 FE QS F9 
FO OO 07 FF CO OF E4 QO OF FF CO OF CC OO 7F FF iDO O 


dd  + 〇 Q 1 +2 + さ +4 + 品 +6 + ブ + ヨ +9 + +B +C +D +E ピ 
1EQO 07 FF FF OO OO 90 05 FF FF EO OO 1 さ 20 9F FF 
1E1O OO Q1 さ 1 1B FF FF CO 0Q 11 1 さ FF FF F6 4 2BR 
1E20 O6 FF FF EC 42 6C 5B 7F FF FE CB 94 B1 1B 7F 
1E さ O 62 10 BB 10 CD FF FD 88 9F CD BC FF FF CB 06 
1E40 9 CE FF FC O4 7F 26 る 1 7F FE OO BF 9 B4 FF 
1E5O BO 1F CB 4Q DF FE Bo 2F E4 2O 6F FF CO さ F CC 
1E6O FF FE OO 7F C4 QO 7F FE QO 7F CO OO FF FO 0Q ュ 
1E70 CO 0O ミ FF FO 0 さ FF CO GS FF BO さ F FF CO Q ミ FF 
1EBO 1F FF BQO 07 FF CO 1F FF QO 07 FF BO 1F FE OO 
1E9O FF 0 さ 1F FE OO OF FF 0O さ FF FC OO 1F FE 07 FF 
1EAO OO 1F FE 03 FF FB OO さ F FE 0 ミ CF FO OO さ F FE 
| | 1EBO CZ7 EQO OO 7F 1E OZ7 EF EQ OO 7F BC OF BF CO oo 
1ECO 1E O7 FF BO OO FF 94 OS FF OO O1 FE FC OF FF 
79 E2 96 7D 9 42 9B 2 さ 5 BF 57 9C B1 6 さ 4E B さ 』EB 1EDO Q1 FF FB QOS FE QO 0 ミ FF F OF FE QQO Q さ FF FO 
1EEO FC OO OZ FF F OO FC OO 0O さ FF FB OO さ C OO OF 

+O +1 +2 + さ +4 4 +6 + キ フ +B ユキ 9 + +B + ビ 41D +E ュ F Bum 1EFO F OO 1E OO OO FF FF EQ QO OO oO FF FF Co oo 





| 

| 
FF FE OO OO 0Q7 FF FF F OO OO 1F FF FF CO OO OO gDZ | Rdd  +O +1 +2 + さ 4 + ユ 5 +6 + プ + 日 +9 +Q +B +C +D +E ピ 
FF FF FF OO_QQO O さ FF FF FC OO OO 1F FF FF EO OO 』FZ | 1FOO OO 7F FF FB QQO OO OO さ F FF EO QO OO CO 1F FF 
00 7F FF FF BOO OO 07 FF FF FO OO OO 1F FF FF BO iBF || 1F1O QO QO OO OF FF FC QO OO OQ QZ7 FF FE OQ oO oO 
OO OO 7F FF FC QO OO OZ FF FF FO OO OO さ F FF F2 』9F 1F2O FF FF CO _QO OO O1 FF FF FO OO _QO _QQO 7F FF FB 
F8B OO OO 7F FF EO OB OO 1F FF FE OO OO OO FF FF si78 1F3O OO _QO さ F FF FF O OO QO Q フ 7 FF FF FF FE OO Oo 





1O 





昌和 間 フフ 音 声 モ ニタ ダンプ ・ リス | 


+B +C +D +E +F Bum || 1BFO FB OO Q9 OB OF FF FB OO 24 23 7F FF E6 QO O 41 』B1 
2O 20 FO 21 FO jiEZ | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーーーーーーーーーー 
2 さ 7O 25 QO 26 BO B9 QA AB BC DE DD EF FF 67 7 kBF Sum: 4C EZ F5 DC B9 87 22 FO D1 B6 CB 28 B6 79 さ E A2 』7F 


O1 』BZ 
7E 』CE 
EO giBO 
OF 』1F 
FE 』B6 
CO iD4 
Q1 iCO 





+F Sum 
F6 ig さ F 
DB ie6E 
FF 』1B 
E9 io 
FF 』BE 
90 79 
E ほ 放 有 
CO _』E6 
OF 』 さ 4 
FC 』4A 
OF 』62 
FF 』B2 
OO 』44 
OO 』F2 
FF s さ 人 
OO 』B2 
BC 』55 
+F Sum 
FC 』AE 
Q さ 』11 
OO 』2 さ 
FF 』BF 
EO 』F4 
1F 』BC 
F 昌 』E1 
FF 』F さ 
FF 』FO 
FF 』FO 
_FF_sFO 


リス ト 1 音声 モニ タ BASIC プロ グラ ム ・ リ スト 





1 


3 


,O 


† 


FF 
Fo 
1F 
07 
EB 


| Add 








| 24Eo 


14 






| 2210 


2000 


2010 
2020 
2030 
2040 
2050 
2060Q 
2070 
2080 
2090 


2220 
2230 
2240 
2250 
2260 
2270 
228O 
2290 
22A0 
22BO 
22CO 
22DO 
22EO 
22FO 


00 
FF 
FC 
9O 
FF 
0O 
BEF 


oo 





Add 

2300 
2 さ 10 
2 さ 20 
2 ささ 0 
2 ス 40 
2 さ 5O 
2 る 60 
2370 
2 さ 8Q 
2390 
2 さ AQ0 
23BQO 
23 さ CO 
23D0 
23EO 
23FO 


Sums 


dd 

2400 
2410 
2420 
24 さ 0 
2440 
245O 
2460 
247O 
248Q 
2490 
24a0 
24BQO 
24CO 
24DO 





+F 
oo 
FF 
FF 
FF 
FF 
FF 
FF 
eZ 
FC 
ea 
D4 
FF 
FF 
FF 
FF 


















add +O 1 +2 + る +4 + +6 + フ 7 + 日 +9 
250O FF FF FF FF FF FF FF FF FF FF 
2510 FF FF FF FF FF FF FF FF FF FF 
2520 FF FF FF FF FF FF FF FF FF FF 
253 さ O 64 CC C9 DC 6F 2 ミ 2E CC 7F ささ 
2540 6F 5 B5 5E E4 CE CE 6F 66 BE5 
255O De ED EE DF CE 4C CC DD ea D6 
2560 BD 5B 9B DE aQ 66 F6 66 6 さ 36 
2570 D7 22 ヨ Q D7 FF ED QB C4 66 6B 
25BO FF FF 6Q さ O Bo 4 さ FF FF B1 QB 
2590 CO さ 1 DF FF B4 4C 60 1O EF FF 
25AQO F8B OE さ O GO 1F FF FE 0 ミ 18 OO 
25Eo 
25Co 
25Do 
25Eo 



























290O ER BB AE FE ED 6E F6 DA aa 2F D5 5D 55 DE 96 BE6 :D さ 
291O AS 7B ES5 5Z7 aD EE aD ea Sa DE ES5 55 Sa ae aB BE5 』DD 
2920 AR DE QAD 55 57 EA QA B6 QAD BF 5E AE F5 FE FZ7 FE :B8 
2930 An BF FD 55 BA 75 AaQ AF 6 ED aa B6 aF F5 Aa AA :F2 
2940 ED 57 aE ED 6D 55 AE Fa D5 ED 56 B5 57 BD D5 57 』5 ミ 
2950 FE aD 55 5S5 6a aaQ FS 7F aQ EB DE F5 5a aD aD 57 』5o 
2960 55 6D 75 55 D9 65 7 BE AE D6 EQ BD 6D F5 aE CE 』D2 
2970 5D 76 9B CE E さ 1 B2 B5 QAD 6F AE aD EB DE D5 Sa 』OC 
298O _D7 BE 75 さ 5 DF E6 FB D5 7A BD AD 57 BF 4 AF 59 :ED 
2990 FS EQ E4 D7 9 F さ FaA F フ 7 さ 9 1C aE EZ 5B BC 6 さ ミ 1 』7D 
29A0_DF FF 70 OQ OO _FF FF FC OO Q4 6'FF FF FC QO 46 ik12 
29BO_ 02 1F FF FF QO QO2 02 1F FF FE 4Q 22 02 OD FF FF sz@E 
29CO ささ 86 40 Q1 FF FF 23 22 OO OF FF FF 20 02 41 OD 』BA 

















dd  +O +1 +2 + オ マネ +4 + 号 +6 + プ + 日 +9 +Q +B + ロ +D +E +F Sum 2C2O FF 6Q0 4C BO 』94 
2A00 FF FC C4 66 40 O1 FF FF 20 43 61 05 FF FE EO 7 :7D 2C さ O O2 7F FF さ Z 
210 20 Q4 DF FF 60 さ 1 20 0 FF FF EO 61 21 QO FF FF :14 2C49 99 99 さ O QB 
220 FO さ 1 さ O OO EF FF 9Q 18 90 O4 FF FF FO OB CB OO : さ 9 2CSO CF 6F 77 7 ミ 
2 さ Q 7F FF FB OC 64 OO 1F FF E4 26 ささ 1 OF FF FE O1 』66 2C6O E6 1E 64 66 
240 19 OO 27 FF FB OO BC BO 13 FF FF BQ 46 62 09 FF 』BZ 2C7O 3 CE CD 77 ささ 
2A5O FE E2 7 ミ Q1 Q4 FF FF BB OO BO 4 さ FF FF FO OO 1Q0 :9F 2CBO さ 1 1B 79 ささ ささ DB DD BC B6 66 EC CC CD FF FF 3QO 
2Q60 19 FF FF F OO 0O さ さ F FF FF FF FF FF FF FF FF FF 』48 2C9O OO Q1 FF F6 42 6F FF FE BO OO 37 FF F9 11 19 FF 
270 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 2CaO O 0 
2BO_FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF rFO 2CEO 77 
290 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FO 2CCO 
2QO_FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 』FO 2CDO 
2QBO FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 』FO 2CEo 
2QCO_FF FE 7F 3B EF EO E6 さ E E6 さ E E7 6C 27 DC ES 1C 2O | 
2ADO E7 さ 9 CE フミ OC C7 39 C6 FF FF FD CO O1 FF FF F ミ iEO | 
2AEO 10 20 OO FF FF DB BF 99 OB さ 7 7F FC CF 11 18 67 :47 
2AFO_FF FC CF 1 さ 1B 7F FF FO 07 93 QB 6F FF FB OF 1 ミ iD 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー add +O +1 +2 + さ +4 + ら 6 + プ + 日 + す 9 +A +B +C +D +E +F Bum 
Bum: QE 5F 7B 21 FF 2C 40 QB 94 EC 1 BD 54 35 B1 05 』22 2DQOO_ 0 FF FB OO FF O1 FF FB QQO FF EO Q さ FF FO O1 』E さ 
2D1o FF CO OF FF EoO FF OO 3F FF 8O QF FE QQO FF FC 』75 
Add 。 +O +1 +2 + さ +4 + 呈 +6 + キ 7 + 日 +9 +a +B +C +D +E +F Sum 2D2O QO 7F FO 07 FF 0 さ FF QQO さ F FE OO 1F FB Q さ FF iaD 
2EOO 10 6F FF F9 99 99 0QQO さ 7 FF FO OF 99 OB 7 FF FC iB1 2D さ O DO O1 FF Bo さ F OO さ F FC O1 FF FO O1 FF CO さ F sBZ 
2B10 46 CC 日 4 1B FF FC 46 E6 C2 1D FF FE 43 7 ミ 6 く 3 1C :E9 2D4O FE QQO さ F FC CS CO Q1 FF BQO 7F FB QO 7F FO さ F iaO 
2E2O DF FF 20 39 BO BA EF FF 20 1C 4C 66 さ B FF CB QE :5D 2D5O FC QO 1F FC 1F OO _ 07 FE QF FB 40 OF FF Q1 C1 』40 
2B3O 26 さ 】1 5D FF F2 13 BD BC CS3 7B BB BC E ミ 6 ミ < さ O DE ia7 2D6O OO _QF FC 0 Eo OF FE Bo CS BO 07 FF 10 2F CO iCS 
2E40 FF ささ さ F 66 6 さ DB DF E4 27 CD BC CS 7B F1 BO DC :E ミ 2D70 07 CF 61 FF F4 07 FF E2 OO QB 1F F8 C ミ BC QO giBO 
2B5O 98 CF 67 7F 99 9B 26 33 59 DD C4 46 79 91 98 6F :2B 2DBQO 7F BF QB EQO EZ 5B 03 CB EC FO OF FE OF 1D E1 :BF 
2B6O 66 32 1B C9 BC CZ 77 71 99 BD E6 C6 61 B9 9C C6 :05 2D90 FE QF 1 F9 ES CO FE 1C さ C FC 61 CO FF Q7 FB iD9 
2B7O 4 さ 79 99 9B EF E7 7 ミ Q1 2D 7E CO 40 さ F FF FC OO0 』1C 2DaO FO BC 7B Q さ FF 17 QB OF OF BF C9 FO EO さ F QO 』66 
2BBO さ F 64 66 DE FE BC BO 43 67 7F 91 20 1F FF FC OO iQF 2DBO さ B FF 9 OF 8o 3 FE 7Q B1 FB 07 E4 7C さ F さ E 』5E 
2B9O さ 7 E6 CE EF 7F さ 2 9 OPC 9E DF FF 0Q9 40 1F FF FC :QE 2DCO 07 7F BO 1F DF DB 07 FE CO FE QF EQ さ E Q3 EC 』6B 
2EQO OO 4D F さ 3 67 さ 3 9B DD BC DB DF E6 6e6 ミミ BE BED CB 2DDO 1F 7 FF 07 C2 CB さ F FF FO SF BO ミ F FE QO FF 』62 
2BEO 9F CD 94 CF 6F F6 40 OF 9E る 1 BD 9C CE C6 EC 9B 2DEO CO_Q3 EQ さ F FC 0 00 
2ECO 19 ED EE E6 66 CD 98 DF 6F Fe 22 39 93 99 EC EE 2DFo O 0C 0 
2BDO E6 77 さ 6 呈 S さ D BF DC CC CD Q 47 6F FE 3 さ 3 72 40 昌一 
Sums 
dd  +O +1 + エ 2 + マ る +4 + ロ +6 + プ + 日 +9 +Q + 唱 + ビ +D +E +F Sum 
2COQO FF EF E6 64 BQO OZ7 7F F7 D9 02 60 0 さ BF FB D9 3 』B9 
2C10 20 0O DF FF EC D9 BEO OO EF FD FE CO 98 QQO 7F FF : さ さ 


FM- フ 
ボー レー ト ・ ア ッ プ 用 プロ グラ ム 


賠 安 田 弘幸 

CLEAR, &H7FBEICRI を し て か ら リ スト を 打ち 込ん で , EX 
EC &H7FCOICRI を し て くだ さい . 

これ で , 以下 の SAVE(M)、 LOAD(M)etc, は 約 2.600bps に 
な り ま す . つま り FM-8 の クロ ッ ク を 8MHz に し て いる 人 と 同 
じ に な り ま す . た だ し , 後ろ の Dip SW は 8MHz 用 に し て お く 
必要 が あり ます . 

原理 は いた っ て 簡単 で 、 まず R OM の 内 容 を 裏 RAM に 移 
し て 8M と 4MHz の 判断 を する と ころ に NOP を 入れ , 裏 RA 
M の BASIC を スタ ー ト させ て いる だ け で す . つま り フ ル RA 
M で 走っ て いる の で マシ ン 語 を 使う と き は 注意 し て くだ さい . 

一 回 REXEC さ せる と , あと は マシ ン 語 の ロー ド を や ら な い . 
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タル ラン < 昌 ル ス 3R 



















































カセ ッ ト ・ テ レコ は 引 の 良い も の を 


ぐに Device 1/O Error が で ます . 





BE gF 


26 


FD 
12 


6 
F2 


FD 
F2 








UNLIST, Protect の 解き 方 


FM-8 の “UNLIST, Protect の 解き 方 "は 、 プ ログ ラム を 


使わ な く て も 解け ます . 


UNLIST っ POKE & H1E7. を HFF : POKE & H1E8, HEFF 


PorotectーMON か ら M コ マン ド で OO0D1(16) に 00 を 書き 込む 
と する こと に よっ て すべ て OK で す . (8D フ ァ ン ) 


また は EXEC 叶 H…( 他 の アド レス ) を や ら な い 限 り 、 EXE 
C[RI の 繰り 返し で 2.600 ボ ー と 1.600 ポ ボー が 切り 換わり ます . 
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この プロ グラ ム は マシ ン 語 開発 の 際 に 必要 と 思わ れる い 
くつ か の 機能 を 7 K バ イト の エリ テ に 収め で oO リブ ーー 
ク も すべ て この 範囲 内 ( 較 1) に ある の で ユー ザー が 意図 
し な い 限 り は 別 エ リア を 壊し て し まう こと は あり ませ ん . 
また ii( グ ラム な 人 は ポジ ショ ジ シ ・ イ シア デア ペ シア タダ ジ トド で: 自 
分 自身 を 転送 する こと も で きま す . 王 な 機能 は 次 の と お り 


ーー コー 


CT 
⑩ ペ ー ジ (256 バ イト ) 単位 の ダン プ ,、 エ ディッ ト 
9 聞 ア + ォ ラン ポア ン 

- で 区 ど 3 アデ ゼン ジラ 

⑯ ト レー ス を 含む エミ ュ レ ー| 
テディ スク の 直接 管理 


ンド の 説明 


まず , 起動 の 手順 を 説明 し ます . BASIC の CLEAR コマ 


ンド で 保護 エリ ア を 設け た 後 . プ ログ ラム を ロー ド じ ます. 


















































起動 は 先頭 番地 で EXEC を 実行 し て くだ さい . コマ ンド は 
静 1 の と お り で す が , 以下 に 詳し く 説 明 し ます . 
表 1 コマ ンド 表 
コマ ンド | 脱 明 
O 出 カ デバ イス 選択 S: 画 面 し L: プ リン タ 
1。 プロ ッ ク ・ ク リア 
先頭 番地 , 終了 番地 , デー タ 
詳 ブロック 転 送 
先頭 番地 , 終了 番地 , 転送 先 番地 
P メモ リ ・ ダ ンプ & エ ディ ッ ト 
軸 逆 ア セン ブル 
単に リタ ー ン ・ キ ー を 押す と 継続 と 見 な す 
A 1 パス ・ ア セン プル 
Q BASIC へ 復帰 
B プレ ー ク ・ ポ イン ト 設 定 
T ト レー ス 開 始 ア ドレ ス 設 定 
GO ユー ザー プロ グラ ム 実 行 
R ディ スク 1 セク タ ・ リ ー ド 
W ディ スク 1 セク タ ・ ラ イト 
H ジー ク 0 ドラ ラック 
※) C, M, P,。 A, G コ マン ド を 実行 する と き は この ブロ グラ ム 
自身 を 壊 わ さ な い よう に 注意 し て くだ さい . 
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太 O 〇 コマ ンド : 出力 デバ イス 選択 


メモ リ ・ ダ ンプ 。 逆 ア セン ブル, トレ ー ス 時 の 出力 デバ 
イス を 指定 し ます . “device” と 聞い て くる の で “S” ま 
7 だ (LC CECIO7SSS 87 仙 画 面 。 SE ば の 


ンタ で す . な お , スタ ー ト 時 は “S” が 選択 さき れ て いま す . 
廊 C コ マン ド : プロ ッ ク ・ ク リア 

指定 され た 番地 を 同 - の デー タ で 埋め ます . 先頭 番地 , 
終了 番地 ,。 デー タ を カン マ で 区 切っ て 入れ て くだ さい 、。 
文 M コ マン ド : ブロ ッ ク 転 送 

メモ リ の 内 容 を 他 の 番地 に 転送 し ます . 先頭 番地 , 終了 
番地 。 転送 先 番 地 を カン マ で 区 切っ て 入れ て くだ さき さい. な 
お , 領域 の 重なっ た 転送 も 許さ れ ま す . 
娘 P ロ コマ ンド : メ モリ ・ ダ ンプ & エ ディ ッ ト 

チェ ッ ク ・ サ ム 付 き で メモ リ * ダ ンプ を 行ない ます 。 出 
カ デ バ イス に “S” を 指定 し た 場合 、 カー ソル ・ エ ディ ッ 





ET この と どき っ デック の 撤 
ム も リア ル タ イ ム に 変わ り ま す . |ESC | キー は HEX <> A 
SC コー の り 換 え で , リタ ー ン ・ キ ー で コマ ンド に 戻 
りす 
図 1 メモ リ ・ マ ッ プ 
3000 








BIOS 
プリ ント 用 | 庫 用 台 


バッ ファ 





ディ スク 用 リー ド 。 
イト >24 ウ ワラ カタ ( 汗 





逆 ア セン プラ 


アセ ンプ ラ 


司 I ス クッ ク 


に る ンー 











文 Q コ マン ド : BASIC へ 戻る 

この モニ タ か ら BASIC へ 戻る と き に 使い ます . |sTOP| キ 
ー を 使っ て も ほとん ど 同 じ 働 き を し ます が , プレ ー ク ・ ポ 
イン ト 用 な どの コー ド ($ 3F…SWID が ユー ザー ブロ グ 
ラム 中 に 残っ て し まう 可能 性 が ある の で , この コマ ンド に 
よっ て 戻る 方 が 無難 で し ょ う . 


逆 ア セン ブル 機能 


文 D コ マン ド : 逆 ア セン プラ 

入力 され た 番地 か ら 21 ス テッ プ が 出力 され ます . ブラ ン 
チ お よび PC 相対 に つい て は アプ ソリ ュー ト な 番地 表示 ( 出 
力 例 1) を し ます . 未定 義 コ ー ド は “FCB?” と 表示 し ます . 
また , ポス トバ イト が 不正 の 場合 は オペ コー ド お よび プリ 
バイ ト (存在 する と き ) に さか の ぼっ て “FCB” を 表示 し 
ます . 


アセ ン ブ ル 機 能 


娘 A コ マン ンド: 1 パス ・ ア セン プラ 

ニモ ニッ ク と オペ ラン ド を 入力 すれ ば すぐ に マシ ン ・ コ 
ー ド を 表示 し , メモ リ に 書き 込み ます . 二 モ ニッ ク と オペ 
ラン ド の 間 に は 1 個 以 上 の スペ ー ス また は タブ ・ コ ー ド を 
入れ て くだ さい . まだ た, オペ ラン ド の 記述 が 20 文 字 を 越え 
る と “S-ERR′ と な る の で , FCC や FCB 命 令 で は 必要 に 応 
じ て 複 数 ライ ン に 分 け て くだ さい . 

な お , プラ ンチ 命令 は オペ ラン ド に 相対 値 で は な く , 絶 
対 番地 を 入れ て くだ さい . 相対 値 を 計算 し て マシ ン ・ コ ー 
ド に 直し ます . 終了 時 は を 入力 し て くだ さい . 以下 , 
アセ ンプ ラ の 文法 に つい て 説明 し ます . 
⑯ 御 命令 
mm FCC : / ま た は “で 囲ま れ た 文字 列 を 確保 








| 例 ) FCC /ABCD/ 
FCC “00AB/ 





mECB : 1 バイト 定数 を 確保 





例 ) FCB 3 一 2.$0D 





BS : オペラ ンド で 示さ れる 分 だ け 0 を 確保 





例 ) BSZ $20 





昌 RDX : 共 数 を 10 進 か 16 進 に 指定 





例 ) RDX &10 
RDX 芝 16 











@ 数 値 
数 値 は 10 進 また は 16 進 で 基数 を 指定 し た 場合 次 の よう 
に 自己 規定 項 を 省略 で きま す . 





例 ) 15, 各 一 2 Qo 進 数 )>15。 一 2 (基数 を 指定 し た 場合 ) 
$15, FE (ie 進数 )-15, FE ( り ) 





アド レッ シン グ ・ モ ー ド 
還 レッ クス e モー ドド 





例 ) TTFR D, 
PSHS  A, CC 





本 5 さま 78 ニ 6 4* モ モッ ド 





例 ) LDX #$6A50 
ORCC #1 











昌 グ イレ クト ・ モ ー ド 


』0 





例 ) ORB <0 
LDY ぐ $AB 





昌 エ クス テン ド ・ モ ー ド 





| 例 ) LSL $505F 
STD  $FFEA 











イシ テッ グ クス ・ モ ー ド 





例 ) CLR ,X 
LDA [S5060〕 
TST  $2A, U 











き エ ラー メッ セー ジ 

mmS-ERR : 構文 上 の エラ ー 

mmC-ERR : 未定 義 コ マン ド 

呈 O-ERR : オペ ラン ド ・ エ ラー 

mV-ERR : 1 バイ ト ・ オ ペラ ンド の 条件 不備 


エミ ュ レ ー ト 様 能 


太 B コ マン ド : プレ ー ク ・ ポ イン ト の 設定 

指定 され た 番地 に ブ プレー ク ・ ポ イン ト を 設定 し ます . 後 
述 の G コ マン ド で 実行 し た 場合 , その 時 点 の レジ スタ 内 容 
を 表示 し ます . 

六 和 コマ ンド : トレ ー ス 開始 

指定 され た 番地 に トレ ー ス 開始 アド レス を 設定 し ます . 
後述 の G コ マン ド で 実行 し た 場合 , レジ スタ の 内 容 と ニモ 
ニッ ク を 表示 (出力 例 2) し ます . 

図 2 トレ ー ス 動作 の フロ ー チ ャ ー ト 










「 
ss-#$i9E | 
FIRQ.SWI ベ クタ 


回 語 
コー ル 人 


は ー プ ロク 2 の 














オペ コー ド 複 導 


新 ポ イン タ ・ セ ッ ト 


前 ポイ ンタ ・ リ セッ ト 
新 ポ イン タ ・ セ ッ ト 









SWI に 音 き 換え 









オペ コー ド 衝 


SWI に 書き 換え | ネイ スラン フロ 
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1O 




















な お , プレ ー ク ・ ボ イン ト と トレ ー ス 開始 アド レス は 同 、 
時 に 1 個 し か 設定 で きま せん . 
廊 G コ マン ド : ユー ザー プロ グラ ム の 実行 
この で コマ ンド は BASIC の EXEC コマ ンド や モニ タ の G 
コマ ンド と 違い , 次 の メリ ッ ト が あり ます . 
@ 水 久 レ ルー プ に 落ち た 場合 な ど |ISTOP| キー で 強制 的 に 引き 
戻せ る . また , その 番地 を 知る こと が で きる 
@ プ レー ク ・ ボ ポイ ント を 設け た 場合 . その 時 点 の レジ スタ 


値 を 表示 する 


トレ ー ス 機能 が ある (TFT コマ ン 
変 こ の コマ ンド 


ま 2235 = 
せ 方 を 


ー ド に 復帰 ) し ます . 


ポイ ント が シー ケン シャ ル な 


ペデ シド 
コー ル を 除く ) 


モー ド の JMP 命令 や プラ 


ド 参 照 ) 
を 実行 する と, 


トレ ー ス は 基本 的 に は ア 
動き を し ます 。 "だ た だ 1 じ 。 


どう いう 終わ ら 
し て も 設定 ポイ ント を 解除 (SWI に 換え て 本 来 の コ 
ドレ ス 順 に 


ウーマン 4 


ンプ CS を コワ ョ ン ン 3 
は エミ ュ レ ー ト し て 分 岐 し ます . JSR, 


TS お よび TER, PUL に よる PC の 更新 に は 対応 し ませ ん . 





文 R, W コ マン ド 
ユニ ッ ト , 


の 


LLSR9SoSoS= PAM 梁 | 


パイ ント が 次 の ステ ッ プ で 待ち 続け る 結果 と な 


ディ スク 管理 機能 


ン 人 ルン 人 
クラ スタ , セク タ を 半 い て くる 
で 区 切っ て 入力 し て くだ さい . 
クラ スタ は FAT や 
まれ た 番号 に 8 し た も の で す . 


リー ドラ イド 

る の で み カ 
ユニ ッ ト は ドラ 
ディ レク トリ に 書き 込 
トラ ッ ク 0 の セク 
逆 ア セン プル 








さ 5O0 AE 34 

さ 502 96 EC 

き 504 52 
さ 4 06 
EC 54 
さ 4 04 
AD CB1D 
さ 1 BCO6 
aD CBSO 
16  FFC6 
4F 
2E 4B 
2| 9QO 
74 6FZO 
20 。 74 
61 
69 6C 
20 64 





RDDA コン 
ROR くま EC 
FCE も 52 
FPSHS B. 全 
LDD -12。U 
FSHS B 

JSR まま 1D。U 
LEAY ま 06。FCR し : る 51Z 
JSR まま 5O 、U 
LBRA Li ミ 4DD 
CLRA 

BEGT し : 565 
EGT Li さ 51 ビ 
LSR まま 6F プ 0 
ERA さ 595 
FCBE まま 61 
FRQL 12.8 
ERA L: 3SB 





0 り 33 


LR ユ >>>11>1 1 WW 


タ 1ー8 を クラ スタ 0 の セク タ 1 エ ー8 と AS 5 

ディ スク 用 の バッ ファ に NPG 
の 256 バ イト が 用 意 き され て いて , ここ へ 読み 込ん だ り , 
か ら 書 き 込 ん を だ り し ます . M, P コ マン ド に より 編集 
を 行なっ て くだ さい 
ーー 

ディ スク が 接続 され て いな 
は 受け 付け られ ませ ん が , 





2 の 


き な ど は R,。W コマ ンド 


ごま の 光 た ZNRi( こ RI ディ 汰 








態 に する こと が で きま す . 

な お , クラ スタ は 0 一 9F, モク タ は 1 一 8 で す . FAT 
ほ ク ラス ズ スタ?。 セク クタ]1 で デイ レク 下り は 4 旬 以 降 >。 デア 
ー タ は 8, 1 以降 で す . 

医 当 み に 
に 4 ペー 
FM-7 で 使う 場合 は $309C, 9D 番 地 を F1, 7D に 


に 破壊 きれ た ディ スケ ッ ト を 復活 する こと も 可能 で す が , 


書き 換 を て くだ さい . な お , ディ スク 管理 機能 は ソフ ト 的 
書き 込む と き は さい 





だ 


ト レー ス EE 還 還 昌 間 昌 昌 








PC: さ 5QQ Si49FB Ui さ O46 Yi さ O さ 6 Xi4A5D DPiOO QB3276 CCiB9 
さ SoQ AB 34 ADDA SW 

PC: 3502 Ss49F Ui: さ 046 Yi さ Q36 Xi4A5SD DFsOQO Bs さ 276 CCzBO 
さ 502 0O6 EC ROR く $E ビ 

FC: 3504  S:49FB Ui さ O46 Yi さ 3O さ 6 。 X』45D DFsOO AEi さ 276 CCB4 
さき さ So4 52 FCE 52 

FC: さ 505 Si:49FB Ui さ O46 Yi さ 0O さ 6  X:45D DP:iOO ABz さ 2BA CCB9 
さ 505 さ 4 。 Q6 FSHS B。A 

FC: さ 507 Si49F6 Ui さ 046 Yi さ 0O36 Xi:4A5D DFPkOO QBE: さ 28BQ CC』B9 
さ SQ7 EC 54 LDD ー12。U 

FC: さ 509 Si:49F6 Ui さ Q46 Ys さ Q さ 6 Xi4ASD DP:OO AEkOOOO CCzB5 
さき さ SQ さき 4 Oo4 FSHS に 】 

FC: さ 5OR Si49F5 Ui さ 0O46 。 Yi さ QOS6 Xi4R5SD DPiQOO EiQQOQOQ CCi BS 
さ S5oB AD CB1D JSR 1D。U 

FC: さ 5OE Ss 49FA Ui: さ O46 Yi: さ O さ 6 Xi4RSD DFiOO Bi さ 3S5OE CiBO 
さ S5OE さ 1 8CQO6 LEAY 0Q6。PCR し =: さ 51 プ 

FC: さ 511 Si49FA Ui さ 046 Ys3517 Xi45D DPsOO Bi さ 5OE CCBO 

| 3511 AD CBS5QO JSR まま 50。U 





ER MONITOR ダン プ ・ 





+4 
94 
0Q 
QQO 
90 
0O 
00 
02 
EE 
16 
0 さ 
QQ 
QQO 
QQO 
oO 0O 
0QQO_ 00 _QQO 
oOO 00 





opo QO 


950 ) QQ QQ 





add 0 上 。 相 流 


9QO 








+ 品 +6 
BA 0QQO 
OO OO 
OO 0O 
Q0_ 0Q 
QO_ OO 
OO_00 
16 16 
16 02 
0 る 6BH 
4 16 

)Q 









QO Qoo 
QO _QOO 
QQO_QQO 
QQO OO 
oO oO 
QQO OO 
QO_GO 
QO 0QO 
QQ_QQ 


QO 
9QO 





















+ ド 
QO : さ 
OO 
QO 
QQO 
OO s 
06 





QO * 
OO 
QQo 
QQO 











Rdd  +O + す 1 +2 + さ +4 曲 +6.+ プ Z +48 
320Q QQO_QQO_QO OO _QO_Q0Q QO 0O 
3210 0O OO Q0O QO 
さ 220 QO_QO QQO QO_QQO_QO _QQO_Q0O 
さ 2 さ O QO OO QO QO 0O 
さ 240 OO _QQO_QO _QQ oO 0QO 
さ 250 1F 40 32 BC FB さ 4 7F 3Q0 BC 
3260 EC FB Q1 1F 
さ 270 フ 7F 1F Q4 3 さ 2 62 3③9 
32BO QAC 65 22 06 
さ 290 1F Q5 さ 4 30 10 8E 
さ 2A0 22 1C E6 8BQ EZ 
さ 2BQ さ Q Q1 さ 1 21 
さ 2CO EC E4 さ 2 68B 1F 
さ 2DO OoOE さ Q 58 
る 2EO 62 Q4 35 Q6 
さ 2FO さ 4 30 6D 42 





さ 5 さ Q 
C6 
Qo 
AD DB 56 さ 35 10 39 
E7 B4 








Sum: さ O 0Q3 06 CD 3Z7 DD 74 


D9 


に な 4 


Add +O +1 
ささ OO CC 
ささ 1O DB 
ささ 20 04 さ 1 
ささ さ O さ 4 
3 る さ 40 56 6D OZ 27 ED a6 06 
ささ 5O 10 EZ7 4 さ 1 CB 62 10 AF 
ささ 6Q 17 ED 22 AD DB 56 35 さ O 39 
ささ 7Q 6 AQ AZ7 80 26 F9 30 
ささ 8O CB 62 10 nAF Q2 CC QO 5O 


+2 + さ +4 +55 +6 + ブ 7 + 日 
Q2 ED QO4 oD 
さ 5 3 さ O さ 9 34 さ 2 
O6 1O aF C6 14 EZ 
3Q CB 


+D +E +F 
o2 aD 
GO Q1 ED 
さ 5 さ 2 3 
AD DB 
CB 58 C6 
CC oOC 
CB 62 5F SC 
7 B4 さ 1 
56 EC Q4 6F 
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SUPER MONITOR 





339O AE 35 30 39 3 る 4 30 6D 42 26 Q ミ C6 14 BC C6 QE 30 giEF 
ささ AO CB 5B EZ7 84 10O aF 02 5F 6D AO 27 0 ミ 5C 20 F9 4F :a6 
さる BO ED Q4 QAD DB 56 さ 5 さ Q る 9 さ 4 32 さ 0 CB SB C6 14 EZ szE1 
ED 06 さ 1 Q6 1O AF Q2 CC QO O2 ED 69 
さ 2 BZ7 O1 ES5 39 1F 9 44 44 44 44 sD4 
8B1 さ 25 Q2 BE OZ7 C1 3 25 Q2 CE :5Z 
1C 20 10 34 3QO C6 1D 20 Qa ミス 4 さ Q sBB 








+4 + 品 +6 + プ + 日 + キ 9 +a +B + ビ +D +E +F GSum 
さ 4 30 Co6 1F さる Q CB 62 4 EZ7 BO 4 2 sDO 
さ 35 さ QO 39 さ 4 10 3Q CB 5 7 07 B6 0 sQ1 
RD DB 56 35 10 3 Q 
0 さ 4 BD 4C BD さ 3E 7 4 さ 1 C9 QQO ER zB2 
68 B1 O2 24 23 a7 Q7 Aa6 67 日 1 0 24 :99 
17 C1 QB 22 1 さ coF 0O6 44 24 02 CB OB s55 
06 ED O4 QD DB 56 20 Q4 6 FF 7 Q1 sF9 
さ 470 35 さ O EC E1 32 63 1F O5 4 10 BE 10 QO 30 1F 26 s42 
348Q 
さ 490 
き 4A0 
き 4EO 
34CO 
ミ 4DQO 
さ 4EQO 

















dd  +O 1 +2 + ス +4 + 呈 +6 + フ 7 + 昌 +9 + +B +C +D +E +F Sum 
さ 600 さ 1 BC 5Q 17 OO 6 34 QO4 EC 52 さ 4 Q4 EC 54 さ 4 0Q4 sFO 
3610 6D 44 27 1 AD CB 26 る 1 BC 2C AD CB 35 aD CB 2C 』BF 
3620 B1 59 27 05 32 63 16 FE B4 AD CB 29 AD CB 4D 6D 30 
さ 6 さ O CB 59 27 Q6 さ 1 BC QO6 AD CB 5Q 16 FE D1 44 69 7 gsDE 
さ 364Q 6B 20 45 72 722 OO 5 く 25 72 65 20 さ F 20 28 59 2C 7F 
さ 650 4E 29 OO 75 6E 69 74 20 6 く 3 6C 7 ミ 74 72 20 7 ミス 6 さ ュ フ 5 
3660 74 72 さ D OO B1 52 26 04 6F 44 20 94 日 1 4B 26 12 :BB 
さ 67O さ 1 BC 09 BD さ a 1F 98 AD CB 4 20 E さ 75 6E 69 74 s96 
680 さ 3D QO 8B1 51 26 OB QAD CB 26 BD OE eE CB 17 86 SF siB85 
ミュ 690 AD CB 29 AD CB 26 16 FE 44 6 DB QB B1 さ F 26 05 ioO2 
36aO Aa6 4 7 DB OB CC OQ1 D7 FD FF Fa 39 C6 QO2 BC C6 sz64 
さ 6RO QO EZ 56 4F 5F ED 5O ED 52 ED 54 86 07 AD CB ミ B :E2 
さ 6CO AD CB 26 AD CB 32 6D CB 62 26 45 さ O CB 66 a6 8BO sCB 
ミ 6DO 1 3D 26 FaA さ 1 5Q 6 BO 27 2F 1 20 27 25 B1 2C si25 
36EO 27 21 1 さ 30 25 20 日 1 39 2 る 3 Oa B0 07 1 3 25 20 gsB6 
36FO_B1 3F 22 1C C6 10 さ 3D 86 Q4 5 69 21 69 a4 4 26 skFAa 


Add 。 +O +1 +2 + さ +4 +5 +6 +7 + 日 49 + +B +C +D +E +F Sum 
さ 700 FB 2O D さ 6 56 さ 1 22 20 CD 6D 56 26 Q ミ EC 5QO 39 s4C 
3710 32 62 16 FF 79 QO QO QQO QO _QQO QQ_QO _QQO OO QQ 00 22 
CB さ 5 20 3F 』 さ 
2B 32 20 2B 594 
37 2O 2B 38 kiEB 
20 2B 44 20 sgDa 
On QR OO 30 si2 


QE C9 OB 6F gi45 





dd  +O 二 1 + 人 る + さ +4 + 呈 6 + プ 7 + 日 19 + +BE +C +D +E +F Sum 
3BOO ED 1 E6 SA 6 10 3D EB 59 6 C4 1F Q2 6 a4 17 siBE1 
3B10 0Q ミ 7 プ 71 Q7 0 6C 59 E6 59 C1 10 26 E6 aD CB 2 ミ AD :C1 
320 CB 26 6C 5A E6 5 C1 1O 10 26FF 4F B6 07 AD CB 4E 
さ B30 3B さ O CB 62 CC 20 05 a7 Oo 5a 26 FE CC 2D さ 1 a7 szF6 
3B40 BO 5 26 FE AD CB 2 ミ aD CB 26 6 05 aD CB ミ 3B さ 3Q sz96 
さ B5O_ CB 62 CC 2Q 7 ミ ED 8B1 CC 75 6D ED 8B1 CC さ 20 ED :26 
3B60 B1 6F 59 E6 59 34 10 さ 30 CB CO 6 5 aE CB EQ 7 ga 
1Q0 aD CB 3E ED 日 1 6 20 7 oO 6C seF 
26 DC CC 2Q0 ミユ B ED 1 A6 CB EQO AD sFB 
CB 2 る ス QD CB 26 QD CB 26 さ 9 E6 41 si9F 
さる 5 O4 C4 QF EZ7 5B Aa7 5C 6F SD 6F sz9Z 
aD CB 44 B6 Q ミ E6 5E さ D 1F 98 BE sF5 
Q7 AD CB 3 AD CB 2C 1 QD 26 QB :5 さ 














さき BDO 
さ BEO 
ミ BFO 





CB 26 39 8B1 
6D SBD 26 


Sums 


Add  +O + キ 1 + す 人 + オ さ +4 + ロ + す 6 + フ + 日 +9 +A +BE +C +D +E +F Sum 
ささ OO 6D SE 26 1C 6D 5D 6 ミ SD 27 Q4 6 Q1 20 22 6C SE si52 
Q4 B6 Q2 2O 16 6F 5E 6 2E 20 4D siE6 
10 26 Q6 6F 5S5E B6 QF 2O SF 8B6 Oo1 4 人 
B1 1D 26 さ 3 6D SE 26 1E 6D 5D 6 sa1 
2O 26 6 5E E6 5E C1 FF 27 Q4 6 sCBH 
E7 SE _B6 2E 2O DS5 6 5E E6 BE C1 iCS 
EZ 5E B6 QF 20 C5 B6 Oo1 aD CB 41 :FE 
20 
E6 
47 
アコ 
GD 
E6 
94 





dd  +O +1 + + さ +4 + 品 6 +Z + 日 +9 + +E +C +D +E +F Sum 
さ QOQO 6D SD 26 Q3 7 5QO BC EZ7 5O _A6 a4 17 Q1 42 A6 5BQO 』i47 
3Q1O AD CB 29 6 Q1 6D 5D 26 QO1 8B1 4C aD CB 41 さ 30 BC gi25 
3Q2O_B6 11 QO B4 QD CB 47 Q6 52 QD CB 29 6 53 aD CB :7B 
ささ O 29 B6 0O ミ 3 E6 SB 3D 1F 98 40 BB 3Q aD CB 3E ae 6 :91 
さ Q40 AD CB 29 A6 57 aD CB 29 6 Q2 AD CB 41 6 SC 40 sB 
さ Q5O BB 11 QD CB 44 Q6 54 AD CB 29 ne 55 QD CB 29 A6 2C 
さ Q60 5B BB 0Q2 AD CB さ SE ae6 5 AD CB 29 a6 SE 4 40 BR :4B 
3Q7O 35 6D 5D 26 O1 4C aD CB 41 63 5D 10 26 FE 4 6C iD 
ミ QBO 5E E6 SB C1 10 27 QB 6 Q1 AD CB SE 16 FE 3A 6F 9 
さ Q9O_ 5R 6C 5C E6 5C C1 10 26 Q5 6 BC 16 FE さ 32 Bo 2F 
ミ 3ARO_ AD CB 41 B6 QO1 aD CB 47 16 FE 1E E6 4 7 4 Ao 
3RBO_ 4 さ 4 04 1F 9 EO EO EZ 5F AD CB SE ED 5O ae a4 
3aCO 17 QO CO a7 5 17 QQO B Q6 5 QD CB 29 ae SE BE 
ミ RDO 05 AD CB 41 Ao6 54 QD CB 29 an6 55 AD CB 29 B6 Q2 
0 AO_5C aD CB 47 Aa6 856 aD CB 29 ^A6 
0 40 BE さ 4 aD CB8 


よい OO ロジ アド 
NO もぉ ロー ひひ は 





dd  +O +1 +G + さ +4 + +6 + フ + 日 +9 +Q +BE +C +D +E +F Sum 
ミ BOO 41 QA6 52 AD CB 29 A6 3 QD CB 29 6 Q2 aD CB 41 saC 
3B1O B6 11 QO 5C AD CB 44 QA6 5O AD CB 29 a6 51 aD CB sz4C 
さ B2O 29 no6 5R 48 4O BE さ 5 aD CB SE 6C SE E6 SE C1 10 sFE 
3 さ BSO 1Q 26 FD 95 cF 5B eC SC E6 SC C1 10 26 05 6 SC siSE 
ミネ BE40 16 FD BD B6 10 AD CB 41 8B6 Q1 aD CB 47 16 FD 79 siEE 
さ B5O さ O CB DO Q6 5C SQ 6 Q6 5F AB B4 7 B4 AD CB さ B siBF 
さ B6O ED 54 ミ O CB EO QA6 5F AE B4 Q7 84 aD CB さ BE ED 56 si6E 
ミ BE7O 3Q CB CO Q6 5E ミ Q 6 Q6 5F aE B4 7 4 AD CB さ B gk7E 
さ BBO ED 52 さ 9 1 7F 27 oO9 81 20 25 Q5 81 FB 24 Q1 BC si9D 
さ E90 B6 2E 39 0O OO OO _QO OO _QO QQ QQO QO _QO QQ _QQ QO gsED 
さ EQO 16 O4 7 BO さ 41 42 5B 20 91 9 95 99 9 B9 9D szE 
さき BBO_A9 41 44 4 さ 41 20 91 C9 95 D9 9 F9 9D E9 41 44 』3 晶 
さ BCO 4 42 20 91 BE 95 9B 9Q BB 9D aE 41 44 44 41 2Q0 siBB 
さ BDO 91 CB 95 DE 9 FE 9D ER 41 44 44 42 20 92 CS 95 FE 
さ BEO D さ 9 F さ 9D ES 41 44 44 44 20 91 4 95 94 9 4 :B9 
さ EFO 9D BE4 41 4E 44 41 20 91 C4 95 D4 9 F4 9D E4 41 53 
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0 


SUPER MONITOR ダン プ ・ リ スト 








Sums 61 FE 5 94 Qi 69 DD 9 3 人 Q 1F 67 < る さ 1C FE aC DE soD 


人 dd O+1 + 合 さ 4 + 口 +6 + プ + 日 +9 +a +B +C +D +E +F Sum 
3EQQ 4E 4 呈 47 42 20 95 0QQO 9 70 9D oO 4E 45 47 20 0 :52 
さ E10 12 4E 4F 5Q 20 91 BQ 95 9 9 EQ 9D QAQ 4F 2 41 :E6 
3 さ E20 20 91 CA 95 DQ 9 FQA 9D EQ 4F 52 42 20 91 1 4F 02 
3E3O' 52 4 さ 4 さ 20 85 34 5O 呈 S 4 ヨ 8 5 さ 20 85 36 So 5 さ 48 szB5 
3E40 5 2O BS 3 5O 5 4C 5 さ 20 85 37 SO 55 4C 55 20 :B5 
さ ESO_BO_ 49 52 4F 4C 41 20 BO 59 52 4F 4C 42 20 95 09 sDD 
3E60 9 仙 79 9D 69 52 4F 4C 20 0 46 52 4F 52 41 20 8O CO 
3 さ E70 56 52 4F 52 42 20 9 06 9 76 9D 66 52 4F 52 20 s6C 
3EBO BCO 3B SG 54 49 20 ヨ 0 さ 9 52 54 5 さ 20 91 2 95 92 sD6 
さ 3E9O 9 人 HB2 9D 2 53 42 4 さ 41 20 91 C2 95 D2 9 F2 9D =:^Z 
3ERQO E コ 5 さ 3 42 4 さ 42 20 BO 1D 5 さ 45 5 20 95 97 9A B フ 7 :46 
さ EEO 9D 7 53 54 41 20 95 DZ 9 F フ 7 5D EZ 5 る 4 42 20 spD6 
3 さ ECO_ 95 DD 9 FD 9D ED 3 54 44 20 95 9F 9 RBF 9D aF = フフ 
さ EDO 3 54 5B 2O HG 9F BA BF BD QF 5 54 59 20 B5 DF szQOC 
3EEO BR FF BD EF 3 54 53 20 95 DF 9 FF 9D EF 53 54 szBF 
3EFO 5 20 91 BO 95 90 9 BO 9D anO 5 さ 5 42 41 20 91 soE 





4010 20 aE 2E 4C 42 4D 49 2 aE 26 4C 42 4E 45 2o aE goo 
4020 2 4C 42 5O 4C 20 BE 16 4C 42 52 41 20 aE 21 4C :74 
人 403O_ 42 52 4E 20 BE 17 4C 42 くさ 52 20 QE 28 4C 42 56 =:B4 
4040 4 20 AE 29 4C 42 56 5 さ 2Q FF EC C4 26 0O4 EC 46 s9C 
405O ED C4 B6 Q5 AD CB ミ 8 aD CB 26 さ O CB8 62 6 C4 aD :F5 
4060 CB 3B ED 1 6 41 aD CB さ B ED 1 CC 2o 20 ED 1 :Fo 
4070 ED BI QD CB 2 さ B6 07 aD CB さ B さ O CB 62 CC 20 4 :CE 
4080 7 BO 5QA 26 FE 6F 5E 6F 5 6F 5C Aa6 D4 AD CB SB : っ 

人 4090 さ O CB 62 ED 8B1 10 3 さ 1 さ O 27 QB 10 B ミ さ 1 1 27 :QZ 
40A0_ 05 20 15 C6 Q1 BC C6 02 E7 SB EC C4 C ミ OO Q1 ED szFB 
40RO_C4 AG D4 QD CB さ B ED 1 aF SO さ 1 BD FQ E5 Q6 AaQ :SE 
40CO 2 FC B1 FF 327 553 Aa6 QO at D4 26 F2 a6 さ E C6 QB :a5 
人 40D0 3D B4 0 ミ a1 5R 26 EZ a6 さ 3E E6 さ E 44 44 4 07 A7 :BF 
40EO SD C4 QOS EZ 5F さ QO CB 72 a6 A1 2B FC さ 1 さ F a フ 7 Bo :D6 
4QFO 





add 。 +0 +1 
410O 4 人 27 
4110 4 27 
4120 72 CC 
4130 BOO る 1 
4140 1 20 Ft 3Q 
4150 3C 24 20 Q さ 
4160 B1 E6 5C EZ 
4170 aF 52 16 02 
418BO_ 60 E6 O1 EZ 
4190 06 27 4 a6 
410 4A 2 F9 20 
41BO 4F 25 01 39 
41CO 26 04 さ 2 62 
41DO 39 50 43 5 さ 
41EO 4 る E6 QO1 1F 
41FO 31 BD oO 2o 








dd +O +1 +2 キミ 4 + 王 +6 キア + 日 +9 +aQ +E +C +D +E +F Sum 


4210 64 16 FF 05 44 02 5 02 59 02 55 02 5 くさ Q2 5Q 4 ミ :EB 
4220 45 02 45 02 41 02 42 02 4 ミ 4 ミ 44 SO 45 Qo2 45 02 sBD 


4240 4 さ O CB 7 aF 52 3 Sa 16 Q1 7 10 aE C4 E6 21 9E 
4250 6 QB さ D 4 Q さ 27 OF 4 2 フ 7 09 4 2 フ 7 Q ミ 6 = さ BC iDE 
4260 B6 S5 BC 86 59 ヨ C Bo6 5 a7 59 E6 21 10 2 Q1 2 s1a 
4270 C4 1F ミネ 1 ヨ D QOQ QC SD 1Q0 27 oO 98 6D aQO 2Q FC 5 :66 


dd +QO 1 二 光 する + 生 + 口 + す 6 + ブ 7 + 日 +9 +a +B +C +D +E +F Sum 
さ QOO_SBD 20O DE 5B 7 2E 5O 4 さ 52 5D 20 DE 45 DB 5B 5 ら 7 =:47 








【 


44 さ CO 
4 さ DO 
人 4SEO 
43FO 


dd 

480Q 
481Q0 
482Q0 
483Q 
4B4Q 





分 
FC 
3 さ Q 
D4 


10 


中 
2D 
3 
さ Q 
レレ Yd 
ビタ 


+ 日 
45 
RD 
Q1 
Q6 
98 





5 さ 
さ 4 
Q ミ 


24 









に 
5 さ 
6C 
2O 
C6 


20 








20 













































SUPER MONITOR ダン プ ・ リ スト 
48B5Q F さ E6 1F C1 20 27 06 C1 2C 27 02 20 07 EC 22 1C =s6D 45O 72 61 6E 65 20 50O 6F 69 6E 74 OO QO QQ EE BD FF :47 
4B6Q FE さ 5 20 さ 9 1 Q1 35 20 さ 9 5Q 4 さ 05 BO 5 る 20 Q4 iC4 4Q60 3 さ E B6 FF Aa7 4F 6D CB 1Q 27 OB 6F CB 10 EC 61 ED saE 
| 487Q 40 55 2O Q さ 40 59 2Q Q2 20 5 20 Q1 10 44 20 QQ sBO | | 4Q70 BC 9 さ Q BC BC QF 61 さ E EE BD FF 2 ミ 3 AD CB 26 17 >:5Z 
48BO QO 44 SO OR QB 42 20 Q9 O4 41 20 OB 02 4 さ 4 さ Oa =11 | 4ABO Q1 つ D EC 4B ED 6 ED C4 さ Q CB 62 CC 20 20 ED B1 =3E 
4890 Q1 QQO 6F 5B 6 0O 日 1 24 27 12 1 26 27 77 日 1 2D :BF | | 4QA9Q CC 5Q 4 さ ED B1 6 さ Q a7 BO B6 QA BD 2R DP 5 ささ :55 
48QO 26 04 6 さ SB 20 EE さ QO 1F 6D 4E 27 69 ceF E2 6F E2 :2F 4QAO ED B1 さ 1 6 さ 4 20 4F BD 1F さ 2 62 CC 55 3Q ED 1 :BZ 
48EQ QA6 BO BD 2 さ 25 ささ 1 さ Q 25 56 B1 さ 9 23 Oa 1 41 : 4EBO B6 QB BD 14 CC 59 3 ED B1 B6 Q6 BD QE CC 5B 3 』7E 
48CO 25 4E B1 46 22 4 BB O9 C6 10 3D 8B6 Q4 5B 69 61 : 4ACO ED 日 1 6 Q4 BD O2 20 23 4C 4C EC E6 34 Q4 AD CB sE1 
4BDO 69 E4 4A 26 FB 2Q0 D9 8B1 20 27 OB B1 2C 27 Q7 B1 :DD 4aDO さ EB ED B1 さ 5 Q2 QAD CB さ B ED B1 CC 20 2Q0 ED 1 39 :B1 
48EO 5D 27 Q さ 1C FE さ 9 1A Q1 さ 9 CC QO OO 6D 58B 27 Q ミ =:E ウ 4AEO 4C 4C Q6 E6 QaD CB さ E ED B1 20 EF CC 44 SQ ED B1 s1F 
48FO Q さ E1 BC E3 E1 ED 5Q 6F 59 1Q 日 ミ FF BO 2D OE 10 =:36 4AFO B6 さ AZ BO Bo Q3 BD EB CC 41 42 ED B1 B6 3 A7 』09 
Sum: 9E Q2 QOE FD F7 EC 98 3E BE DO BE 6C 56 39 4F ミ 4 :FB | | Sum: 67 2 67 94 9 CEA 6D 69 6 EB 47 1D 55 BA 94 3D zaO 
dd +O +1 | | dd +Q +1 + オ 2 + ォ ス +4 +55 +6 + プ + 日 +9 +Q +B + ビ +D +E +F Bum 
4900_ 83 QO | | 4EBOO BO B6 Q1 BD ビ ミ CC 4 さ 4 さ ED 1 B6 3 Q7 BO 6 OO sB4 
4910 32 62 4B10 BD CE AD CB = マ 6 0Q1 7 45 17 FO 4 6 07 AD CB :F ミ 
4920 3Q 25 4E2O さ B 6D 4EB 27 Q フ 7 6 O1 7 4F 16 FE D5 AE 48 Q6 B4 sa4 
4930 E4 E ミ 4E3O B1 7E 26 Q4 EC Q1 20 5B B1 16 26 Q6 EC 46 E3 Q1 』6a 
4940 OO 0O | 4E4O 2O 品 1 B1 BD 27 4R B1 17 27 47 A6 5D 1 Q2 27.06 saA 
4950 B1 42 4B5QO B1 O ミ 27 20 20 さ B Aa6 4 Aa7 BC OE A6 E4 1F A9 4 :67 
4960 17 02 | 4EB60 OF C4 FO さ 4 Q4 QA EO 1F Ba QO Q2 20 24 E6 Q1 1D :7B 
4970 39 4F | 4B7O E3 46 20 1F 6 O1 7 BC QE A6 E4 1F 9 B4 QF C4 sF 
498O 32 BC 4EBO FO さ 4 O4 QAQ EQO 1F BA QQO 0O2 20 06 EC Q2 E ミ 46 20 』ER 
| 499O F6 6F 4E ウ O 02 EC 46 ED 48 BD O1 さ E a6 DB QB B1 さ F 27 07 a7 s4D 
49QO QO QQO 4BQO 0 0 39 6 :CZ 
49BO QO QO 4BBO FD FF sE2 
49CO_ OO_QQ 4EBCO QO_ OO 』 さ さ 
49DO OO QO 4BDo QO 00 sgOO 
49EO OO 0O 4BEO QO 0O sGO 
49FO OO QO QQO soO 
| 
add +O +1 +2 + る +4 + 呈 +6 + フ + 日 | 
4aQ0 OO 32 BC F6 3 41 35 16 FD 
4Q1O Q1 9D 6D 4F 2E 07 26 1 ミ 1 
420 A6 BC さ B AD CB さる BE ED a4 6 | 
4Q さ O_ 20 Q さ さ 1 BC 1 AD CB 5O 39 | 
| 4QA40 2 2 2 20 2D 4E 65 79 2o | に に 








2 
Se 


ン 目 スキ ッ プ ・ プ ログ ラム 
固 坂 本 幸司 


FM-8 の ユー ザー で MP -80 か M B-27401 を 使っ て る 方 へ . 

デバ ッ グ 時 は か まい ませ ん が リス ト を ファ イル する 場合 
ミシン 目 が じゃ ま に な り ま す . そこ で , テキ スト 時 の 66 行 印 
1 インチ 紙 送 り し て ミシン 目 を 飛び 越す よう に し て や 
いち 
いち 切り 替え を る の も た い へ ん で す . この プロ グラ ム は BIOS の 
LPT OUT ル ー チ ン を 使っ て 5Byte の コン トロ ー ル ・ コ ー ド 
を 送っ て ます . リス ト の $681D か ら 2 Byte が 出力 デー タ ・ バ 
イト $681F か ら 出 力 デ ー タ で す . 簡単 な プロ グラ ム で 
す が , 以上 を 変更 すれ ば けっ こう 応用 で きる と 思い ます . 一 
応 リ ロケ ー タ ブル な の で 都合 が わる けれ ば 移動 し て くだ さい . 
頭 出し を し て プリ ンタ の 電源 を 入れ て $6800 を コー ル し て く 
だ さい . あと は , いつ も の よう に LPEZ] を 押し て くだ さい . 
プリ ンタ の 和 電源 を 再 投 入 す れ ば 解除 され ます . 


字 後 
り ま す . D IP スイ ッ チ の (2-4 ON) で も で きま す が 


2 
SD 


シン 目 ス キッ プ ・ ア セン ブル ・ リス ト Primammi 





CO010 


Oo0040 
QOQ0S5O 
QQoQ60 
OOQO70 
Q0QBO 
QOO9O 
Q010O 
QO11O 
QO120 
Q013O 
QO14O 
Q015O 
Q016Q0 
0017O 
Q018BO 
00190 
Q0200 
Q021O 
Q0220 





6BOQ 


680Q 
6B02 
ら 6806 
6808 
68QC 
6B1Q 
6B14 
6818 


6 昌 19 
681E 
681D 
61F 
621 
682 さ 


6BQO 


51 
BD 
1D 
BD 
BD 
BD 
9F 


O015 


Q010 
Q00C 
Go05 
FBFA 


QEQO 
Q002 
QQOQ5 
1B さ 2 
1B4E 
Q6 


680O 


よさ 3 


RGN 
DEA 
EYT 
DaT 


Na 
FT 
RG 


EQU 
TFR 
STX 
LDA 
DDa 
STA 
LEAX 
TSR 
RTS 


(EI ロ S LFT ロ UT) 


FDBE 
RME 
FDB 
FDE 
FDE 
FCBE 


END 


SKIP 
SYM 
も 6B00 


ドコ 

FC。 X 
DEA。PCR 
間 ま 1D 
DBA+1.PCR 
DBA+1 。PCR 
REN。PCR 

[ *FBFA] 


も OEOO 
| 

生 0005 
1B さ 2 
ま 1B4E 
まま O6 


START 
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< 有 FM-B 。// 成 多 万 チ ェ ン ジ ・ メ モ / 





マシ ン 語 入力 と いう の は 実に 大 変 な も の で す . その 能 率 
を 少し で も 上 げ ら れ た ら と 考え , この プロ グラ ム を 作り ま 
た: 

MIIIHIIIMIIIHIIIHIN 省 川 目 卓 用 省 目 用 唱 軸 上 省 旧 卓 目 川 上川 吊 則 旧 着 


1llMHMMIIINIHIIII 員 IIi 吊 提 則 則 上 削 唱 明和 卓上 四則 昌 四 軸 卓 昌 
⑯ キ ーー 入力 を し な が ら , チェ ッ ク ・ サ ム で その 正誤 が 確認 
で きる . 

@ASCII ダ ンプ 機能 が あり , 入力 し て いる プロ グラ ム の メ 
ッ セ ー ジ が 一 目 で わか る (1/O'82 年 9 月 号 の p.354, 5 の 
意見 に より 採用 ) . 

強力 な か エディット ・ コ マン ド . 

@F-BASIC の ROM は 一 切 使っ て いな い の で 
ョ ン に も 適応 . 

256 バ イト 単位 ($ XX00) で ポジ ショ ン ・ 
22TS 
の だ で: 

II 用 昌明 軸 昌 上 晶 卓上 目 則 四国 用 上 IIII 

コマ ンド 

川邊 INNIIIIIIMIIIIIHIMIlIl 唱 央 帳 由 軸 旧 前 
文 16 進 キー 配列 

U-MONITOR と 同じ です . これ が いや な 人 は $ 306 B 以 

後 を 変 た て くだ さい . $0 一 $F に 対応 し た ASCT 

ド が 入り ます . 

友 ペ ー ジ ・ ア ッ プ , ダウ ン 
軒 で 一 っ 前 の ペー ジ を , [ 民 で 次 の ペー ジ を 表示 し ます . 

文 カ ー ン ソル 移動 

1 ) [ 衝 で カー ソル を その 行 の 先頭 に 移動 し ます . 

2) SHIFT+ ( 韻 , [ 思 , [ 有 . 較 ) で .」 カー ソル を 上 下 左 右 

に 動か すこ と が で きま す . その ペー ジ の 上 限 。 下限 を オー 

バー する と ペー ジ ・ ア ッ プ , ダウ ン を 行ない ます . 

文 各 モ ー ド 変更 

1 ) [INS[ は F-BASIC と 同じ 使い 方 を し ます . 

2 ) [SI で キー 入力 時 に 音 を 出す か どう か が 選択 で きま す . 

あま り 大 き な 音 で は な い の で す が . 

3 ) [で その ペー ジ か ら の 抜け 出し の 禁止 。 許可 を 切り 換 

えま す . た だ し , これ は その ペー ジ の 最後 の 1 バイ ト の 下 

位 を 入力 し た と き に 次 の ペー ジ に 移る か どう か と いう スイ 
2 です 
娘 そ の 他 の エディ ッ ト ・ コ マン ド 


どの バー ジ 


イシ ディ ペ ジ 


コミ ュー 





が 


R | で その ペー ジ を $00 で 埋め た の ち . 














キー 入力 ルー チン を 
サ プ に 転送 


各 サ プル ー テ チン に 


ジャ ンプ 






カー ソル の バッ ファ ・ ア ド 
レス 。 アト リピ ュー ト ・ ア 
ドレ ス , VRAM アド レス 
を 設定 


カー ソル を ブリ ンク 
させ る 


カー ソル ・ タ イマ を 





HOME | で カー ソル を ペー ジ の 先頭 に 移し ます . 


先頭 に 移し ます . 


2 ) 





4 つの キーIEL|, IDUP|, |BS |, 





























きま す . 機能 は F-BASIC と ほぼ 同じ し です. 
廊 ア ドレ ス 入 力 
町 で アド レス を 入力 する こと が で きま す . 16 進 ($ AF) 


















CLEA 


カー ソル を ペー ジ の 


DEL|, で 行 単位 の 編集 が で 


を 入力 する と き は フル ・ キ ー の A 一 F を 使っ て くだ さい . 
娘 RET BASIC 
[R 條 使い ます . 本 プロ グラ ム で は PF キー の 使用 が 可能 
で す が , PF キー の 定義 は BASIC で 行なっ て くだ さい . 
廊 お まけ 
[中 と いう 拡張 コマ ンド を 付け まし た . $35F 3 に 飛ば し 
ます が 現在 は RTS が 入っ て いま す . ご 自由 に お 使い くだ さ 
い . 
川 川 川上 削 中 上 山 川 人 川中 間 由 II 利 上 着 利 旧 MI 利 中 


プロ グラ ム 








ソース ・ リ ス ド を 公開 選 ま すす 。 プ ログ ラム を 作る と き は , 
僕 の ラベ ル の 付け 方 を まね し な い 方 が 不 難 で す . 
も 多い 方 が …… N 

* カ ー ソ ル の 出る 女 字 入力 ルー チン 


が も る ト 

















s 。 DaTA AND MORF AREA 
まさ OOO 

ENT NaIN 
YOEI さ 
MaDFR 。 1 
DR. 2 
STROF 須 

00 各 STR1F 2 

OOER COUNT :RME 1 

QO0C REG iRME 1 
SUMO _ iRME 1 
SUN1 16 
STRO 5 
STR1 16 



















2C2ESD 









































ECGTEI_:FCC 





/012 さ 4567 ヨ 9 。 キー/ 


GO1 ミ QD2E1C FCE ま D。 ま 2E。 ま 1 ビ 
0014 49 CHDTEL:FCE "1 
OQ15 Q22 FDE CADF IN+ ま CE 1 
1E FCB  $1E 
F Q2CO FDE FABEU+ ま CE1 さ 
018 dE FCE ま 1F 
Q019 Q2CB FDE FAGED+ ま CE1 ミ 
901 全 5 FCB  『P 
Qoo1E Q2SE FDE FAGE+ ま CE1 ミ 
001C 5 ミ FCB “8 
mnQ1tD FDB SOUND+* ま CE1 ミ 
QO1E O6 FCB 6 
QQ1F OS76 FDE CURSR+$CE1 ミ 
OQ2GO Q2 FCE 2 
1 Q28f FDR CURSL+ ま CE1 さ 
る 19 FCB ま も 19 
* さ Q2A2 FDE CURSU+$ ま CE1 さ 
Q024 1 FCE ま 1 
0025 Q2E2 FDE CURSD+*$CE1 ミ 
QO026 CE FCE  $E 
Q26 さ FDB CHUNME+ ま CE1 さ ス 
1D FCE ま 1D 
Q2e6E FDE HEADL+ ま CE1 さ 
QB FCE 
QSE2 FDB EACKSQ+ ま CE1 ニ 
ルー FCE  $7F 
Q さ EQ FDE DELQ+ ま CE1 さ 
OO2E 12 FCE も 12 
QOS2F Q254 FDE INSRT+$CE1 さ 
Q5 FCB 5 
FDE ERASEQ+ 和 CE1 ユ 
FCE  $11 
FDE DUPQ+ ま CE1 さ 
FCB, * 己 
FDE  CLEQR+ ま CE1 さ 
FCE “*R 
FDE REASIC+* ま CE1 マ 
PEB: そそ 記 
FDR EXCMD+$ ま CE1 さ 
DINIT :FCB 1.。0。40.25。 呈 。0。0。1。1 
CUNSC :FCB 12。 2 こ 
ミ 3QBF 品 11201Q1 GET  :FCE 4。5B。 ま 12。1。1 
ミ QC4 4D656D6F プ 2 FCC  /Memory / 
792Q 
QQSE  QCE 4 さ 6B616E6 ア FCC  /Changer 。 / 
65722020 
OO03F さ GD4 5665722E さ つろ FCC  /Ver.2.1 が 
2E ミ 120202 の 
さき QDF FCC  /By ユー ミノ 


| oo4O 





EQECDE 





&O 


々 ある の で そこ の フロ ー チ ャ ー ト を 書い て お きま す . 
川 NIIHIHMIHIIIIINil 則 面前 赴 中 軸 卓 川 卓 出前 前川 吊 貞 出 吊 上 貞 卓上 因 | 吊 


最後 に 


堤 MI 上 削 由 I 中 川上 省 中 川 省 骨 中 川上 骨 卓上 出 唱 削 川 唱和 川 削 帳 則 員 IM 吊 吊 | 9 
この プロ グラ ム が 大 い に 使わ れる こと を 望み ます . FM- 
8 を も っ と 活用 し よう ノ 
避 参 考 文献 
1 ) “U-MONITOR",1/O.'82 年 6 月 号 
2) “サブ システム ・ モ ニタ ソー ス ・ リ スト ", FM-8 活 
用 研究 , 工学 社 


3) “1/0 プ ラ ザ ".I/O,"82 年 9 月 号 
















FCE 


496E707574 FCC  /Input addressi / 

















2041646472 
7 ミ 7 こ ミ 620 
904 ミエ 118 ア 7 FCE まま 11。$ 日 7 
OO44 ミエ ュ F YaMA  :FCBE まう F 
ng15 ーー さ QOFC 59414D4155 FCC  /YaMAUCHt/ 
4 ミエ 4849 > 
OOo46 。 さ 104 91D こ 9 こ | FCE 91 、 ま D そ さま 9 そま CO。 OO 。 ま 2E 。 和 90 
QOS2E ラ 9 ウ 
・・TROE:EDU DOQGQ 
・CURTM:EDU ま DO1E 
CURSET:EDU ED94 
CURSCL:EDU  $ ま ED 
CURG :EOU  $EDEZ 
INSENT:EDU  $EABF 
KEYGET:EDU ま FDBE 
FEYRS :EOU  $FDDE 
CMDFRNM:EOU まま DSB ユ 
MjTH CUFRSGFE BILTNI 


3 EEY INPUT 





















QC EDFDDE KEYIN :JSR KEYR2 iDUHMY FEaD 

EDED94 JSR CURSET 

こ G3C16 LERX … ド TNQET 。FC 

FOO STX “IROE 

日 691 LDR 揚 1 

971E ST ・CURTN 

EDEDE プ JSR CURGQ 

1CEF NDC 間 ま EF ュ sIFRG ENaEILE 

EDFDGE SR FEYGET 

1A10 ORCC 拉 ま 1 

STD CMDFRI siFEYDSTa 
OOEE CITPA 手 委 12 sa INSERT 人? 
QQ5F ENE _ ド FINaET 
D06 け NSR 
One 1 ド INRRTsLD デ 
062 STX 
QA ミ JIF 
に と 】 DERASE : FCE 
oo655 FUTD  sFCE 
nO6 ら 6 FCC + さ = + 生 / 
QQe ア FCC _ / + ロ + ら 6 + プ TB ユウ + 全 キノ 
QQ68 FCC  /E +C +D +E +F Sum aaZ 
FCC  /scii/ 











人 得 生 挫 を 
UTFUT: rag = SCII CODE 


170122 JNEEY ま :LBSR HanLT 














QQoF さ 182 さ QBDFF75 LERX Yaa。FC 
QQO79 。 ミミ 186 C6Q99 LDE 持 9 
GG ア 1 :18 170124 LESR MOVE 
07 つ 。 こ 18BE CC ミ CO し DD 9 ミネ CO 
QQ7 ミ ミミ 1BE EDC1 STD 。。U++ 
oo74 。 さこ 190 CCOG9QO LDD 折 も 9G 

ミ EDC4 STD  。U 


LESR SUEGS。 














ロ Q0 フ BE 


あー ニー ニーダ ーー ーー ニー ニー 





1eQ3 18 LBRa 





17010 LBSR HALT 

E6FCB LDA  * ま FC ヨミ 

CeBQO LDE 埋 和 ま BO 
Q07a F フ FCBG STE 








&O 


MEMORY CHANGER アセ ンプ ブル ・ リ スト 











QOB ミ 
oo84 
908 
0:73 
Oo08B ア 
Oo88 
GOQB ワ 
GO8 人 a 
GOBE 
ロ QO8C 





AZ だ だ 】 
09C 
OO9D 
609E 
O97F 
II72LI】 
01 
CYS 
Rmd 
09a4 
0^ 王 
Ooa6 
00 人 AZ 
60 は 
0 
OO 人 
9OaE 
Q08C 
GO08D 
QOAE 
ORaF 
90EO 
OOBt 
00H2 
OO0E ユ 
OOE4 
QQE 
OOE6 
90BEZ ア 
OQOE 
QOE ウ 
OOBEQ 
OOBE 
OOBC 
QOED 
OOEE 
QOBF 
QOCQO 
Q0C1 
GOC2 
QQC ユ 
QOC4 
QoC5 
OOC6 
QQ0CZ ア 
OO0C8 
Q0C 
GOCa 
QQCBE 
oOCC 
GoCD 
GOCE 
9QCF 
QODO 
QQD1 
9OD2 
Q0D ユ 
QooOD4 
QoD5 
GOD6 
QQDZ 
GOD8 
OOD 
GOODa 
GODE 
GODC 





QQDE 
QQDF 
OOEQ 
QQE1 
OOE2 










っ QBDFFQOG 
1F1O5 
1FGB 
8D4 こ 
BDCD 
C6Qo4 
DSoE 
279F 
C681 
F7FD5 ニ 
BEQOBO 


C 301F 


2 26FC 









こ 1F ミ 
31F ミ 
さ 1F ミ 
さ 1F マ 
ユ 1F5 
31F フ 
1FE 
さ 1FD 


=20o 





さ 250 
さ 252 8D| 


254 
さき 256 
258 
うさ 25E 
25D 
こ 25F 
さ 261 
さ 26 ミ 
ミ 265 
さき 267 
326E 
ミ 26D 
ミ 26F 
ミ 271 
さ 27 ミ 
さ 275 
さ 277 
3279 
327E 
327D 
ミ き 27F 
ミ 28B1 


7FFDO ミ 


さ Q02 
ia121 

26FZ 
20C5 
1F5O 
EE4 
DB8E 
30ED 


8594 
全 7OE 


さ QBDFER9 


C609 
1700A4 
17OOaC 
170OE 
C60OS 

17QQ99 
170Oa1 








に 63C 
17009 フ 7 
1700 さ 
1E12 


さ OBDFE5 ミ 


C6099 


3 BDZ7F 


17008 ア 
Be5Q 
EZFCB4 
7FFCB9 
17o08E 
1E12 
C60 ミ 
BDeB 
8D74 
17008QO 
C645 
BD62 
8D6B 
BD78 
17016 フ 
16O204 


BDS56 
さ 41O 
C63C 
SE 
BD68 
BD4C 
CEFCB ミ 
6DC4 
2704 
3510 
20EBE 
ささ 4 ミ 


ECC1 


108 ミ 19Q 人 A 


26FS 
ECC1 
BDQOC 
970Z 
ECC4 
DO6 
4FQ 
9708 
さき 5CO 
BDOE 
さ 404 
C61O 


さ OBDFEaO 


Ma 1 RN 


< av es 


IN  :LEaX 
TFE 
TFR 
ESER 
EHDTN :ESR 
LDE 
ETITE 
EE 
LDE 
STE 
LDX 
LEAX 
ENE 
CLR 
LEAX 
CLRE 
CHFA 
ENE 
LESR 
ER 
INCE 
CMFE 
ENE 
LEAX 
LDE 
CMPA 
EEG 
LERX 
DECE 
FINE 
ER 
CIDJFF': TFER 
LDX 
JSF 
ERR 


1 二 、 入 9 2 


と CE 


NIT szLDR 
ST 

LERX 

し LDE 
LESER 
LESR 
LESR 

LDE 

LESR 
LESR 
LESR 

ESR 

LDE 
ILBSR 

LESFR 

EXG 

LERX 

LDE 

ESR 
LESR 

LDAa 

STAa 

CLR 
LESFE 

EXG 

LDE 

BSR 

BSR 
LESR 

LDE 

ESR 

ESR 

ESR 

LESR 

LERA 
RADRINO: ESR 
FSHS 

LDE 

ESR 

ESR 

BSR 

LDU 

TST 

EEG 
RDRERR: FULS 
ERA 
DRIN1 :LERU 
LDD 
CMPD 

ENE 

LDD 

ESR 

ST 

LDD 

ESR 
RNDa 

STa 
FULS 

ENCGO :EBSE 
FPSH5 
LDB 


RBJUmnk 5 ME 


ー256。PC 
X、D 

人 DF 
INIT 
TNEEY ま も 
4 

<REG 
+15 

菩 ま 日 1 

まま FDO ミ 
共和 ま は OO 
ー1。X 

ー4 

ま FDO ユ 
ECGTEL 。FC 


が 


紀 


MCGO 
CMDTIN 


幕 16 

ー14 
CMDTEL 。FC 
革 ま 1 エ 

ュ メ + 
CMDJIF 


2。X 


-9 
CMDTN 
FC、D 
二 : 
DX 
CMPIN 


人 し 


4 
REG 
DINIT。FC 
9 
HALT 
MOVE 
SUES。 
が 4 
HALT 
MOVE 
SUES。 
DRTINO 
た: 
MOVE 
SUES。 
X。Y 
DINTT。FC 
草 5 
HALT 
IMOVE 
間 晶 ウ 
FCB4 
まま FCB マ 
SURS 。 
XY 
か 3 
HAILLT 
MOVE 
BLUES。 
6 ワ 9 
HALT 
IOVE 
SUES。 
DUNFO 
CHOME 


HALT 

X 

昔 60 
NOVE 
SUES。 
HALT 
井 ま FCB ユ 
・U 
DRIN1 
X 

RDR TO+ ニ 
さ U 
、U+ キ 
幕 ま 190 
DRERR 
ェ ・U+ キ 
BNCGO 
る DR - 
・ け 
ENCGO 
章 ま FOO 
SADR.+1 
U。FC 
ENCG1 
E 

若 ま 10 


QQE ミ 
OoE4 
QoOE5 
QoE6 
OOE ア 
QOEB 
QOE 
QOEA 
QOEER 
OOEC 
QoED 
QOEE 
QoEF 
QoFQ 
QQF1 
OOoF2 
COF ユ 
OOF4 
CoOF5 
ooF6 
QQF ア 
OoFB ミ 2Q4 7DFDQOS 
QQF9 ミ 27 2EFE 

B680 

B7FDQ5 








O0FF 
910O 
Q1O1 
O102 
10 ミ 
0104 
910 
O106 
Q10Z 
6108 
01Q09 
O10a 
91GE 
O10C 
GioD 
Oo1OE 
Q1OF 
9119 
Q111 
0112 
911 さ 
Q114 
ロ 115 
9116 
Q11Z 
Q118 
Q119 
9118 
911E 
011C 
911D 
011E 
911F 
0120 
0121 32EE 1FB 
0122 32ED C12O 
012 え 


5 





0124 

Q1255 C17F 
0126 27FA 
Q12Z E7CQ 
9128 DFoE 
Q129 DEQ9 
9128 20CE 
Q12E 

Oo12C 

Q12D 

Oo12E 

Q12F ささ BDFDS5B 
0Q13O DFOE 





01 さ 1 ユミ Q5 ミミ CBC5 
01 ミ 2 ささ OB さ 18DFDO4 
01 = QFQF 

01 マ : 1F1QO 
0135 ミミ さ 10 BDEE 
01 ミ 6 。 ささ 12 1F1O 





Q1 ミ フー ミミ 14 1F58 
01 さ BB ささ 16 8BDE5 
Q1 う 9 DCO 
Q1 さ 人 6B4 
091SE DC 
913C 684 
013D EQF 
913E 97Q0F 
01 ミ F 6BQ 
0140 C602 
Q141 DS5oOE 
01 42 26Q04 
Q14 ミ ERa4 
90144 4y4<19 
1 4 BDaE 
Q146 1F1O 
0147Z C4QoF 
Q14 晶 26E2 
G145 BDA ミ 
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NMUL 
STE 
FULS 
ESFR 
Ra 
RTS 
ENCG1 :SUER 
ECS 
CMF 
ECS 
UE 
CIFA 
ECS 
CHF 
ECC 
ENCGRT: RTS 
ENCGER: LEAS 
ERAR 


SUE SYSTI 


エー 


IALT szTST 
EMI 

LDA 

STA 

RTS 

MVE iLDU 
CLR 

CLR 

LDa 

STa 
DECE 

ENE 

RTS 

SUES. sCLR 
RTS 


日 

HEXSQ 』CMPA 
BLS 
ADDA 

HEXS1 』aADDA 
STA 
RTS 

HEX :PSHS 
LDB 
MUL 
ESR 
PULS 
ANDA 
ERA 


SKIP2 kLDE 
FCB 

SKIP1 z:LDBE 
LDA 
STA 
DECE 
ENE 
RTS 

日 

ASC s STU 
LDU 
TFR 
CMPE 
ECC 
LDE 
CMFE 
EEG 
STE 
STU 
LDU 
ERA 


DISPLAY 
INFUTs 


De ee 


TRSQ_:LEaU 
STU 
LEAU 
LEAY 
CLR 
TFR 
ESR 
TFR 
TFR 
ESR 
BSR 
STRS1 :LDA 
ESR 
LDA 
ADDA 
STA 
LDA 
LDB 
BITBE 
BNE 
RaDDA 
STA 
ESR 
TFR 
人 NDBE 
BNE 
BSR 


YOEI 
人 
BNCG1 
YOEi 


井 ま さい 
ENCGER 
41 
BNCGRT 
井 ア 

た 21 
ENCGER 
寺 ま 1 
ENCGER 


4。5S 
RADREFF 


EN CONTROL 


ま FDO5 
HALT 
も B 〇 
まま FDG 


# ま FCBO 
ょ U+ 
・U+ 
ュ X+ 
・U+ 


ん 


まま FDQ5 


草 9 
HEXS1 
幕 ア 
幕 委 さ O 
sU+ 


全 
共和 10 


HEXSQ 
1 

幕 名 OF 
HEXSQ 


トゲ 4 
まま B ビ 
菩 1 
間 委 20 
sU+ 


= 


SSTROP 
<STR1P 
Ra。E 
若 和 20 
+2 
社 委 20 
幕 委 7F 

ー ら 6 

ょ U+ 
SSTR1FP 
SBTRQP 
HEX 


STRING SET 
Xreg = TOF ADDRESS 


STR1 PC 
< く STR1IP 
ー59。U 
SUN1 , PC 
SSUNO 
X,D 
HEX 
X。D 
BE,a 
HEX 
SKIP2 
sX 

SC 

・X 
SSUMO 
<SUHQ 
ュ メキ 

2 
SREG 
+4 

が 

sY+ キ 
SRKTP1 
X。D 
井 委 OF 
STRS1 
BETF1 











014a 
ロ 14E 
Q14C 
Q14D 
014E 
914F 
915Q 
151 
0152 
Q15 さ 
9154 
1 
0156 
Q155Z 
90158 
り 159 
915a 
G1SE 
Q15C 
91SD 
01SE 
15F 
Q15O 
1 る 1 














917 呈 
Q176 
917 ア 
9178 
179 
Q17 人 8 
Q17E 
17C 
917D 
Q17E 
617F 
0180 
91B1 
90182 
G18 ユ 
Q184 
Gi 
16 
り 1 は ア 
9188 
Q1B9 
01 ピ 8 谷 
18E 
Q18C 
QG18D 
18E 
QiBF 
Q19Q0 
191 








96QF 
BDBF 
209 人 8 


BDED 
17FF5F 
ささ BDFCD7 
108BEFCBO 
6FAQO 
CCBO64 

= EDAa1 
C64E 
EZ7RO 
COO ミ 
Re6CQ 


全 7O 

5 CC118Z 
EDA4 
16FF51 





rOBDFC9F 

96GE 
BAQ2 
97QE 
SBDB6 

7 960E 
B4FD 
97OE 
CCQOQO16 

っ BD4 ッ 
17FF1D 
< こ BDFC9 ラ 
10BEFCBO 
6FAO 
CCOQ64 
EDA1 
Ce3E 
E7Ao 
CC5375 
EDa1 
CCeD2Q 
EDa1 
C6 さ 7 
6CO 
7RO 
5a 
26F9 
16FFOE 





CCQOQQ05 
BD18 
Ce10 
D7on 

さ 18DFCS ミ 
6FRO 
5a 

ご 6FEE 
9E0Z 
17FFZ ウ 
QaGOD 
S6F9 
SQOaQ 














1FQO ミ 
10BEFCBQ 
17FECE 
SFaO 
CCBOQ ミ 
EDa1 
CCO512 
EDA1 
EFA1 
CC118Z 
EDa4 
16FED2 
108EFCBQ 
17FEE1 
SFAQO 
6FQO 
860 ミ 
7RO 
CCO ミ 12 
EDA1 
9606 
B4QF 
C60 ミ 

さき D 
CEO6 
GDOE 
SEBG1 





91EGO 所 2| 


LDA 
ESR 
ERR 





日 
LDISFO: ESR 


SSUNO 
HEX 
SREIP2 


LINE DISFLAY 
INFUT: Xreg = TOF ADDRESS 





STRSQ 

LESR HALT 
LEAU_ STRO。FC 
LDY 間 要 FCBO 
CLR  。Y+ 
LDD  ## 多 BO64 
STD 。 。Y++ 
LDE 提 和 ま 4E 
STB  。Y+ 
SUEE 半 さ 

LDISF1:iLDA  。U+ 
STA  。Y+ 
DECE 
ENE  LDISP1 
LDR 半 OD 
STA  。Y+ 
LDD 拉 11HZ 
STD .Y 
LER SUES。 

日 

ェ SUI4 DISFLaAY 

SBDISFOgLERX SUI1 。PC 
LDA REG 
ORA 音 っ 
STA 
ESR 
LDA | 
PRNDn 音 ま FD 
STA FREG 
LDD 22 
ESR LOC. 
LESR HALT 
LEAU STRO+4。FC 
LDY 音 $FCBQO 
CLR  .Y+ 
LDD 埋 委 る 4 
STD  。Y++ 
LDE 村 ER 
STB  ,Y+ 
LDD 拉 司 き 7 品 
STD 。。Y++ 
LDD 提 村 6D2O 
STD  。Y++ 
LDE 幸村 ミア 

SDISF1:LDQ  。U+ 
に 1< 0 菩 fgd 
DECE 
ENE SDISF1 
LERR SUES・. 

HH 二 記 > 茹 コ 害 、 輸 > 婦 4 DUMF 

DUMFO :LDD ##5 
ESR LOC. 
LDE 蘭 ま 19 
STBE CUNT 
LEAY SUN1 。FC 
CLR  。Y+ 
DECE 
ENE  -55 
LDX AaDR. 

DUMF1 :LESR LDISFQO 
DEC “COUNT 
ENE DUMFL 
ER SDISFQ 

H 

s 。 CURSOR SET 

LUC。 。 sTFR  D。U 
LDY 拉 ま FCBO 
LESR HLT 
LR 上 
LDD 革 ま BOO ミユ 
STD 。。Y++ 
LDD 間 ま 512 
STD 。。Y+ キ 
STU 。 。Y++ 
LDD 昔 寺 11 日 ア 
STD 』Y 
LERA SLUEGS。 

SETCUR:LDY 。 和 ま FCBO 
LESF_HaLT 
CLR  。Y+ 
CLR  。Y+ 
LDR 昔 ミ ・ 
STA  。Y+ 
LDD 持 ま さ 1 
STD  。Y++ 
LDA MADR。 
nNDR 音 ま OF 
LDE 持 さ 
UL 
DDE 苦 6 
TST SREG 
ENI  +1 
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MEMORY CHANGER アセ ンプ ブル ・ リ スト 


































40D 5C INCE 
4Q0E E7AO g 宙 維 - 2Y キ 
1HB こ 410 9606 LDR MADE。 
ロ 1E4 ミ 412 C610 LDE 半生 1 
Q1E5。 ミコ 414 3D TUL 
G1E6 こ 415 BBO5 RRDDR 提 呈 
q1EZ ーー 417 7 ム 4 STA  .』Y 
1EB 15FER で LERA SUEG。 
Q1EO 5 
G1EA 16FDD8 CADFRINiLERRR TNIT+4 
G1EE RE6STCECLR 
Q1EC TFR  @、DF 
GSD LE DIHIT、PC 
G1BE LDE 9 
り 1EF 17FE79 LESR HALT 
G1CO 17FEB1 LESF MVE 
91 じ 1 Be5O LDR 半 BO 
ロ 1 に で E ァ FCB4 STR ま FCB4 
5 CCOO1S LDD 。 拉 S 王 
FDFCB6 BTD ま FCBS 
GC1C5 7FFCBGn CLR ま FCEA 
で 1 じ 6 LESFR SLEG 。 
q1C ビ アァ PULB X。EC 
01CB 51 INSFT :LDa 音 1 
G1C ウ ュ 98GOE MDDECG:EHRR SREG 
Q1Cg ヲ 70E STA FEG 
Q1CE RI/ FT 
B608 FAGE 。 iLDR 提 昌 
SOF ア IHOECG 
日 50 人 4 SUND れ 】 
20F さ MDECG 
G1DGO nFOG CHONIE MD 。 
GiD1 2 6QE SREG 
1D う BBo JR 芋 ま は 0 
J10 ミ 70E ST SREG 
G1D4 16FF91 LERA SETCUR 
G1DS 9606 HERDL :LDa MaDR。 
G1D6 4FO RIND 人 RA 間 ま FG 
Q1DZ 706 BTR  sMRDR. 
ロ 1D ヨ 2QOEF ER CHOME+2 
G1D9 : B6BQ CURSR :LDR 持 BQ 
Q1Da BDDC ESR MODECG 
GiDE SB ご EFPL SETCUR 
91DC QCOG6 1NC MaDFK。 
QtDD 9606 LDR MADR。 
91DE 84OF NDR 半 ま OF 
QtDF 1026FF79 LENE SETCUR 
G1EQ 『 9606 LDA MaDR。 
1E1 SO2E ERA CURSD+6 
O1E2 。 ユ 477 B68Q CURSL :LDRG 間 和 ま BQ 
QG1E さ 。 ミ 479 BDCB ESR MODECG 
D1E4 さ 47E 1Q02RFF6D LEMI SETCUR 
Q1E5 。 ミ 47F QAQO ら DEC EMRDR。 
Q1E ら 9606 LDA MADR・ 
O1EZ B4QF RNDR 提 村 OF 
GiEB B1QF CMF 半生 OF 
Q1E9 1926FF ら 1 LENE SETCUR 
1EA 9606 LDA MaDR 
GtEB SQQ6 ER CURSL+ ム 6 
Q1EC 9606 CURSU :LD 、MADR。 
QiED BoO1Q SUIEA 提 和 ま 10 
O1EE さ 97C6 ST SMaDR、 
Q1EF B4FQ RNDR 半 ま FO 
G1FG 81FO CMFP 半 和 ま FO 
G1F 1 10C6FF4F LENE SETCUR 
2Q00E ERR FAGEU 
606 CURSD sLDa MaDF . 
BE1Q ADD 持 ま 10 
る 9706 STA <SMADR。 
5 4FO RNDR 拉 和 FOO 
1026FF41 LENE SETCUR 
2008 ERR FAGED 
QAQ ア 7 FaGEU :DEC DR。 
17FEFE LESER DUMFO 
16FF コ ユア LERa SETCUR 
QCGZ ア FAGED :iINC DR. 
17FEF6 LESR DURNPQ 
16FFSF LBRA SETCUR 
EQZ CELERR :LDX DR・ 
5F CLRE 
6FBQO CLR  。X+ 
に 】 DECE 
26FE ENE  -55 
17FEEB LESR DUIMPG 
2086 ER CHINME 
D7x FNCSBO  :BTE SYOEI 
に 9 LESR 呈 IMIT 
EITA 1 
2 BNE INSQ 
Ci21 : BB8o EURR 間 晶 り 
Q2oE ュ 2E1 さ EMI  HCG1 
Q2QC 97 ST SREE 
20D or LDR YOET 
Q2OE Cg LDH 幸村 1G 
=D MUL 
全 68B4 LDA  』X 
84QF fRNDR 音 委 に 
784 ST  。X 
ERB4 CRE  。』※ 
EZ84 BTB  。 メ 
20GO ER DCGEN 
伯 ら 時 FNCG1  :LD メ 
4FQ naND 
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MEMORY CHANGER アセ ンプ ブル ・ リ スト 








72Tge fA YQEI 
7B4 STA  。X 
8D46 :ESR DCGN 
950E LDA REG 
5o8 EITR 拉 
で 706 REQ 6 
D6Q ム 6 LDE MGDF:。 

COHE 

ENE 1 

FTS 

LERA CURSER 
TINSQO  :TSTA 

















BEPL 
LDn YQETI 
LDE も 1G 









Q22 YEr 
Q22 INGE1 
Q22a 5 
Q22E TFR RB 
RND # ま F ロ 
ORR YOETi 
STA  。X+ 
LDR 拉 箇 10 
NMUL 
D70 ミ STE YQET 
1F19 TFR。 X。D 
C4GQF RNDE 提 第 
27CE FEED MCG2 
旭 684 INS1 siLDR  。X 
C61 の LDE 拉 箇 15 
3D NMUL 
0 ミネ RA YOETI 
人 78BQO ST  。X+ 
D7o ミ STE YOEI 
1F1QO TFR  X。D 
C4QF RNDE 本 ま F 
ゝ 26EF ENE INS1 
8DQ ミ = ESR DCGN 
16FF29 LERA CURSR 
Q240 9606 DCGM  :LDA MADR. 
Q241 C61Q LDE 提 19 
Q242 3D NMUL 
Q24 さ 1E ヨ 9 EXG  a.E 
Q244 4F CLRA 
Q24 王 2 CEQO5 RDDE # 品 
0246 17FEB6 LESR LOC. 
Q247 EQZ LDX RDR. 
024 昌 D6Q6 LDE :MaDR・ 
0249 C4FQO RNDE 間 FO 
024N 21 EX 
Q24E 17FDEF LESR LDISFG 
Q24C 17FE19 LESR SDISFO 
Q24D 16FE95 LERA_ SETCUR 
Q24E EQZ SiNIT siLDX DKR、 
024F D696 LDE MaDR- 
Q25QO C4FQO RNDE 提 ま FO 
0251 21 AEX 
0252 ミ 18DFARE LEAY SUM1 、FC 
Q25 ミ CS1O LDE 村 $10 
Q254 SR4 LDA 4Y 
Q255 aQBo SUBR 。X+ 
Q256 ZAQ BT 全 ツモ 
Q25 フ 7 5a DECE 
Q258 36F ア FENE  - 
Q0259 EQZ LDX DE . 
025A DeQn6 LDE MADF 











Q25E 
Q25C 
Q2S5D 
Q25E 
Q25F 
Q26o 
Q261 
Q262 
Q26 ミ 
0264 
Q265 
Q266 
Q26 ア 7 
Q268 
Q26 ワ 
926 
Q2oB 
Q26 ヒ 
Q26D 
Q26E 
Q26F 
Q27Q 
ロ 271 
Q272 

















































=A ABX 
96QE LDA <REG 
さ 9 RTS 
BDEO ERASEO: ESR SINIT 
2EQC EMT ERASE1 
A6B4 EDAA 
B4FQ RANDA 半 F ロ 
AZBO STA  ,X+ 
1F1O TFR ァ 。D 
C40F RNDE 
* 27B5 BED DCGN 
6FBQ ERASE1:CLR  、X+ 
2oF6 ER -10 
BDCC DuFo SINIT 
SE14 DUF1 
Ae1o LDaA -16.X 
B4QF PND 人 
E684 LDE  .。X 
* C4FO RNDE # ま FO 
E784 STE  、X 
RaB4 QRA .* 
a78o STA  、X+ 
1F1Qo TFR  X.D 
C40F 人 aNDF 昔 F 
2799 EEQ DCGN 
A610 DUF1 :LDA -16.X 
: 7ZBQO STA  、X+ 
soF4 ERA  -12 
SDaE DELO  :ESR SINIT 
2A07 BEPL DEL1 
aoB4 LDA 。X 
Ce10 LDE 匠 衝 10 
=0 MuL 
E7B4 STE 、X 
AGB4 DEL1 :LDA 。X 
B4FO RND 区 FO 
7B4 STA  。X 
1F10 DEL2 :TFR X。D 
C40F RaNDE 
C1oF CMFE せま 
35EE 1Q27FF78 LEEO DCGM 
35C2 A601 DA 
<5C4 Co10 LDE 半 和 10 
35C6 <D HUL 
=5C7 AAaB4 QRA .X 
a7BQ STA  、X+ 
E784 STE  』X 
20E9 BRA DEL2 
BDB6 BaCRSO: BSR SINIT 
2Bop EMI EACFS1 
・ BBBO ER 半 撮 BQ 
97OE STA “REG 
AE4 LDA .y 
LDB 10 
PUL 
STE ,X 
ERn 。 DEL2 
EACKS1:LDB MADR・ 
ANDE #$F 





BED EACRS2 

DEC MADR. 

ERR せま BO 

STa REG 

LEAX 一 1。X 

ER DEL1 
EQCES2: LERR DCGIT 
EXCMD :RTS 








実は サブ プ CPU の 方 の ROM を 使っ て いて そこ で 横 走 し 
ます . 変更 は $310C か ら 22 バ イト を リス ト 1 の よう に 変更 
し ます . すこ し 手抜き を し て いま す が こ れ ぐ らい の 変更 
で 動き ます . $3075 番 地 か ら リ スト 2 の よう に すれ ば , 

ンー の が Ar22E な な め 
ま 39> 








人 d+ 4 
さ 075 2 人 SFTSH 2D 3D 2C_ 45 











EID 


) 


1 


EDFD る 6E 


EEYIN: JSBR 
LD 人 
JSR 
JR 
MO) : 
EMF 人 a 状 事 1 史 
ERNE 第 311 
RT5 











エディ イダ ・ ア セ > 





*82 年 5 月 号 の 発表 後 , モ ニタ を 自作 し て オー ル RAM で 
動作 する よう に し て 使っ て きま し た . 最近 , 大 き な プ ログ 
ラム を 作っ て いる と , どう し て も エディ タ 関 係 が 使い づら 
くい らい らし て きま す . 

た と えば , 後 で コメ ント を 加え た いと か ラベ ル を 加え た 
いと か 1 文字 間違え て いた な ど , 初め か ら 入 力 せ ね ば な ら 
ず , へ た を する と 関係 の な い 行 まで 削除 し か ね ませ ん . 

FM-7 も 出 た こと な の で , この 際 両 者 共通 に 使え る バー 
ジョ ン と し て 機能 アッ プ し まし た . 操作 は 前 回 の バー ジョ 
ン を ほぼ 完全 に 受け 継ぐ で よう に し まし た . 改善 点 は 主 に 次 
の よう に な り ま す . 
オー ル RAM 動 作 可 能 
スクリーン ・ エ ディ ッ ト に よる 変更 可能 
ラベ ル と ステ ー ト メン ト No の クロ ス ・ リ ファ レン ス 出 力 
⑳ サ ー チ , コピ ー な どの コマ ンド 追加 


テキ スト の 入力 ら ア セン ブル 


$ 4000 か ら ス ター ト さ せる と , シス テム の 状態 が 表示 さ 
むれ ます. 初め ば は S コマ ンド で テキ スト を クリ ア し て くだ さ 
い 。 思 まだ は 10 ヨ コマ ンド で イン サザ サート“ モデ ド に な り ま す . 


| am 8 
ORG $1000 
START : CLR DATA, PC : イニ 
> 





ンコ ン ル 05 ン < 





まず ORGC を 指定 し な いと 0 番地 か ら ア セン ブル する の 

で , BASIC に 戻る と 竣 走 し た りす る の で , 注意 し て くだ さき 
い 。 

また だ た, テキ スト 入力 後に エラ ー が 表示 され る と 
ませ ん . 再度 入力 し 直し て くだ さい . 

アセ ンプ ブ ル は まず コマ ンド 1? で ラベ ル を 登録 し 。 コマ 
ンド 2 で 実 笠 し まほ は: 


スク リー 


本 プロ グラ ム の テキ スト は BASIC テ キス ト は 根本 的 に 
異な っ て いる の で , 同様 な 操作 は で きま せん . 原則 と し て 


追加 され 


ン ・ エ ディ ッ ト 





ブラ 


現在 の メモ リ ・ ロ ケー ショ ン 





























0000 
ワー コン < リン ル 
2000 
テキ スト 領域 
4000 
EE2ZZ2Z228 還 
5BFF 
ラベ ル Ll 
シス テム ・ ス タッ ク 1 
8000 
ROM 
次 の よう に 行なう 必要 が あり ます . 
⑯⑱ ス クリ ー ン ・ エ ディ ッ ト は コマ ン 0 ド (> 表 示 ) 
ぐも か で きず 。 イシ サザ サー MM な い 。 


人 @ 行 No を 変え る こと は で き な い . SM KN 
ai 
⑯ 対 象 は 上 コマ ンド の み で , し か も 直後 で な けれ ば な ら な 
い . 
以下 で 説明 する 1, D コ マン ド で の 表示 に つい て は 再度 の 
変更 , 削除 を 行なう こと は で き な v 
この よう に し な けれ ば な ら な い 理 由 は , テキ スト が 絶対 
行 No を 持た ず , 全体 か ら の 相対 位置 で と そら え られ る の で , 
削除 , 追加 な ど に より No が 常に 変わ る 可能 性 が ある か ら で 
す . し た が っ て , この 点 を 注意 し て も ら え れ は @@⑩ の 条 
件 は 無視 し て も か まい ませ ん . 





ロロ メメ メメ TEXT : NOP : コメ ント 
(プラ ンク ) で テキ スト を 変更 一 変更 














D 一 削除 
I ーー イ ン サ ー ト 行 の 指定 
変更 , 削除 と も 複数 行 を 同時 に 行 な を ます . 1 コマ ンド 


の と き は 最上 段 の み が 有 効 に な り ま す が , 変更 は 同時 に は 
で きま せん . また 入力 後 エ ラー メッ セー ジ が 出 た も の は , 
テキ スト の 訂正 は 行なわ れ ま せん . 


ニモ ニッ ク 


命令 は ほとん ど モ トロ ー ラ 仕様 に な っ て いる と 思い ます 
が , 擬似 命令 や ラベ ル の 使用 は か な り 使 い 方 に 制限 が あり 


27 


&O 


ます . 
ぁ 擬似 命令 
FCB… 1 バイ ト 定 数 . 
(EQU)… ラ ベル の 登録 . 
FDB… 2 バイ トト 定数 . 
RMB…2 バイ ト 定 数. 領域 の 割り 付け . 
FCC… 文 字 デ ー タ , ス ラッ シュ (/) で 囲む . 


p 定 数 10 進 … 符 号 な し また (バー? 
16 進 … ヾ $? 
文字 … ヾ ,” で 1 バイ ト の み 修 飾 

みそ の 他 ANDCC>ANDC(4 バ イト に 統一 の た め ). 


BLO…BCS. BHS BCC, 
特殊 レジ スタ は , ダイ レク ト ・ ペ ー ジ (DP). 
コン ジッ ネイ ション コー ド (C6) グ ログ ラバ 
・ カ ウン ダグ (PC) で す 、 


ラベ ル , 定数 の 演算 


+ー の 演算 の み 許し ます (ラベ ル 演 算 に は 先 に ラベ ル が 
ある こと が 必要 . 1 LABEL は 許さ れ な い ). 
FCB…(10 進 ,16 進 , 文字 定数 の 演算 ). 

EQU…( / ).“* "で 現在 の アド レス . 
RMB…( 7/ 0 

FDB…( ラ ベル , 16 進 , 10 進 , 文字 定数 の 演算 ). 

部 制限 が あり ます . 例 1 を 見 て くだ さい . 


オフ セッ ト 


ラベ ル が 使え る と 同時 に 演算 も 行 な を る た め , 次 の よう 
に モー ド を 決め ます . 演算 中 1 つ で も 10 進 以外 が あれ ば , 
すべ て HEX 形 式 の オフ セッ ト と みな し ます ( 例 2). 
HEX 形 式 … す べ て 16 ビ ッ ト ・ オ フ セ モット, 8 ビッ ト に す 
る に は ` ぐ く * で 強制 的 に 行なう . 5 ビ ピット ・ オ 
フ セ モット の 指定 は で き な い . 
10 進 形式 … 待 号 付き と 見 て , 自動 的 に 5 ピット, 8 ビ 
ッ ト , 16 ビ ッ ト ・ モ ー ド を 決め る . 


ロケ ーション の 変更 ちら オー ル 
RAM 動 作 


$ XX00 単 位 で ポジ ショ ン ・ イ ン デ ィ ペ ン デ ント で すか 
ら , どこ に 配置 し て も か まい ませ ん . この と き , $4007 一 
8 は ラベ ル ・ エ リア の 先頭 アド レス , $4009 二 A テ キス ト 
の 先頭 アド レス を 必要 に 応じ て 変更 し て くだ さい . 

オー ル R AM 動作 を 実質 的 に 行なう た め に は , この 他 に 
テー プ な ど に 入 ・ 出 力 の 行なえ る 機能 を も つ モ ニタ が 必要 
で す . FM-7 は ソフ ト で 切り 替え られ ます が , や は り RO 
M を 使う こと は で きず 同様 で す . 









ジイ ター アセ ンプ ラ 


FM-8 で は モニ タ と アセ ンプ ブラ , テキ スト を すべ て 裏 R 
AMWCG1 ま 20 を お お:990 の 3 ま 3 人 作 ツブ 2221 記 2 
プロ テク ト を か け で て オプ ジェ クト を テス ト す る こと に より 。 
か な り 和 効率 的 に デバ ッ グ を 行 な を ます. 





BB…… エディ タ ・ ア セン プラ か ら 抜 ける (RTS). 

CX メメ メメ XX の XX 行 No(1) か ら (2) 
まで を (3) の 後ろ へ コピ ー (た だ し , (1)<(3) 
<(2)). 

DX メメ XX①[,。 メ メメ XX②]…… 行 No の (1) 〔 か ら (2) ま で 〕 
を 削除 . 

CS テキ スト の 最後 か ら イ ン サ ー ト ・ モ ー ド へ . 

G XX XX XX(220 2 天 X つ 3 が 行 No. の (1) か ら 


(2) を (3) の 後ろ へ 移動 する . 

H…… コマ ンド ・ リ スト 表示 . 

1X※※※X の 9 …… (1) の 後ろ より イン サー トモ ー ド へ . 

L( メ メメ X〕]…… テキ スト ・ リ スト 表示 . パラ メー タ 
省略 時 は 現在 の ポイ ンタ か ら リ スト . 

MX メメ X(②… 行 No(1) を 削除 し , その 行か ら イ ン サ ー 
ト .。 

Pt… *2? お よび ^X?* 実 行 時 に プリ ンタ 出力 する た め 
の スイ ッ チ の ON/OFF. 

PO〔〔, メメ ※ メ ※ の 9]])…… プリ ンタ ・ イ ニシ ャ ライ ズ ( 例 , 
MP-80TYPEII, PO, $1B, 'A', 9 で 改行 
を 9 ピッ チ に ). 

Q “string"……… ポイ ンタ 行 よ り 文 字 列 を サー チ す る . 
見 つか れ ば その 点 へ ポイ ンタ が 移る . 

R…… テキ スト や ラベ ル の 使用 状態 な ど を 見 る . 

S…… テキ スト 領域 の クリ ア ( 誤 っ て 入力 し た ら テ キス ト 
・ エ リア の 先頭 デー タ “00? を 文字 に 変え る ). 

NAOKEC と *2? 実 行 時 に 画面 リス ト を 表示 する か の スイ ッ チ 





ON/OFF. 
U…… ポイ ンタ を 0 に . 
wl891 失 の ri 画面 サイ ズ 指 定 . 例 W40, 25 
XS クロ ス ・ リ ファ レン ス 出 力 (* 1 ? 実 行 後に 行 な 
ンド 
1 …… パス 1 (ラベ ル 登 録 ). 
の パス 2 アセ ンプ ブル を 行ない , オブ ジェ クト を 


出力 (1? を 行なっ て いる こと ). 
メメ ※ メ XX は 10 進 数 字 

*Q7 コマ ンド を 追加 し た こと も あり ポイ ンタ を 採用 
し まし た . ポイ ンタ を 変え る こと の で きる コマ ンド は 
*L? の パラ メー タ と *Q?。 バ U? だ け で す . 

*L? ヾ X/ ヾ 2? を 止め る と き は | SPACE | キー を , 
再開 は | SPACE | キー で , 止め る な ら 他 の キー を 押し ま 
す . 











マシ ン 語 ダン プ ・ リス ト EE 還 還 昌 還 昌 昌 





dd + 〇 1 +2 + さ +4 +5 + ら 6 + フ + 日 +9 +Q +BE +C +D +E +F Sum 
4000 さ 4 7F 1C GO 16 Q1 F9 5C OO 10 OO CO OO QO oo QO 4E 
4010 OO QO OO QO QO OO _QO OO oo oo oo oo oo oo oo oo roo 
4020 OO OO QO0 QO OO QQ QO OO OO QO 0O oO Qoo oo oo oo oo 
4030 0QO OO OO OO OO QO oo oo oo oo oo oo oo oo oo oo oo 
4040 00 OO OO OO OO OO OO Oo oo oo oo oo oo oo oo oo oo 
4050_ 00 00 OO QO OO QO_QO Oo oo oo oo oo oo oo oo oo goo 
4060 00 00 OO _QO OO OO OO 0O OO _QO OO QO QO OO OO0 oo oo 
4070 00 OO OO 00 QO OO QQO QO OO Qoo oO oO oO OO oo oo oo 





40BO_ OO_QO_QQ _QO QO QO QQ _QO OO OO QO_ OO_QQO_QO_QQO_ 00 iQ0O 
4090 QO_ OO 0OO QO OO QO _QOO OO QQ OO OO OO OO OO QO 0O iQO 
4OAO OO_ OO OO OO 00 QO QO OO _QO OO _QO OO _QQO _QO OO QQ iQO 
4OBO OO _QO QO QO OO OO OO OO QO QO QO QO OO QO OO 00 is00 
40CO OO_ OO _QQO QO 0O 00 0O0 OO OO _QO _QO OO _QO QO GO _QO iQO 
40DO QO OO OO QO 00 OO 0O OO QOO OO OO OO 0O QO OO 00 siOO 
40EO OO_ OO OO OO 0O QOO OO QO OO OO QO OO OO OO OO _QO si00 
40FO OO OO OO OO OO 00 QO OO OQ OO QO OO 0QO OO 00 OO giOO 
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』O 


エディ タ ・ ア セン プラ マシ ン 主 ダン プ ・ リ スト 





dd  +O +1 +2 + う 3 +4 +5 ロ +6 + プ 7 + 日 419 +a +B +C +D +E +F Sum 
































4E 


さ 4 


20 


さ 1 


21 
B1 
1F 
81 
1 


A6 
さき 4 
1E 
1 
1 
1 
35 
さ ? 
26 
26 
1 さ 
02 
26 
BD 
DD 


2C 
: SB 
s さ 2 
5FA 
s 40 
s 65 
kBD 
9 





+F 
17 
Aa4 
15 
BB 
16 
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30 


エディ タ ・ ア セン プラ マシ ン 語 ダン プ ・ リ スト 





4BSO 
4B60 
4B70 
4BBO 
4B90 
4BAO 
4BBO 
4BCO 
4BDO 
4BEO 
4BFO 








B4 
26 
88 
2o 
D4 
27 


27 
4F 
35 
さ 4 


さ 9 
96 
Oo4 
90 
さ 39 




















SQBO 39 さ 4 30 17 F3 29 9E OC 17 FS 55 17 F3 21 6 OC si98 
5O90 97 26 3Q BD FO 24 C6 05 9C さ 2 27 20 SD 27 1D A6 BS 
5oAO BB 46 26 Q7 6 BQO 17 F5S 43 20 Oa B6 2D 17 FS3 OQD i64 
50BO 17 F さ QQ さ O O1 Oa 26 QA 26 5a 20 DC 9F 34 QD 26 iQ1 
SOCO 27 Q07 17 F2 EA QA 26 20 F く 17 FB 39 35 3O 4F 39 si99 
5QODO 96 OB 34 10 1 さ 2 27 02 35 90 9E 34 9C 32 26 02 si4E 
SOEO 35 9O C6 OD 17F4 CE C6 O5 9E 34 9C 32 27 25 5D i85 
SOFO 27 19 6 8B 46 26 07 6 Q 17 F4 FO 20 Qa 86 2D kiDF 


GO より (も よる: あきよ 4 ま ワ (6 キア ・ す 日 - 涼 94 さよ Br さじ: EPSBGm 553O CB DF BO OD 44 61 5B 2C 62 5D 20 13 OD a5 20 1 :BB 
5000 21 17 FE 35 26 14 ae C4 84 02 27 OS 1F 10 17 FB 02 554O 20 5B 20 B6 D7 20 62 20 5D 2O A6 20 BB BB BC DE 1 
5010 55 1F 10 1F 98 17 FB 4E 4F 39 96 OB B1 さ 2 26 E6 :B ミ 555O AE QD 45 20 13 12 A5 20 BB E2 BQ DE De6 DB 20 B2 :BF 
5020 17 FF B2 A6 C4 B4 40 27 02 さ O 1F 30 1F 3O 1F A6 :B2 5560 DD BB BO C4 OD 47 61 2C 62 2 63 20 13 OD ^5 20 :ES 
5030 C4 B4 02 26 さ O 1F 10 B1 FF 27 18 4D 27 03 17 00 iC 557O 61 20 B6 D7 20 62 20 a6 20 6 さ 20 C9 B1 C4 CD OD 11 
5040 さ 2 1F 10 C4 BO 27 03 17 OO 29 1F 10 1F 9 17 FB :0 フ 7 55BO 48 20 13 12 a5 20 Ba CF DD C4 DE DB BD C4 QD 49 :09 
SO50 1 4F 39 1F 10 C4 BO 26 03 17 OO 17 1F 10 1F 98 :52 5590 61 20 1 さ 11 85 20 61 20 C9 B1 C4 CD 20 B2 DD BB :eo 
5060 17 FB OB 4F 39 さ O 1F 1F 10 17 Fa FF 1F 98 17 Fa sFB8 55AQO BO C4 OD 4C 5B 61 5D 20 13 OF a5 20 SB 20 61 20 』E9 
MI776 の CMPOBAB1ZO2N27OA0NAO 55EO B7 DE QE BS 20 B6 D7 20 5D 20 DB BD C4 OD 4D 61 is54 











1O 


エディ タ ・ ア セン プラ マシ ン 語 ダン プ ・ リ スト 








52 
4 ビ 
oO 
5o 


QO 


41 
5 
oo 
co 
20 
42 
5o 
oo 
ミ 7 
42 
4F 
oo 
oo 


20 
52 
4E 
0QO 
12 
oO 
5 
oO 
00 
20 59 
52 
52 
QQO 
OB 2 
58 oO 


53 54 


0QO 
oO 
41 
45 
oO 
DA 


4 ビ 
74 
40 
GO 
52 
EA 
GO 
10 
4 に 
52 
oO 
OO 
QO 
42 
QO 
D7 


さ 
64 
QO 
G さ 
41 
4F 
QO 
35 
41 
4F 
QO 
06 
2o 
4 さ 
5 さ 


F7 


52 
4D 


42 
55 
oo 
oo 
OB 
4 る 3 
5o 
oo 
49 
oo 
4F 


54 
oO 
45 
60O 
9 
Oo8 
4 日 
SO 
0O 
oO 
42 
54 
oO 
D2 





4 に 】 
s BE 
: 6B 
: 6 
:3O 
509 
BZ 
s74 
:D4 
: 98 
: Ba 














Add 


ーー 人 人 | 1 





ラベ ル , 定数 演算 実行 人 EEE 昌和 





O00) 1 
000S 
9JSIe Je1 
DO0 人 4 
000 呈 
9006 
Q00 ア 
0008 
OOO 
5010 
01 1 
OO01 人 で 
01 滞 
Q001 人 4 
0015 
0016 
OO01 プ 








SOnOO 
200O 


ご OOO 


2OOO 





2004 


OO6 


で 01 


2n14 


2OOO 
OO064 
010O0 


2000 


Te 
10 









日 


QRG 
* 
1 の 0O 


お 10O 


*+ ま 100 


FDE 
FDE 
FDE 





第 GOOO 






5sRSD EQU 
4EFFGF 
は に 】 
RG 
「+ ア 信 4 
全 MG sEFrGOr 
+SS 
人 SS 
SS+1O0 
RGG-10 
SG+ ま 10 
GSG 一 ま 1 〇 ュ EFFOF 
5sEFFOF 





* 


1 


サナ ミ バ 











1O 





例 2 オフ セッ ト の 人 mm mW 人 Z| 3 = クロス ・ プ ァ アレ ンス 出力 人 Emmam 



































goo1 RG ま も SOOO EYTE OOO9 
OO02 ECQ8 LDD 8、X UID 主 A7 
(d 人 4 ECB90400 LDD 102S 人 4 4X > LOOFE OO1B* QOS1 
QOO 生 日 NHONITR OOO ミ * OO ミ フ 
デ Se いい YK RETURN OOS6 キ 
)06 EC89OQO10 だ DD まま OX RMHRRN OOO2* OO ミミ ー O0 さ 6 
OOQ7 ECE ヨ 81O LDD 衣 生 10。X TRA 0014*% OO01 フ 
EYTE OOO ワ 00S フ キ 
DaTA 0016 
EXEC OO1O 
D FINISH OO スミ * 
2 LOOF OO1 ロ ォ * OO つ 1 
NMUNITR OOOSK OO ネフ 
* RETURN OO26 ポ 
RMRRM OO002* OOSS OOS6 
TRA 0014* OO1 フ 








この プロ グラ ム は 独立 モニ タ の 後ろ に つけ て も 位置 自由 に 
な っ て いる の て で 安心 し て くだ さい . この プロ グラ ム 中 で 29 行 
以後 は いり ませ ん . た だ し , 独立 モニ タ の アド レス 70F0 か 
ら の デー タ を 16,19.00 に な お し て お いて くだ さい . 

使い 方 は R OM に 大 る の に 必ず B コ マン ド を 利用 し ます . 
裏 R AM 上 の 独立 モニ タ を 起動 する に は , モニ タ か ら GFC50 
恨 ETURN| です. 独立 モニ タ 上 で $FC50 一 FC7F ま で を 使っ て 
も B コ マン ド の た びに 書く の で , 有効 に 利用 し て くだ さい . 

和 の よう だ UL だ や 将臣 モニ クタ / と エア イタ ドア セン プ ブ ジ ( 
を 利用 する と 使い や すい で す ヨ . 一 度 試 し て みて くだ さい . 

書き 忘れ て いま し た が , 独立 モニ タ を どこ に 置い て も 起動 
は $FC50 で す 、 どう で すか , 便利 で し ょ う . 
ポー ネー ュ ニー ラミ 々 ヶ ハ Now ヌゥ ヌゥ = ミー ポート ーー レル レル アー 一 ニニ 5 


独立 モニ タ 用 

裏 RAM 有 効 利用 法 

FM-7 で “独立 モニ タ ” を 裏 R AM に 入れ た 場合 。 
に 左 っ て こら れ ま せん . 無理 に ROM に 切り 換え て , 
ト し て も 正常 に な る こと は 少な いよ う です. 

また , 正常 に ROM に 大 れ て も 裏 RAM に ある 独立 モニ タ 
を 起動 する の に 6 バイ ト の プロ グラ ム を 必要 と し , 面倒 で す . 
そこ で 作っ た の が この プロ グラ ム で す . 


ROM 
リセ ッ 





QOQ0O 1 
0 RMIRAM=$FDOF 
QQOQ MOUNTTR=$aEF4 


0000 





0015 
O016 
Q01 ア プ 
oo18 
QO19 
002O0 


0021 


002 フ 
002 
0029 


030 


7a00 
7 フ aO0O 
7aoo 
フ プ A0O 
7A02 


1F5o 


7805 3 


フ AQ9 
7aOE 
7aQ0E 
7OBE 
7ROBE 
7AQOB 
78QF 


7a15 
7 人 1 フ 7 
719 
781B 


10EEFC5O 


, ECB1 


EDa1 
B1FF 
26F8 
ZEFC56 





フ FFDOF フ 7E 


ER6FDOF7EAB 
F4 

QOS 

EP 


Eo6FDOF 
7ZEREF 生 


QRG 


TFR 
BURD 
LEAX 
STD 


7A0O 


FC。D 
EYTE 
EXEC。FC 
・X 


TRANCELRTE 


TRQ= 


LERX 
LDY 
LDD 
STD 
CPMFA 
ENE 
JP 


LUQP : 


DATa: FDE 
EXEC: RME 
RETURN:FDBH 
EYTE:  FDE 
FCBE 


DRG 
: DUNMIY 


FINISH:z CLR 
JIMF 


LDa 
JPF 


FCS5O 


DaTA。FC 
TRAa 
sX++ 
。Y++ 
電 ま FF 
LOOF 

ま FC56 


sgFULL 
: EXECUTE DDR 


ま 7FFD 。 ま OF7E FRAaI4 


BoFD . ま OF7E , ま RF4 :ROH MODE %& JHMF_MUNITOR 


* ま 02 
*FF 


s Byt ら スウ 


まま FC5O 


ROMRAaI 
START 


FRONRAH 
IONITR 
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富士 通 か ら FM- 8 の 下位 バー ジョ ン と し て FM-7 が 発 
売 さ れ ま し た .BASIC は コン パチ の も の の マシ ン 語 は 互換 
性 が あり ませ ん . そこ で マシ ン 語 コン バー タ を つく り ま し 
1 





プロ グラ ム に つい て 


FM-8 の マシ ン 語 の プロ グラ ム で は , BASIC の サブ プル 
ー チ ン を 使わ ず , 直接 サブ プ CPU を コン トロ ー ル し て 画面 
を か か せ て いる も の が ほとん ど で , 1/O 誌 の “INVADER? 
ゲー ム な ど は , その まま FM-7 で 走り ます . 


し か し , 1 廊 字 出力 な ど 簡 単 な も の は , BASIC ROM の 
サ プ ブルー チン が 使っ て いた りす る の で , BASIC ROM に 
飛ば す サ ブル ー チ ン を 変え れ ば , FM-7 で も , ほとん ど が 
使用 可能 で す . し た が っ て , 比較 的 使わ れ そ うな も の を コ 
ン バ パー ト ( し よう と こ の ジブ ログ ラム を 作り まし だ た 、 

プロ グラ ム 自 体 は $6000 一 $681F (EXEC &H6000) で 








す 。 また , 実行 中 に B コ マン ド で BA S I C へ 戻る と 病 走 
する の で , STOP+RESET で BAS 1IC に 戻っ て く 
だ さい 
コン バー ト 表 
947C 8FD0 END エン トリ | 
948D 8FE1 | BREAK エン トリ | 
9F97 9B57 改行 する . 
9FDF | 9BDB X レ ジス タ の アド レス か ら 0 が ある ま | 
て 交 字 を 出力 する . | 
AO1A | 9C16 X レ ジス タ の アド レス か ら B ロ レジ スタ 
| の 回 数 だ け 文 字 を 出力 する . 
AFE3 AC37 | アキ ュ ム レー タ D の 内 容 を 16 進 数 で 出 
カ . 
AFE9 AC3D アキ ュ ム レー タ A の 内 容 を 16 進 数 で 出 
| カ 。 
B96D | B615 | アキ ュ ム レー タ D の 内 容 を 10 進 数 で 出 | 
| カ . | 
D336 | D072 キー が 押さ れる まで 待ち , 押 され た 値 | 
を A レジ スタ に 入れ る . 
D352 D08E A レ ジス タ の キャ ラク タ を 出力 . | 
D9B8 D76F MOTOR ON | 
D9BB D772 MOTOR OFF | 
DA50 | D807 一 行 入力 , $ 043D 番 地 か ら ASCII コ ー 


ド で 入力 . スト ッ プ ・ キ ー が 押さ れ た 





還 コ ン ピ 











T ー = 


と き は C フ ラグ を セッ ト す る . 


DD69 DB6D キー が 押さ れ て いた ら , その 値 を A レ 





ジス タ に 入れ る . 
押さ れ て いな いと き は Z フ ラグ を セッ 
ト す る 。. 

F2D8 F17D BIOS エン トリ 

AFA2 | ABF4 モニ タ ・ エ ント リ 

D8B8 8E63 BASIC ホ ッ ト ・ ス ター ト 








] 





以上 の も の と コン バー ト し ます . 

まず , プロ グラ ム を 走ら せる と , 現在 使っ て いる マシ ン 
が FM- 8 か FM- 7 か 判断 し て , サブ ルー チン ・ ア ドレ ス 
を その マシ ン 語 アド レス に 変更 する の で , 本 プロ グラ ム は 
FM-8, 7 どちら で も 走り ます . 

具体 的 な 使い 方 は スタ ー ト 直後 , “HIT ANY KEY” 
と 表示 する の で , 何 か キ ー を 押し , 続い て アド レス を 聞い 
て くる の で 16 進 数 で 入力 し て くだ さい . 

$ 7E( ジ ャ ンプ ), $BD (サブ ルー チン ・ ジ ャ ンプ ) を 
見 つけ る と , 了 予約 アド レス か どう か 照合 し て ,. も し そう な 
ら ヾ CHANGE ADDRESS 一 ” と 表示 し , 違う と き は , そ 
れ が BASIC ROM の アド レス か どう か 調べ て , そう な ら 

YADDRESS 一 ” と 表示 し ます . 

な お , $ 7E,、 $BD が デー タ か プロ グラ ム か は 区 別して 
いな い の で , デー タ を 書き 換え る 可能 性 も あり ます . 

子 約 ア ドレ ス を 追加 し た い 場 合 は , $ 6980 一 $69BF が 
FM- 8, $69C0 一 $69FF が FM- 7 の アドレス ・ テ ー ブ ル 
に な っ て いる の で , そこ に 追加 し て くだ さい . 

その と き 最 後 の 0 を 残し て お いて くだ さい (14 個 追加 で 
きま す ). 

注 ) FM- 8 か ら FM- 7 へ の 変更 は その まま で 走り ます が , 
FM-7 から FM- 8 の と き は , マレット 機能 、 サ ウン ド 機 能 
な どの 関係 で 、 す べ て 走る と いう わけ で は あり ませ ん . 

な お 。 ブロ グラ ム は 完全 ボ ジ ジ ショ ジ ・ イ シンディ ペン デン 

ド ' で ぐず 。 


FM- ノ を 使っ て みて 


サブ CPU の VRAM アク セス ・ フ ラグ , CRT の ON/OFF 
の アド レス は FM-8 と 同じ で す . また , 直接 サブ CPU を 
HALT し て コマ ンド を 書き こん で も , まっ た だ た く 同 ヒ に 使え 
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0 


ます . つま り , FM-7 は BASIC ROM の サブ ルー チン さ 
え ぇ 使わ な けれ ば , FM-8 と マシ ン 語 コン パチ で す . 
また , BASIC ROM も ほとん ど FM-8 と 司 届 記 起 つ で す 


(アド レス は 違い ます が ). 
私 た ち FM-8 の ユー ザー に と っ て は , パレ ッ ト 機 能 や サ 
ウン ド 機 能 。 マル チ ・ ペ ー ジ な ど , と て も くやし い 気 が し 


Add  +O +1 +2 + さ +4 + 口 + ら + フ + 日 +19 + +B + ビ +D +E +F Sum 
6000 B6 84 OO 27 さ 1 さ 1 BD 09 77 1QO aF BD 07 4D さ 1 BD :2E 
6010 09 QE 1O aF BD Q7 59 6 3 7 D Oo1 8 6 37 a7 s44 
6020 BD O1 9D a7 8BD 0O4 9F 6 39 a7 BD Q4 7E CC 3D SE :BE 
6030 3 さ O BD 00 aF 20 2F さ 1 BD 09 6 1O AF BD QZ 1C 31 sa 
6040 ヨ D 09 さ D 10 aF BD 07 2 6 37 a7 D Q1 59 6 3 :5Z 
6050 7 BD O1 6C a7 BD Q4 6E 6 35 a7 BD Q4 4D 3O BD =:44 
6060 00O 77 CC さ C 3D ED BD O1 9 ED BD Q1 aa ED BD 01 71 
6070 C2 ED BD O1 DQ ED BD 02 05 ED D 02 2B ED BD Q2 :BB 
60 ヨ 0 46 ED BD 0O2 64 ED BD 02 8 さ ED BD Q2 さ ED BD 02 iCO 
6090 D9 ED BD 03 1C ED BD 0 ささ 1 ED D 03 47 ED BD 03 :@61 
60QO 76 EC 1 ED ヨ D O4 9C EDBD 06 4 ED BD 0O6 94 EC :C5 
6OBO 日 1 ED BD 05 CC ED ヨ D Q5 FB EC 1 ED 8BD Q4 2 ED :45 
6OCO BD 06 25 EC 1 ED D Q4 75 EC 84 ED BD OO 5D ED si4C 
6ODO BD 04 26 ED BD 05 2 さ 20 24 94 D QF E さ D さ 36 Da : さ くさ 
6QEO 50 F2 DB BF E1 QAC さ 7 DO 72 D8 0Q7 F1 7D B6 FD 05 :B4 
6OFQO 2B FH 6 O BZ FD 05 B6 FD 05 2 FE さ 9 D EE 3O sa6 


dd  +O +1 +2 +3 +4 + 唱 +6 +7 + 日 +19 + 人 Q +B +C +D +E +F Sum 
6100 BD OO 12 10 BE FC B2 C6 Q9 aA6 8O a7 QO 5a 26 F9 :70 
6110 7F FD 05 20 09 O1 00 50 19 00 19 OO O1 00 30 D ziEB 
6120 00 OF さ 1 BD OO 1 さ 10 AF BD 0O QB BD F2 DB 16 03 iD4 
6130 BZ7 14 14 61 39 03 aD OO OO 46 55 4 49 54 53 55 :5 ミ 
6140 20 4D 49 4 さ 52 4F 20 3 20 20 さ C SD SE 20 20 
6150 55 4 49 54 5 さ 55 20 4D 49 4 さ 52 4F 20 3Z OA 
6160 09 4D 41 43 4 49 4E 45 20 4C 41 4E 47 55 41 
6170 455 20 4 さ 3 4F 4E 56 45 52 54 45 52 20 56 65 72 
6180 20 さ 1 2E 32 20 20 27 ささ 3 2E 32 2E さ 1 20 62 
6190 20 45 49 5a 49 OA OD QA Ba C9 20 CC DF DB BB 
61AO_D7 D1 20 CA 46 4D 2D 3 20 C9 20 CF BC DD BA 
61BO 20 C9 20 CC DF DB BB DE D7 D1 20 a6 20 46 4D 
61CO さ 7 20 D6 HB さ C6 20 CD DD Be6 DD 2o BD D9 20 CC 
61DO DB BB DE DZ7 D1 20 C ミ DE BD a1 OD Oa C2 BZ DE 
61EO _D3 C9 20 C4 20 BF C9 CO 20 C9 20 D さ C9 C5 C4 
61FO Aa6 20 CD DD B6 DD 20 BC CF BD a1 OD QA 24 39 





dd +O +1 +2 + さ +4 + 日 + ら 6 + プ + 日 す 9 +aQ +B +C +D +E 
6200 37 4 さ 20 さ D さ E 20 24 3 46 44 3O 09 45 4E 44 
6210 OD 24 39 34 3 44 20 さ D 3E 20 24 3 日 46 45 31 
6220 42 52 455 41 4B 20 65 6E 74 72 79 Oa OD 24 39 
6230 39 37 20 3D 3E 20 24 39 42 35 3 さ 7 09 70 72 69 
6240 74 20 4 さ 52 2C 4 さ 46 Oa OD 24 さ 39 46 44 46 20 
6250 さ E 20 24 39 42 44 42 09 5 72 65 67 20 B6 D フ 7 
6260 さ O 20 B6 DE 20 B1 D9 CF CS DE 20 DS BC DE 20 
6270 20 70 72 69 6E 74 OQ OD 24 41 さ O 31 41 20 3D 
6280 20 24 さ 9 4 ささ 1 36 09 58 72 65 67 20 B6 D7 20 
6290 72 65 67 20 C9 20 B6 B2 BD BS 20 70 72 69 6E 
62A0 OR OD 24 41 46 45 ささ 20 3D 3E 20 24 41 43 ささ 
62BO 09 70 72 69 6E 74 20 44 2O 69 e6E 20 6 65 78 
62CO_OD 24 41 46 45 39 20 さ D SE 20 24 41 4 さ 3 44 
62DO 70 72 69 6E 74 20 41 72 65 67 20 69 6E 20 6 





62EO 7B OA OD 24 42 39 さく 6 44 20 3D 3E 20 24 42 36 
62FO 35 09 70 72 69 6E 74 20 44 20 69 6E 20 4 65 





Sum: 90 6F aa 1 OD SF 55 BC 19 6 さ F2 11 2F 04 EB 


dd +O +1 +2 + さ +4 + 呈 +6 + プ + 日 +9 +aa +B +C +D +E 
6300 69 6D 61 6C OQ OD 24 44 33 35 32 20 さ D SE 20 
6 さ 10 44 3O 3B 45 09 41 フ 72 65 67 20 C9 20 BZ7 aC DZ 
6320 CO 20 Q6 70 72 69 6E 74 Oa OD 24 44 ささ 33 36 
6 さ 330 3D さ E 20 24 44 さ 0 さ 7 32 09 B5 BB DaQ CO 20 BZ 
6340 20 C9 20 CC B2 D6 B ミ 20 6 20 41 22 65 6Z 20 
6350 20 B2 DA D9 20 20 28 B5 BB Da D9 CF CS DE 20 
6360 C2 29 QA OD 24 44 44 さ 6 39 20 さ D 3E 20 24 44 
6 さ 70 36 44 09 B5 BB DQ CO 2O B7 2D 20 C9 20 C5 B2 
6380 BS 20 QA6 20 41 72 65 67 20 C6 20 B2 Da D9 20 
6390 2 日 B5 BB DA C さ B2 C5 B2 20 C4 BZ CA 20 5 66 
63A0 61 67 20 an6 20 BE aF C4 29 0a OD 24 44 39 42 
ら 6 さ BO 20 さ D さ E 20 24 44 37 さ 6 46 09 4D 4F 54 4F 52 
63CO 4F 4E QR OD 24 44 39 42 42 20 3D 3E 20 24 44 

3 46 46 QA _OD 24 
3O0 37 09 さ 31 BZ 
20 2 24 さ O 34 








dd  +O 1 +2 + さ +4 + 王 +6 + プ + 日 + ワ +Q +B +C +D +E 
ら 6400 44 20 B6 D フ 7 20 41 くさ 4 くさ 49 49 Ba 2D C4 DE 29 
6410 OD 24 46 32 44 3 日 20 3D 3E 20 24 46 さ 1 さ Z 44 
6420 42 49 4F 5 20 65 6E 74 72 79 Qa OoD Qa CF BC 
64 さ 0 BA DE 20 C9 20 CC DF DB BB DE D7 D1 20 CS DE 








6450 72 6F 25 74 69 6E 65 20 C9 20 B5 D さ C5 20 D ミ 


6440 C2 B6 DC DA D9 20 42 41 53 49 4 く 20 5 く 3 75 62 
6460 CA 20 BS B4 C ワ 20 DS C9 CS DE BD 1 QA OD BC 


ま 


さ 


ご 


1) 


3 


語 - そ ン 


Fa 
ん , 


婦 


どう も あり が と う 
は アフ ター サー ビス が , 信じ られ な い ほ どい いで す ). 
参考 文献 
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(ちな み に , 


を に FE M-7 を 気 が ね な く 使わ せ て くれ た 東海 アビ ッ ク 
し 32 まり 7 


この 店 





6470 
64 ヨ 0 
6490 
64AO 
64BO 
64CO 
64DO 
64EO 
64FO 





B6 
BB 
BZ 
DS 
BC 


人 1 


DE 
DE 
CF 


RF 
DZ 
BD 
DS さ 
人 E 
20 
7>】 


CS 
D1 
B6 
1 
BS 
46 
OD 
の 


10 


CE 
CA 
人 4 
CF 
CA 
2D 
09 
QO 
BD 


C4 
20 
CS 
BD 
20 
さ Z 
05 
0O 
oO 


Cg 
2D 
CS 
39 
2D 
C2 
41 
さ O 
16 


20 
C4 
DE 
30 
C4 
B6 
4E 
8BD 
00 


+ ビ 
52 
2O 
29 
41 
さ 3D 


o4 <| 
oO - 


0Z 


3Q 


Q1 


CC 
20 
BZ 
25 
20 
B4 
9 
0Q 
DZ 


DF 
CS 
C5 
20 
BD 
CF 
20 
QF 
14 


DB 
DE 
B2 





























FM- フ BASIC _ ROM の 有効 利用 法 


ETF Laboratory 


FM-7 の ROM を 解析 し て いて 、BAS 
IC-ROM の 面白 い 利 用 法 を 思い つい た の 
で 発表 し ます . 


F-BASIC で は テキ スト を サー チ し て い 
っ て , 中 間 言 語 を 見 つけ る と 中 間 言 語 の 
次 の アド レス を $00D9.$00DA に モッ 
ト し て か ら 各 処理 ルー チン に ジャ ンプ し 
で My ます 

で すか ら ., 適当 な アド レス に 中 間 言 語 
化し た デー タ を 用 意 し て お いて , その 先 
蜂 デ ドレ ス を $00D9.$00DA に モッ ト 
し て か ら 各 処理 ルー チン を コー ル す れ ば 
マシ ン 語 レベ ル で ファ イル の オー プン や 

な ど が で きま す 。 


で は , 例 と し て ファ イル を オー プン す 
る 場合 を 考 を て みる と , BASIC の 命令 で 
OPENYO"、 1 Minky" と いう ASCII フ ァ 
イル を オー プン する 命令 は 、 中 間 言 語 で 
は 較 1 の よう に な り ま す . で すか ら , プ 
ログ ラム 1 の よう な サ プ ル ー チ ン を 作れ 
ば ぱ ば よい こと に なり ます.。 こ の 落 プ ルー チ 
ン 実 行 中 に 何ら か の エラ ー が 発生 する と, 
BASIC の エラ ー ル ー チ ン に ジャ ンプ し 
宮 ず 。 

オー プン し た ファ イル に 対し て デー タ 
の 入出 力 を 行なう に は , 次 の サブ ルー チ 
ン を 使い ます . 

太 PUT ($DO8E) 1 婦 字 出力 
$00B 下 番地 に ファ イル 番号 を モッ ト 
図 1 ファ イ 


笹 作 貴 弥 


し て か ら こ の サブ プルー チン を コー ル す る 
と 、 任 意 の アデ ィ バ イス に 対し て 出力 で き 
ます . また 特に 指定 し な けれ ば CRT 画 
面 に 対し て 出力 し ます . 

文 GET ($D072) 1 女 字 入力 

PUT と 同様 に $00BF に ファ イル 番号 
を セット し て か ら コ ー ル し ます . 指定 し 
な いと キー ボ ポー ド か ら の 入力 と な り ま す 
その 際 、 この サブ プ ル ー チ ン を コー ル す る 
前 後 で SDAF6、$ DAEF を コー ル す る と 
カー ソル を 点 減 きせ て 。 入力 待ち に な り 
多 所 

文 GETL ($D807) 1 行 入力 

GET と 使用 法 は 同じ で す . $ 43D か ら 
デー タ が セッ ト さ れ ま す . 

オー プン に 関し て し か 例 を あげ ませ ん 
で し た が 。 BASIC で で きる こと は すべ て 
この 方 法 で で きま す ,。 ゲー ム … プ ログ ラ 
ム な ど で ., 画面 の 初期 設定 な みな ど を BASIC 
で し て いる も の な ど は この 方 法 を 使え ば 
すべ て マシ ン 語 に する こと が で き , プロ 
グラ ム の プロ テク ト な ど に 有効 で は な い 
で し ょ うか . た だ し この 方 法 は マシ ン 
語 か ら 自 由 に BASIC の 命令 を 使う テク 
ニッ ク で あっ て 処理 を 行なっ て いる の 
は BASIC イ ンタ ー プ リタ で すか ら 速 度 
は BASIC と 変わ りあ り ま せん . それ か 
ら お まけ と し て 、 富 士 通 の アプ ソリ ュー 
ト ・ ア モン プラ (F M-8 用 ) を FM-7 で 使 
う 場合 の 変更 表 を 家 2 に 示し ます -. 
ル ・ オ ー プ ン 例 





oPEN * O? 
UI UiU5 
AE22 4F 22 2C FE0101 





etMY 舌 邊 mk y マ 
4) ルル よ ル は 
2C 22 4D69 6E6B79 22 00 





プロ グラ ム 1 





QO10Q0 も 3 
QQ110 
00120 し 3 
001 さ Q 600Q 

00140 
Q015Q 
00160 
QQ17Q 
QO18O 
Qo19O 


OPEN 
6Q0QQO 
6QQ さ 
6005 


し 
DaATaA 


6008 
6009 
60Q 
6Q0QH 
6Q00C 
60OD 
6QOE 
60QF 
6Q01O 
6Q1 1 
6012 
601 さ 
6014 
6015 
6016 
6091 プ 


QQ0200 


QO210 


QO220 
OO023 さ Q 





* FILE OFEN SUERUUTINE - 


QRG 
EQU 
LDX 
STX 
JHP 


ま 600O 
ま CEA 日 
DATA 
まま OOD 
ロ PEN 


fi1e onen- 


txt pointer - 


FCC "ロリ 。" Output made- 


ま FE。1。1 1e@ no・1 


"Minky" 7 fi1 name 











表 1 





プロ グラ ム ・ ダ ンプ ・ リ スト 
6990 DS 52 DS さ 6 DD 69 D9 BB D9 BB DaQ 5O F2 DB aF 2 :DE 
6980 DB EB QO QO QO OO OO OO OO oo OO OO oO oo oo oo go 
69BO_QO OO QO QO QO 0Q OO QQO OO OO Oo OO OO oo oo oo oo 
67CO_BF DO BF E1 9B 57 9B DB 9C 16 aC さ フ 7 aC 3D B6 15 :BoO 
67DQ DO BE DO 72 DE 6D D7 6F D フ 7 フ 72 DB 07 F1 7D aB F4 :e6 さ 
dd  +O 1 +2 + オ さ +44 + ロ +6 + プ + 日 +9 +a +B +C +D +E +F Bum 69EQO BE 6 さ OO 00 OO OO OO QO Q0 QO 0O QO OO QQ OO OO :F1 
6900 BD FF 96 6 BD FF 3C 17 FF 2 a7 BD FF BC Aa6 BD :C2 69FO_QO OO OO QO 0QO 0QO 0Q QO QO QO QO QO 00 Qoo oO oO oo 
6910 FE 14 17 FF 17 7 BD FF 69 A6 BD FE 0Q9 17 FF 14 = さ F | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
692Q0 AZ BD FF SF a6 BD FD FF 17 FF Q1 a7 D FF 55 ae :o6 Sum: 56 AE FO 4 7E CB 57 EZ A6 9 61 97 さ Q ZD 11 64 sEA 
693O_BD FD F4 17 FE FE AZ7 BD FF 4B 17 F フ 7 BEO さ O BD OO Ba 
6940 2 10 BE FC 2 C6 07 a6 O 7 QO 5 26 F9 C6 26 :E5 
695O 3O_BD FF 21 10 BE FC 9 QA6 8BO AZ AO 5Q 26 F9 CC :B2 
6960 OQ OD FD FC AF 7F FD 05 16 FD C1 0 さ 2D 11 Q2 1 ea 
6970 07 20 OO OO QO QO 00 QO OO QO QO QO OO QO OO 00 :27 
6780 94 7C 94 ヨ D 9F 97 9F DF aO 1 AF ES aF E9 B9 6D :EF 0 .。- 。 雪 ぃ ao2 吊 


中 間 コ ー ド , 処理 先 





処理 先 





END 
FOR 
NEXT 
DaTA 
DIM 
READ 
EE 

Gn 

RUN 

IF 
RESTORE 
RETURN 
REN 


STOP 
ELSE 
TRON 
TROFF 
SMAP 
DEFSTR 
DEFINT 
DEFSNG 
DEFDBL 
ON 
HARDC 
RENUN 
EDIT 
ERROR 
RESUNME 
aUTO 
DELETE 
TERN 
MIDTH 
UNLIST 
NON 
LOCATE 
CLS 
CUNSQLE 
FPSET 


BFDO| 7 
Q20 く | 8 日 
2C7| 89 
9O080| aa 
94C5| AB 
BFF3| aC 
9195| 8D 
902D| 8E 
90121AF 
9O0F 11BO 
BFBC| B1 
90711B2 
083| BS 
903| B4 
BFD91B5 
90Q3| B6 
AO1n1BZ 
AO1HB| BB 
7B41B9 
9F73| BA 
9F761 BB 
9F791BC 
9F7C|BD 
1EC |BE 
ADDC|BF 
CAICO 
DBAC1C1 
QA7391C2 
7441C3 
9FE7|C4 
9FBC1C5 
DS52D|C6 
CB7B| CZ 
C9121C 
ABF4 |Cg 
C8Folca 
DABO1CB 
CB141CC 
DFA61CD 





PRESET 
MOUTOR 
SKIPF 
SAVE 
LOAD 
MERGE 
EXEC 
UPFEN 
CLOSE 
FILES 
CON 

KEY 
PAINT 
BEEP 
COLOR 
LINE 
DEF 
FORKE 
PRINT 
CONT 
LIST 
CLEAR 
RAND ロ NTIZE 
WHILE 
MEND 
NE 

GET 

PUT 
CIRCLE 
CONNECT 
SYMB ロ L 
BCURSOR 
BUBTINI 
BUBM 
BUBR 
KILL 
INTERVAL 
TAB( 

TO 


DFaC 
D7S8 
CAE6 
CDSE 
CFS1 
CF29 
C76F 
CEA8 
CE7 ミ 
CBBS 
D444 
DB94 
E4 ビ C 晶 
DB2a 
C7CA 
EO064 
RA7D9 
30 
BS 
9002 
CDO1 
C77B 
BBE5 
AD54 
ADB1 
BF32 
E7EF 
EBOA 
E552 
DCFA 
DDa8 
DE ささ 
EBBE 
EB91 
EB94 
EB9A 
ES3Ba 
890 昌 
9D8a 


DSKINI 
DSKRO$ 
NAME 
FIELD 
LSET 
RSET 
CHRIN 
ERASE 
LLIST 
LPRINT 
SOUND 
PLAY 











関数 処理 先 ( 以 下 先 に 頭 に $FF) 





Bo 
B1 
2 
3 
4 
85 
6 
7 
8 


SGN 
INT 
RBS 
FRE 
FQS 
SQR 
LOG 
EXP 
COS 
SIN 
TAN 
ATN 
FEEK 
LEN 
STR$* 
VaL 
RSC 
CHR$ 





92 
9 さ 
94 
95 
9e 
97 
8 
99 
Aa 
9B 
9C 
9D 
9E 
F 
Aa0 
Aa1 
a2 
aS 


BSBE 
B472 
ESD5 
972C 
C92a 
BAEE 
BoAAa 
BBS5B 
BEeO 
BE66 
BEB1 
BEF5 
9a26 
9920 
9752 
99CA 
9947 
99 さ さ 





CINT 
CSNG 
CDBL 
FIX 
SFACE$ 
HEX$ 
OCT$ 
LOF 
EQF 
PEN 
LEFT$ 
RTIGHT ま 
MID$$ 
INSTR 
SCREEN 
RNPORT 
VaRPTR 
STRING* 


BC74 
BCEO 
BCCD 
EB461 
9D7B 
9E2C 
9E2D 
D11D 
D11a 
25a 

9952 
996F 
9979 
9CD4 
EAF6 
RED2 
952 
9D59 








吾 2 アプ リリ ュー ト ・ ア セン フラ 変更 表 








まま 1QDO.D1 
1QAE2、E さ 
まま 1BSD. さ E 
まま 1CBF .90 
各 1C96.9 ア 
ま 1C9D.9E 
まさ 3D44 - 45 
まさ D4C- 4D 
まる 3D5A. 5B 


ま CC さ ア 
ま CEDF 
$E さ 4D 
ま DO72 
まま DOBE 
ま B5Z 
じじ さ ア 
CEDC 
ま CE4D 


まま CFOD ーー> 
ま D1Q さ 一 ー> 
まま EE4Q1 ーー> 
生ま D さ さら 6 ーー> 
も D さ 2 ーー> 
9F ワ 9 フ ーー> 
まま CFOD 一 > 
ま D1AO 一 > 
ま D1 1 1 ーー> 
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>FM- フ / 


サウ ンド ・ エ ディ ダ 


Vere.D 


ay 6 と る 

プーーーーーーー Ne ーー ロー 

ン | / l 
ーー ジー 人 局 パ 上 


7 7 の COMPAC YS 
現在 COMPAC で は FM- 8 用 PSG 基 板 と ,。 その サポ ー 


ト ・ ソ フト と し て サウ ンド ・ エ ディ タ を 発売 し て いま す が o mm の 入 
FM- 7 で は この PSG が 標準 装備 に な り ま し た (FM- 8 フ ログ ラム カ 


の PSG 基 板 は FM- 7 と フル コン パチ ブル で す ). そこ で 

















サウ ンド も FM- 7 に 対応 で きる よう に 変更 し , バー ジョ ン カセ ッ ト を 利用 し て いる 人 は , リス ト 1 (BASIC), リ 
2.0 と し て 発表 し ます . スト 2 (マシ ン 語 )、 リ スト 3 (マシ ン 語 ) を 入力 し て , そ 
れ ぞ れ “SYS",。 “SEQ", “SUB" と いう ファ イル 名 を 付け 
徴 1 本 の テー プ に 順に セー ブ し て お きま す . プロ グラ ム を 起 
特 動き せる に は , 先頭 の BASIC プ ログ ラム "SYS" を ロー ド 
RUN さ せれ ば , 自動 的 に “SEQ", “SUB" を 読み 込ん で 実 
この プロ グラ ム は , PSG の ミュ ー ジ ッ ク ・ デ ー タ 作成 用 行 が 開始 され ます . 
に 作ら れ た も の で , 音楽 の 自動 演奏 な ど に 適し て いま す . ディ スク を 使っ て いる 人 は , その まま で は メモ リ 容 量 が 
工夫 し だ いで は ゲー ム の 効果 音 サ プルー チン の 作成 な ど に 足り な い の で 少々 や っ か いで す . そこ で プロ グラ ム の うち 
も 利用 で きま す . 0 国人 に あ 衝 必要 な 部 分 だ け を , その 都度 ディ スク か ら ロ ー ド し て 実行 
楽譜 に よる 編集 を 行ない , それ を 演奏 コー ド と 呼ば れる させ る こと に し ます . 実際 に は 次 の よう に し て くだ さき さい. 
マシ ン 宮 プ ログ ラム に 変換 する . ⑯ リ スト 1 に 決 の 部 分 を 追加 , 変更 し て “SYS" と いう フ 
@ 変 挟 さ れ た 演奏 コー ド は , 完全 に リロ ケー タプ ブル な 独立 イ 名 で ディ スク に セー プ す る . 
し た プロ グラ ム で , 他 の プロ グラ ム の サブ ルー チン と し 
て も 利用 で きる (COMPAC か ら 発 売 さ れ て いる GALAXY 追加 部 分 : 14850 LOADM "EAT" 
FLY も , この ルー チン を 一 部 使っ て いま す ). 15150 LOADM “GEN" 
イン ター バル ・ タ イマ に よる 割り 込み を 採用 し て いる 15450 LOADM “DSP" 
だ た だめ, 他 の プロ グラ ム と 同時 実行 が で きる . つま り メ イ 
ン の 側 の プロ グラ ム で , 音楽 演奏 を 意識 せ ず に プロ グラ 変更 部 分 : 10700 行 
ミン グ す る こと が で きる . GENADR=&H7004… つ GENADR==&H5000 
この よう に ミュ ー ジ ッ ク ・ サ プ ブルー チン 作成 の た め の ツ DSPADR=&H4004… つ DSPADR=&H5000 
ー ル と し て 利用 する 他 に , 入力 し た 計 面 を 演奏 させ て , 単 に 
理 面 上 に 表示 され る デモ を 晩 め る だ け で も , 充分 に 楽し む @ リ スト 2 を 入力 し , “SEQ" と いう ファ イル 名 で ディ スク 
こと が で きる と 思い ます . に セー プ ブ す る. 
写真 1 エディ タ ・ コ マン ド ・ モ ー ド 写真 2 演奏 中 
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リス ト 3 の うち $4500 一 $ 4FFF の 部 分 を 入力 し , 
B" と いう ファ イル 名 で ディ スク に セー プ ブ す る 
@⑳ リ スト 3 の 3855 $s000 ニ 6PEP ま で を 入力 し 
00O5 ア 4 アシ ソレ イネ PGI7 寺 生 ベ GTEEー ツ 73 すう る の 
リス ト 3 の $4000 一 $44FF ま で を $5000 一 $54EF へ ヘリ 
ロロ ケー ドレ で 犬 力 議 DSB 伯 た ば う 名 で セー プ - す る 
⑬ リ スト 3 の $7000 一 $70FF ま で を $5000 一 $50FF へ リ 
ロケ ー ト し で 入力 選 罰 GRNI と ゆう 名 で ディ ス 多 人 へ 空 一 
プ ボ る 。 
ご れ : で 天 ワ ネズ ン GO サウジ ド エ デ ィ タ が 使え る よう 
に な り ま す . プロ グラ ム の 超 動 は カセ ッ ト 版 と 同じ く “S 
YS" を ロー ド , RUN す る こと で 行ない ます . 


使用 法 


人] シス テム ・ コ マン ド ・ モ ー ド 

プロ グラ ム を 起動 する と 。 シス テム ・ コ マン ド ・ モ ー ド 
(コマ ンド ・ ラ イン の 左端 に SYS” と 表示 され る ) に な り 
ます . ファ イル の 犬 出力 定 。 エディ タ お よび ジェ ネ レ ー タ 
ー タ の 起動 は ,。 この シス テム ・ コ マン ド ・ モ ー ド か ら 人 行 な 
うこ と に な り ま す . 各 コ マン ド の 先頭 の 英 大 区 字 1 字 を キ 
ー イ ン す る こと で コマ ジ ド を 指定 し て ぐだ さい > 
@E (dit 

エディ タ を 起動 し ます . 楽譜 デー タ の 入力 や 編集 は こ 
の オタ で FrMe 事 0 二 末 人 E エ ブイ グ メ コロ マン し y・ モ ーー 
ド の 机 を 参照). 
久 G (en 

ジェ ネ レ ー タ を 起動 し ます . 楽譜 デー タ を 演奏 コー ド に 

















0 


@S (ave 
楽譜 デー タ を ファ イル に セーブ し ます . S (ave コマ ン 
ド を 実行 する と , What File ? と ファ イル 名 を 聞い て くる 


の で フワ フ ア テ イ ル ・ ア アズ スク リプ ダ を 其 力 | じ で る だき Ws 
@R (ead 

演奏 コー ド を ファ イル か ら ロ ー ド し ます . し (oad, S(ave 
と 同様 に ファ イル 名 を 聞い て くる の で , ファ イル ・ デ ィ ス 
クリ プ タ を 入力 し て くだ さい .- 
gW (rite 

ジェ ネ レ ー タ で 生成 し た 演奏 コー ド を ファ イル に セー プ 
し まず . ファ イル 名 を 要求 し て きだ ら ,。 ファ イル "ディ ス 
クリ ブタ を 入力 し ます . 
@K ( 山 

ディ スク や バブ ル 上 に ある ファ イル を 消去 し ます ・ 
1 File 2?" に 対し て ファ イル ・ デ ィ ス クリ プ ブタ を 入 
力 す る と , “Kil 0 ディ スク リプ タ ]〕 ? "と い 3 
人 。[Y] ま た は その 他 の キー を 入力 し て 
くだ さい . 3 ゝ に の み フ ァイル が 消去 され ま 
す . 

また この コマ ンド は D (Gr コマ ンド と 同様 に , テー プ ・ 
ファ イル に つい て は 使え ませ ん . 
@N (ew 

メモ リ 上 の 楽 語 デ ー タ を クリ ア し ます .“Through away 
current buffer ?? と いう 確認 を と っ て くる の で , 本 当 に 
クリ ア し て いい の な ら [Y] を , そう で な けれ ば それ 以外 の キ 
ー を 押し て くだ さい . 

シス テム ・ コ マン ド ・ モ ー ド で エラ ー が 発生 し た 場合 は 
その エラ ー 番 号 を 画面 上 に 表示 し ます . この エラ ー 番 号 は 
BASIC の エラ ー 番 号 と 同じ な の で , エラ ー の 内 容 を 知り た 
い 場 合 は 、BASIC の 文法 革 を 参 需 し て くだ さい . 





変換 する の に , この ジェ ネ レ ー タ を 使い ます (ジェ ネ レ 
タ ・ コ マン ド ・ モ ー ド の 柚 を 参照 ) . 
@P (lay 

ェ ネ レー タ で 生成 され た 演奏 コー ド を 天 際 に 演奏 し ま 
す . この コマ ンド を 実行 後 、 画面 上 に ビア ノ の 鍵盤 が 表示 
され 、 演奏 と 同時 に 各 パ ー ト の 出し て いる 音 の 高き を ディ 
スプ レイ し ます (写真 2 ). P (lay コマ ンド を 使う 場合 は 
前 も っ て ジェ ネ レ ー タ で 演奏 コー ド を 生成 し て お く が , 演 
壮 コ ー ド を ファ イル か ら メ モリ 上 に 読み 込ん で お か な けれ 
ぱな り ま せん. 
と (ir 

ァイル の ディ レク トリ を 収 り ます . この コマ ンド を 実 
4 と , What File 2? と 聞い て くる の で ,。 ディ レク トリ 
を JK ろ うと ずる ファ イル ディ スク リプ タ を 力 し ます . 

D (Gr コマ ンド は , ディ スク や バブ ル を 使っ て いる 場合 に 

の み 有 効 で す . も し 誤っ て テー プ ・ フ ァイル に 対し て この コ 
マン ド を 入力 し て し まっ た 場合 は , 一 度 IBREAIK| キ ー を 
押し て か ら , RUN で プロ グラ ム を 再起 動 し て くだ さい . こ 
の 場合 で も メモ リ 上 に ある 楽譜 デー タ や 演奏 コー ド は 消え 
る こと は あり ませ ん . 


@ し (oad 
楽 詳 デ ー タ を ファ イル か ら ロ ー ド し ます . L (oad コ マン 
ド を 実行 する と , “Through away current buffer ?/ と 


確認 を) で きま 。 6 ま ) 『j 呈 在 メ モリ 上 に ある 楽 議 デ 
ー タ を クリ ア し て も いい か 』 と いう こと な の で , 新た に 楽 
譜 デ ー タ を ロー ド す る の で あれ ば YY\] と キー イン し ます . す 

る と ,What File 2?" と ファ イル 名 を 開い て きま す . ここ 
で ファ イル ・ デ ィ ス クリ プ タ を 入力 すれ ば , 楽譜 デー タ が 
メモ リ 上 に ロー ド さ れ ま す - 








2|] エ ディ タ ・ コ マン ド ・ モ ー ド 


楽譜 デー タ の 編集 を 行なう 場合 に . この エディ タ を 使い 

ます . シス テム ・ コ マン ド ・ モ ー ド の E(dit コマ ンド で エ 

ディ タ が 起動 し し. エディ タ ・ コ マン ド ・ モ ー ド に な り ま す . 

エディ タ で は 次 の よう みな 機能 が 使用 可能 で す . 

⑯ ペ ー ジ 単位 の 編集 (挿入 , 削除 , 変更 ). ここ で いう ペー 
ジ と は 原則 と し て , 楽 講 上 の 1 小節 に 相当 する も の で , 
各 ペ ー ジ に 先頭 か ら 通 し 番号 を 付け て 処理 し ます . つま 
り 第 nm ペー ジ と いっ た 場合 は , 先頭 か ら n 小 節 め を 意味 
する こと に な り ま す . 

@ ペ パー ト 単 位 の 和 集 (挿入 , 削除 。 変更 ). 所 線 計 上 の 音符 
記号 な ど を カー ソル を 使っ て 編集 する こと が で きま す .. パ 
ー ト は 3 つ あ り , 画面 上 に 表示 され る 庄 面 の 上 か ら 順 番 
に パー ト 1, パート 2 。 ペー ト 3 と いう 名 前 が 付い て い 
ま すず : 
この エディ タ で 編集 する 楽譜 デー タ は , 新しい デー タ を 

作成 する 場合 を の ぞ き , シス テム ・ コ マン ド ・ モ ー ド の し 

(oad コ マン ド を 使っ て ,、 エディ タ の 起動 前 に メモ リ 上 に 読 

み 込 ん で お か な けれ ば な り ま せん . 
以下 に エディ タ ・ コ マン ド ・ モ ー ド で 使用 で きる コマ ン 

ド を 解説 し ます . コマ ンド の 指定 は シス テム ・ コ マン ド と 

同様 に 、 先頭 の 英 大 文字 1 字 で 指定 し ます が , 一 部 で パラ 

メー タ を 必要 と する コマ ンド が ある の で , それ ら に つい て 

は コマ ンド の 解説 の 部 分 で 特に 示し て お きま し た . 

旬 E (dit 指定 方 法 :nE (1 ミミ ns 3) 

各 パ ー ト を 編集 する と き に 使い ます . エディ タ ・ コ マン 

ド ・ モ ー ド で , パー ト に 対応 する 数 字 を 入力 し , それ に 続 

け て [ 罰 を 押す と , その パー ト に カー ソル が 表示 され ます . 
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つま り [1lE] と 入力 し た 場合 は , に 
が 表示 され , その パー ト の 編集 が で きる よう に な り ま す . 
音符 お よび 記号 の 入力 は , 征 キー で 音 の 高 さ を 合わ せ 
て [一久 の キー を 押し ます . する と 画面 下 の 方 に 表示 され 
て いる 記号 の うち か ら , それ ら の キー に 対応 する 記号 が カ 
ー ソ ル の 位置 に 挿入 きれ ます . 一 度 入力 し た 記号 を 他 の 記 
な に 置き 換え だ たい 場合 は , [ 灯 悦 キー で その 位 中 に カー ソル 
4 4 
ら , また 新た に 入力 し 直し ます . その 他 各 キー の 機能 ヵ 
に つい て は , 表 1 を 参考 に し て くだ さい - 
こう し た パー ト の 入力 が 1 ペー ジ 分 終わ っ た ら [ESC | キ 
ー で エディ タ ・ コ マン ド ・ モ ー ド に 戻り ます . 
亀 N (ext 
現在 画面 上 に 表示 され て いる ペー ジ の 次 の ペー ジ を 表示 
の だ 3 店 





















































の P (re 

現在 画面 上 に 表示 され て いる ペー ジ の 前 の ペー ジ を 表示 
あま 3 
人 @J (ump 指定 方 法 : nJ ( 1 ミ n) 


任意 の ペー ジ を 画面 に 表示 し ます . た と えば 3 ペー ジ め 
を 表示 させ た い の な ら は [3[』] と 入力 し て くだ さい . 
価 | (nsert 

SN 表示 し て いる ペー ジ の 前 に 1 ペー ジ 分 挿入 し ます . 

果 と し て , 新た に 挿入 し た ペー ジ よ り 後 方 の ペー ジ は , 
WAN 化し ます 
人 (elete 

現在 表示 し て いる ペー ジ を 削除 し ます . 結果 と し て 削除 

し た ペー ジ よ り 後 方 の ペー ジ は , その ペー ジ 番 号 が 変化 し 
ま :9。 
@⑯V (iolin 指定 方 法 :nv (0 =n 3 ) 

任意 の パー ト に ト 音 記号 (@) を セッ ト し ます . [3IVI と 入 
力 し た な ら ば , パー ト 3 に ト 音 記号 が セッ ト さ れ ま す . な 
お 2 パード に .0 お 指定 する と 。 ペパー ド ユ 1。 2 に ド 音 記 示 
ー ト 3. に へ 音 記 党 を セッ ト し ます . 
@B (ass 指定 方 法 :nB (0 ミ =n 3) 

任意 の パパ ー ト に へ 音 記号 ( ゆ ) を セッ ト し ます . セ モット 
の 仕方 は V (iolin コ マン ド と 同じ で , ヵ に 0 を 指定 し た 場 
合 も 同様 で す . 
@F (lat 指定 方 法 :nF (0 ミ n ミ 7 ) 

変種 音階 に 調 号 を セッ ト し ます . 議 面 の 左端 に ある フラ 





ド を 入力 する と , この 記号 は リセ モッ ト さ れ ま す ・ 


表 1 。 カー デン ル ・ エ ディ ッ ド モード 
(エディ タ ・ コ マン ド ・ 


モー ド か ら nE コ マン ド て 起動 する ) 








[AA-[R| | 画面 上 に 表示 され た 記号 を カー ソル の 位置 に 挿入 する 
LDEL | カー ソル の 位置 の 記号 を 削除 する 
編 屋 | カー ソル の 左右 方 向 の 移動 





囲 困 | カー ソル の 上 下方 向 の 移動 ( 斉 の 高 さ の 決定 ) 





[| SPACE | | カー ソル の 位置 に 空白 を 挿入 」 











[ESC | | エディ タ ・ コ マン ド ・ モ ー ド に 戻る | 

*[P お よび 人 Q キ ー に 対応 する 記号 は , それ 以降 の 音 程 を 臨時 的 に 1 オ 
クタ ー プ 上 げ る (ある い は 下げ る ) こと を 意味 する . た だ し , これ 
ら の 記号 を 入れ 囲 に する こと は で き な い . 

*[R キ ー の 記号 は タイ で , 次 に 続く 斉 が その 前 の 斉 に つなが っ て い 
る こと を 意味 する . 

* 付 点 音 符 の 入力 は [BI から 「『| ま で の 音符 キー と 同時 に | SHIFT | キー を 
押す こと に より 行なう . た だ し 付 点 休 符 の 入力 は で き な い の て で, 2 
つの 価 待 を 使っ て 代用 する . 

* 3 連 符 の 入力 は , 付 点 音符 の と き と 同 様 に | GRAPH 
が ら 行 な う . 

表 2 シス テム ・ コ マン ドー 

コマ ンド | 機 





| キー を 押し な 


に 








E | 楽譜 デー タ の 作成 , 編集 (エディ タ の 起動 ) 

、 G | 楽譜 デー タ を 演奏 コー ド に 変換 (ジェ ネ レ ー タ の 起動 ) 
思 演奏 コー ド を 実行 (演奏 ) す る と 同時 に ,CRT 上 に デモ を 表示 
占 楽譜 デー タ を ファ イル (テー プ や ディ スク な ど ) か ら ロ ー ド 








| S | 楽譜 デー タ を ファ イル に セー プ 

に 吉屋 演奏 コー ド を ファ イル か ら ロ ー ド 
W 演奏 コー ド を ファ イル に セー プ ブ 

に 

| *p 








メモ リ 上 の 楽 農 デー タ を クリ ア 。 3 
_ | ファ イル の ディ レク トリ を と る 
* ネ に K ファ イル を 消去 


|  * に つい て は 。 5 ー プ は 使用 で きま せん 
Bm デ ルコ マジ ド 一 覧 
コマ ンド | ヵ 機 能 
nE | 第 n バ パー ト を 編集 (n は 数 字 で 1 ミロ n ミ 3) 
N | 次 の ペー ジ を 表示 
P 前 の ペー ジ を 表示 
本 吐 n ペー ジ め を 表示 に 時 5 
1 現在 表示 され て いる ペー ジ の 前 に 1 ペー ジ を 挿入 
Q | 現在 表示 され て いる ペー ジ を 削除 ほ 
nV | 第 n パ ー ト に ト 音 記号 (《) を セッ ト , n に 0 を 指定 する 
| と , すべ て の バート の 音 部 記号 は ディ フォ ルト に リセ ッ ト | 


nB | 第 n バ パート に へ 音 記 号 ( び ) を セッ ト , n に 0 を 指定 し た | 
場合 は 上 記 の 場合 と 同じ 





























ッ ト の 数 が ヵ で す . 仮に 変 口 長調 に セット し た けれ は [TIF | 
ど 過 妨 じ ます > 
@S (harp 指定 方 法 :nS (0 ミ n ミ 7 ) 

妥 種 音階 に 調 号 を モッ ト し ます . 指定 方 法 は F(lat コマ 
ジジ ドド と | 司 で 赤 。 
氏 T (empo 指定 方 法 :nT (1 ミ =n ミ 255) 
DI 
も 変更 する こと が で きま す -. 
@R (peat. 指定 方 法 ・ nR 

繰り 返し の 中 で 指定 され た 回 数 の と きだ け そ の ペー ジ を 
演奏 し ます . これ は 記号 の 「1. |「2. | な ど に 相当 する 
も の で す . セッ ト の 方 法 は , た と えば 「1.2.3.4。 | に セッ 
ト し た い 場 合 、[1[2[3[4IRI と 入力 し ます . 

サウ ンド ・ エ ディ タ で は 繰り 返し 記号 (上 , 1 ) を 指定 
する と , 無限 に その 部 分 を 繰り 返し て し まい ます . それ を 
避け る た め に , 最後 の ペー ジ に 「1. | を セット し て くだ さき 
い . 

久 > (右向き 不 等 号 ) 

繰り 返 じ 記号 上 を セッ ト し ます . も う 1 度 の コマ シ 
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n 5S 調 号 を セッ ト , n は シャ ー プ (#) の 数 。 0 で リセ ッ ト 
nF 調 号 を セッ ト , n は フラ ッ ト の 数 。 0 で リセ ッ ト 

ンー 繰り 返し 記号 ( 革 ) を セッ ト , も う 一 度 同 じ コ マン ド を 入 
力 す る と リセ ッ ト の 

繰り 返し 記号 (中 ) を セッ ト , リセ ッ ト 
・ | 直 線 (Il) を セッ ト , リセ ッ ト 

仙 q テン ボ を リーn ロ に セッ ト る 
nR 繰り 返し の 中 で 指定 され た 回 数 の と きだ け そ の ペー ジ を 演 
































奏 | 1. |「2. | に 相当 する . nー128 で あれ ば, 
IS2S82 | に セッ ト , n ロ 0 な ら リ セッ ト 
Q シス テム ・ コ マン ド ・ モ ー ド に 戻る Se デ ニハ 
表 4 ジェ ネ レ ー タ ・ コ マン ド 一 覧 
EE に 2 中 | し 能 


| 楽譜 コー ド を 演奏 コー ド に 変換 

トー ン ・ コ ント ロー ル ・ ス イッ チ を セッ ト に 

エン ベロ ー プ ・ コ ント ロー ル ・ ス イッ チ , 波形 , 周期 の セッ ト 
ノイ ズ ・ コ ント ロー ル ・ ス イッ チ ・ 周 波数 の セッ ト 

各 チ ャ ン ネ ル の 音量 を セッ ト 

シス テム ・ コ マン ド ・ 持 三 習 に 戻る 


氏 ぐ (左向き 不 等 号 ) 
繰り 返し 記号 』 を セ モット し ます . も う 一 度 押 す と リセ ッ 




















JI m 志 UE IEO) 











ト さ れ ま す . 
る . (ピリ オド ) 

終止 線 Il! を セッ ト し ます . も う 一 度 押 す と リセ ッ ト さ れ 
ます . 
介 Q (uit 

ゲイ グロ マジ ドッ 
ド * モー ドド に 戻り 洗 : ず 。 
エディ タ で 編集 で きる 楽譜 の 大 き さ は , 32 一 48 小 節 ぐ ら 
いま で で す が , 1 ペー ジ に 2 小節 を 詰め 込め ば , 多少 大 き 
な デー タ を 編集 する こと が で きま す . オー バー フロ ー し て 
し まっ た 場合 は , 編集 機能 が 働か な く な る の で , 注意 し て 
NM 

それ か ら デ ー タ が 大 きい と ,。 ジェ ネ レ ー タ を 使っ た とき 
に 楽譜 デー タ を 破壊 し て し まう 可能 性 が ある の で , 編集 し 
た 楽譜 デー タ は , ジェ ネ レ ー ト する 前 に ファ イル に セー プ 
むる よう が け て で べく だ きい ゆ の 


3| ジ ェ ネ レー タ ・ コ マン ド ・ モ ー ド 


エディ タ で 編集 し た 楽譜 デー タ は , その まま で は 演奏 す 
る こと が で きま せん . そこ で その 楽譜 デー タ を 実行 可能 な 


モー 選 を 扱 け シ ステ スム マコ マン 

















マシ ン 語 プロ グラ ム に 変換 する の が この ジェ ネ レ ー タ で す . 


ジェ ネ レ ー タ で は ,。 ジェ ネジ ピー ドド ぶる 前 に 2 パラ ポー タ を 
セッ ト す る こと で , PSG の セッ ティ ング を する こと が で き 
まま が * 

@T (one 


PSG の トー ン ・ コ ント ロー ル ・ ス イッ チ を モ セット し ます . 


通常 は 各 パ ー ト と も enable (ON) に モット され て いま す . 
T (one コ マン ド を 実行 する と , 次 の よう に 聞い て くる の 
で ,。 その パー ト の トー ン ・ コ ント ロー ル ・ ス イッ チ を ON 
こし た いな ら 加 上 (enable) を, OFF に し た いな ら ば [pl(di- 
sable) を 入力 し ます . 


PSG-A enable 三 D (トー ン ・ ス イッ チ を OFF に する ) 
PSG-B enable 三 ヒビ (トー ン ・ ス イッ チ は ON の まま ) 
PSG-B enable ニ ピ 


価 N (oise 

PSG の ノイ ズ ・ コ ント ロー ル ・ ス イッ チ と ノイ ズ 有 周波 数 
を セッ ト し ます . スイ ッ チ の モッ ト の 仕方 は T (one コ マン 
ド と 同じ で , 通常 どの パー ト も disable (OFF) に モッ ト さ 
れ て いま す . 


PSG-A disable 三 E ビ (ノイ ズ ・ ス イッ チ を ON に する ) 
PSG-B disableD 


PSG-C disable=D 


Noise Frequency (X100Hz) ? 50 
(ノイ ズ の 平均 周波 数 を 5 kHz に セット する ) 


ノイ ズ の 平均 周波 数 は 実際 の 周波 数 に 1 /100 を か け て 入 
カカ し て くだ さい . 入力 で きる の は 400Hz か ら 76,800Hz まで 
2 
人 g し (evel 

各 パ ー ト の 音量 を セッ ト し ます . 音量 は 0 か ら 15 ま で の 
数 字 で 指定 で きま す . 数 字 が 0 に 近づく ほど 小さ く な り 
逆 に 15 に 近づく ほど 大 きく な り ま す ・. 通常 この 値 は 12 に セ 
ッ ト さ れ て いま す . 

PSG-A 12=15 (指定 する 音量 を 入力 ) 


PSG-B 12 三 15 
PSG-C 12=15 


』O 


旬 E (nvelope 

PSG の エン ベロ ー プ ・ ス イッ チ と 波形 、 エンベロープ ・ 
AA スイ ッ チ の セット は 他 の 場合 と 同 
様 で , 通常 は OFF に な っ て いま す . 


PSG-A disable 三 E ビ (パー ト 1 に エン ベロ ー プ を か ける ) 


PSG- 日 disable= 三 D (その 他 の パー ト は その まま ) 
PSG-C disable= ニ D ロ 


0-9.9: 倫 4 ご ss 導 - ニ ご 
8 : ト NNNNNN 10 トト ヘ ヘム 4 
1 : NN 還 訂 題 較 較 昌 | 12 : 4444444 
3 | アム の すず 


Wave Form ? 0 (波形 0 を 選択 ) 


Envelope Time (X0.01s) ?100 
(エン ベロ ー プ ・ タ イム を 1 秒 に セッ ト ) 


エン ベロ ー プ ・ タ イム は , 実際 の 長き さき に 100 を か け て 入力 
し ます . 入力 で きる 範囲 は 0.01s か ら 6 s ま で で す . また 
エン ベロ ー プ ・ ス イッ チ を ON に し た 場合 、 そ の パー ト の 
音量 指定 は 無視 され ます ・ 

と ころ で PSG に は エン ベロ ー プ * ジ ェ ネ レー タ が 1 つ し 
か あり ませ ん . そこ で すべ て の パー ト に エ 0 
ける と , 音 が 出さ れる た びに トリ ガ が か か る こと に な 
音 が と て も 聞き づら く な る こと が あり ます . この 場 人 9 
ン ベ ロ ー プ を か ける の は , 主旋律 だ け に と ど め て お いた 方 
が 良い で し ょ う .- 
@G (en 

楽譜 デー タ を 演奏 コー ド に 変換 し ます . ノイ ズ の セッ ト 。, 
エン ベロ ー プ の 指定 な ど は , この コマ ンド の 実行 前 に 行 な 
っ て お か な けれ ば な り ま せん . 
@Q (uit 

ジェ ネ レ ー タ ・ コ マン ド ・ モ ー ド を 抜け て , シス テム ・ 
コマ ンド ・ モ ー ド に 戻り ます . 

この ジェ ネ レ ー タ で 生成 され る 演奏 コー ド は 完全 に リロ 

ケー タブ ル な も の で , $1800 番 地 か ら 生 成 さ れ ま す . 演奏 
開始 は BASIC か ら の 場合 , RXEC & 上 H1800 で 行ない , 世 
え EC 各 上 HH1802 で 停止 し ます . どの よう な 場合 で も 演奏 が 


停止 し た ら BXEBC 交 上 H1802 を 実行 し て くだ さい . そ う い る 
いと イン ター バル ・ タ イマ ー が ON に な っ た まま に な 
な く な 2 


し まい , カセ モッ ト の ロー ド , セ モー プ が で き 


(・】 ド mm |__」 
プロ グラ ム に つい て 
サウ ンド ・ エ ディ タ は , メイ ン ・ プ ログ ラム (記述 言語 
5 BASTG05 シー ケ ジ サ (アモ ジン ダグ ダラ)5 "ゲイ ズン 22 "GR 
コン の % イ ラ )。 ディ タダ (KK)、 ジェ ネ レ ー ク =。 6KDxy と いう 
5 つの プロ グラ ム で 構成 され て いま す 
K コン パイ ラ に よっ て 書か れ だ た 3 つの プロ グラ ム は , 今 
回 紙面 の 都合 で オブ ジェ クト で 発表 きせ て いた だ きま す . 
トス 
人 
は , 楽譜 デー タ の 領域 を 1 K バ イト 程度 広く 使う こと が で 
きま す . メイ ン ・ プ ログ ラム の 10800 行 を 次 に 示す よう に 
変更 し て くだ さい . 
LSTEND= &H 3 FFF->LSTENDー &H44FF 
た だ し この 変更 を し た プロ グラ ム で , カモ ッ ト に セー デジ 
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図 1 
メモ リ ・ マ ッ プ (テー プ 使 用 時 ) メモ リ ・ マ ッ プ (ディ スク 使用 時 ) 
0000 ] 0000 
BASIC メ イン ・ プ ログ ラム SYS BASIC メ イン ・ プ ログ ラム SYS 
1800 に 1800 SEGQ 
1E00 に 1E00 rs 
演奏 コー ド 生 成 領域 演奏 コー ド 生 成 領域 
2800 2800 
楽譜 デー タ 領 域 
4000 
演奏 時 ディ スプ レイ ・ プ ログ ラム 4500 ーー 
SA 本 室 2 
バ パターン ・ デ ー タ 4D00 SUB 
4B55 | 
K コ ン バ パイ ラ ・ ラ ンタ イム 2 5000 
エディ タ 
また は EDT 
2 ンー また は GEN 
に 3 - また は DSP 
演奏 時 ディ スプ レイ ・ プ ログ ラム 
7000 
7E00 = ] 
し た 楽譜 デー タ は , カモ セット 版 で は ロー ド す る こと が で き 最近 ロー コス ト の パソ コン が 各社 か ら 発 表 さ れ て いま す 
な い の で 注意 し て くだ さい . が 、 PSG を 標準 実装 し た 形 で 発売 され る 傾向 が ある よう 
で す . ゲー ム な ど で も , グラ フィ ッ ク の 美しき や キャ ラク 


終わ り に 








な 
タ の か わい さ な ど の 他 に , サウ ンド が 面白 さき を 決定 する 要 
因 に な っ て くる で し ょ う . こう いっ た ハー ドウ ェ ア の 機能 
を フル に 活か し た 質 の 高い ソフ ト が 現われ て 欲し いも の で す . 



























リス ト 1 サウ ンド ・ エ ディ タ ・BASIC メ イン ・ プロ グラ / 
店 
1 の gg '※ 127 の の R= 記 sgD=CHDEND: GHSUE 全 1 さ の 
1 の 1 の の "* program Sound Editing System マ 128 の の R= さ : D=LSTTOF' s GHSUE 
er5Sion ご の 139 ロ の ドド = 人 4:D=LSTEND : GUSUE 
1 "* dat 1 1 一 MQR- 晶 さ R=55: D 
1 の の "*※ author Y ,。ShiFa ュ ロ 
1 四 4 の 「※ 
1 の 5 の の CLEAR 8 。&H1 フ 7FF : DEFINT 人 -Z 1 ささ g の COULUR7:LHCATE の 9。9 
1969 の MIDTH Bg, 人 2 日:CHNSHLE @,25 1 さ 49 の 9 FRINT"CO ロ MMAND [SYS]: E(dit,。G(en。F(1 
1@7Zg の の SEOADR=&H18 ロ : EDTADR=&HS の の : GENADR= ayyD(ir。L(oad。S(ave』R(ead』M(rit」E(111 。N( 
%&H72g の 9: DSF'RDR=%&H4 の の 7 リョ 
1 の 2 の CHDTOF=&H1E ロ : CDDEND=&HS フ FF : LSTTUF'= 1 さ 5 の の CM も =INEEY ま $: IF CM まま =" リ " THEN 135 の の 
HESB: LSTEND=%&zH さ FFF 1 さ 6 の FRINT CHR ま (1 人 8) 
199 の 9 CURRE=SH45 ロ の 1 さ 7 の の IF CM まま ="E" THEN BUSUE 148@ 
11 の の の 13 ヨ の の IF CM ま ="B" THEN GOSUE 151 の の 
111⑦ FOR 1I=@ TO ミ 13 さ 9 の IF CM ま ="P" THEN BHSUIB 154 の の 
11 人 8 COLOR TL※ 分 +1 14 の の IF CM ま ="D" THEN BUSUE 17 の の 
11 さ 3 の LUCATE 4。1+8:FRINT" 画 ":LOCATE 56。T+8 141 の の IF CM も ="L! THEN BHSUE 16 呈 の 
jiFRINT" 画 " 14S の の IF CM まま ="G" THEN BUSUE 176 の の 
114 ウ NEXT 14 さ の IF CM ま =" ド に ドリ THEN BSUE 181 の の 
115 の LOUCATE 弓 。 sPRINT"Me1come to Sound 144 の の IF CM ま ="ND THEN_ BUSUE 17 の の 
Editing System version で. の " 145g の の IF CM ま ="R" THEN BUSUE 161 の の 
116 ウ の LOCATE 5。9 :FRINT"Eopyright by Comp 146 の の IF CM ま =" 愉 " THEN BUSUE 17S の の 
8 に Tn 丘 。 147 ウ の GUTO 13 さ Sg 
117 の の LUCATE 5。19:FRINT"Thi= = an app1ic 14 ヨ の “ 
引 モ 1iOn ロ FO ロ Fam ロビ FM-7 and FNM- 昌 " 149 の 9 EXEC EDTaDR 
118 の gg LCATE 弓 。11:FRINT"with a Froqgrammab 15@ の の RETURN 
te Sound_ Generator Unit." 151 の 
119 の の 15S ロ の EXEC GENRDR 
1S の の の IF FEEEF(H1B の ) =HS AND FEE ド (%H4Dg 1 紀 さ の RETURN 
@) =SHZE THEN 1 さ 1 154gd 『 
1S1 ウ の LUCRTE 1 さ :FRINT"Reading Subsystem 1555 の の EXEC DSFDR 
ee' き いい 156 の の RETURN 
1SESOP LOADM "SEG" 157 の 
15 さ gd LOADM"SUE" 158g GUHSUE 192 の の 
149 の FIHR 1I=g TO 5:FOEE CUDTOF+1 . の :NEXT 1592 の の FILES FD ま ま 
SG ド R= の :D= ニ HG の: GHSUE で 1 さ の の 16g2 の RETURN 
【 1 お 6 の の ド R=1:D=CDDT ロ F : GHSUE で 1 さ の の 161 の の 「『 
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リズ 3 ド ii1 





BUSUE 19 の 
LADM FD も 
RETURN 


MS=1 : GUSLIE 6 の 

IF R 生 OUYI THEN 171 の の 
BODSUE 19 

LOQDM FD ま 

R=g: D= ニ HO の 1 : GUSUE 
RETURN 





で 1 ミウ 


'i GHSLUER 表 17 の 
ADRTOF=SEGADR: RDREND=D 
BOT 17 の 


DRTUF=LSTTUF : ADREND=LSTEND 
BUSUER _ 19 の の 

SaVEM _FD ま も,。QDRTUF 。 DREND 。RDRTOF 
RETURN 


BUSUE 192gg 
MIB= さ : GDSUE 
TF RWS>VY" 
ド 1LL FD$* 
RETURN 





6 の の 
THEN 1 は 6 の の 





MS1: GUSUER 8 の 6 の の 
Y! THEN 191 の の 
xHgM の の : GUSUR 13 の の 






RETURN 





= の 9 の の 
21gg 
っ 311 の 
さ 12 の 
っ 1 さ の の 
| 214g の 
っ 15 ロ の 
1,DL 

<16g の 
317 の 
っ 1 の g 





ご 19 加 の 











" キ FD ま すり で 


R テ x+1 ) 


INFUT"Mhat File"sFD ま 
FD ま =FD ま ま 
RETURN 


TF ERR=64 THEN の 1 の の 
FRINT CHR ま も (7) * 

FRTINT "ERRR 提 "』ERR 
RESUME 1 さ 3g 
MG= ニ で BUSUER ご 切ら の 
IF R HHRE 和 
ド KILL FD$*$ 

RESUIE. 
RESUME 








で の 5@ の 





1 さ S の の 


IF_ MS=1 THEN_ FRINT "Througqh away と uF 





THEN FRINT"Through away o1d 





FE- 居 THEN_ FRINT" ド ュ 11 
R ま =INEEY ま : IF R ま = リリ" THEN 
FRINT R$$ 

RETURN 


"TFD ま すり で リュ 
1 の の ⑫ 








DH=INT(D/ZS6) : DL=D MOD SE6 
FUEE CHAREA+TRX ご 。DH: FUEE CHARRE ロ +R※ オ 


RETURN 
D=FEEF (COARER+R*S) * ぞ ご 弓 6+FEE ド (CURRE 人 + 


RETURN 





ェ ーーーーーーーーーー テ ニ ーーーー 














10Q000 
1O05O 
10100 ネ 
10150 ポ 
10200 * 
10250 ※ 
1030O * 
10350 * 
10400 ネ 
10450 ※ 
1O5QOO 1800 
1O55O 180O 20 QE 181O ENTR 
10600 102 20 64 186 ヨ ENTR 
10650 ※ 
10700 ※ 
1075Q ネ 
10800 1804 FFF6 FIRV 
1QO85O 1806 O1EO FIRJ 
10900 1808 FDQ5 SUETI 
10950 10 人 FCBO CMIME 
11000 10C FDOD FSGRQ 
1105O *※ 
11100 ※ 
11150 4 
11200 OO0O GOFR 
11250 OOO01 LTO 
11300 QOO2 TEND 
11350 * 
11400 ※ 
11450 ※ 
115OO 10E O600 GLOH 
11550 ポ 
1160Q OOOO SEG5 
11650 OOO6 SEGF 
11700 OOQC CHUN 
11750 OO01S CTA 
1180O0 QO1 SCaL 
11850 OO01E REFPE 
11900 O024 RFTC| 
002 フ 7 TENP 
OO029 MFOR 
12050 Q0S2 人 Aa STaT 
12B100 QOS2E PART 
12150 OO02C CTRL 
3 
* 
※ 
1810 STAR 
12400 ※ 


ms 「) スト 2 ナウ ンド ・ エ ディ タ ( シ ー ケ ン サ ) ア セン ブル ・ リ スト re 





bt に MUSIC SEBUENCEKR 
PT OBJ 
program MUSIC _ SEQUENCER 
呈 a モ 14ーMAR- 晶 ミ 
au モエ h ロ ヒ Y。.SHIRAI 


Thi= 1 an aDD11 に a モ 1On DF ロロ Fam 千 ロ ビ 
FM-7 and FMN- 昌 uith a FPSG unit-。 





RG 1800 
Y1 BRAa START 
Y2 BRA STQF 
SYSTENM MEMORY MaF 
CT FDE も FFF6 
NMF _FDE まま O01EO 
NT FDE ま FDO5 
UF FDE FCBO 
DR FDH も FDOD 
CHNSTaNT 
QN EQU 9/ 
EQU 1 
R EQBU 2 
BLUEAL VaLTAELE 
RL FDE も 1EO0-ENTRY1 
TR_EGU 9 
NT EQU 6 
T  EGU 12 
VE EQU 
E EQU 
T EGU 
NT EQU 3 
ロ EQU さ ヲ 
NM EQU 人 41 
US EGU 4 る 
EGU 4 さ 
EGU 4 人 4 


START MUSIC 


T ELU 3 


PO5S1tion 1independen モ 
も の 5 上 ar キモ mu5iC 
モロ 5tOD mul5iC 


FTIR VC も OF 

FTIRG jump addr55 

らい Dー5y5 モ mm 1 ロモ 上 エビ 和 fa ヒ 選 addFrG55 
COmmun1i こ Ca キュ On Duff addr@55 
FSG addre55 


モエ ュ レ トモ Of = ロ uGnC 己 
GUEnC1a1 DOin ロ teF 
d 呈 1 a ツ ッ COun ロ モビ 

ロ ヒ も av ソ 与 1 ら モ @ 

呈 こ 1 己 巴 1 モビ 
レロ 己 は も らら 1 上 己 

ビ 選 己 は モ COun モ 上 己 ビ 

世 mDO し 1 上司 

己 ロ ツ 己 1 OD 己 い Wa ツ 与 ff ロ Fm 
も a い いら 上 @ ら 1 5 上 
PF F 弓 1 号 モ ほ ヒ 

CO ロモ ロロ 1 r 馬 らら 1 上 


ーー ニー ニー ニー 


し 】 
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20k32 
居 _1245O0 1810 さ 4 56 PSHS  D。X.U 
12500 112 1a 5O RCC た el9/ ma 1IRGSFIRG 
12550 2 LDD GLUEQL 。 PCR set q1obal1 base 
12600 LEAU ENTRY1 .FCR 
12650 LEAU D。U 
12700 和 LESR RESPSG Fee モ 上 PSG 
12750 C8 2 CLR STaATUG。U C1ear ha1t 季 1aq ロ 5 
1200 さ Q TFR U.D 
1285O 9 LDX SERSTR+SHFRRN※S。U トロ uenC1a1 Point 
12900 1826 3 RE LEAX D.X 3nd FDGa ト re51i ster 
RF 人 4 ら GTX SEBPNT+GHFRAN* つ 。 
人 F 5 日 Y 到 STX REPFEQAT+SHPRANK2。U 
仙 E 人 LDX SEQGTR+QLT ロ ※2。U 
さ Q BE LERX D.X 
4 STX GEBPNT+aLTOUKS。U 
CB 2O STX REPEAT+ALT ロ GS。U 
人 44 LDX SEQSTR+TENOR※2。U 
3O BE LEAX D、X 
AF 4 代 STX SEGBPNT+TENOR※2。U 
人 aF CB 22 STX REFEAT+TENUR*※ つ 。U 
13 さ 450 1B3F CC OOFF LDD 韻 ま OOFF 
13500 18B42 ED 4 STD CUUNT+SUPRRN*※ る つ 。U 1 ロ ュ モ de1ay COunter 
1 る ロ 1844 ED 4E STD CUUNT+aLTU*2。U 
1846 ED C8 10 STD CUNT+TENUR*S。U 
1849 ED C フ : ジア STD TEMP 有 OH。U init 上 emDO じ 51 上 
184C 6 91 LD 人 Aa 井 1 1n ロ 1 上 FED ら a 二 COun ロ モビ 
1 ヨ 4E 人 Q ア CB 24 STA RFTCNT+S ロ FRAN。U 
18551 人 7 CB 25 STA RFPTCNT+aALTD。U 
1854 人 7 CB 26 STA RFTCNT+TENOR 。 U 
139OO 1857 6F GB 2 ビ CLR CTRL.U se 上 tone to disah1e 
13950 185Q 3O = LEAX PLAY 。PCR et FIRG veC モ or 
14000 。 185E aF STX [FIRVCT 。PCR ユ 
1405O 1861 1 ア LBSR INTON interva1 on 
14100 1864 1C NDCC 音 第 AF clear IRCSFTRD mas ド 


14150 1866 55 FULS D。X。U。PC 








14200 

142SO STQFP MUSIC 

1430O 

14 さ 350 EQU ※ 

1440Q0 

14450 186 34 FSHS D。X。U 

14500 186a 1 谷 DRCC 50 ma5 ド TRGSZF TRG 
1455QO LDD BLUEAL 。 PCR et ロ 1oba1 base 
14600 LEAU ENTRY1 , PCR 

1465O LEAU D。U 

14700 LESR RESFPSG reset PSG 

14750 034 日 1BC2 LEBSR TINTHFF interva1 off 

14800 17 AE BC 8B9 LDX FIRJMP 。PCR reset FIRG vector 
14B5O _ 187D aF 9C BB4 STX FIRVCT 。 FCR] 

14900 188O 1C 人 QF ANDCC 音 生 人 F clear 1IRGSFIRQ mask 
14950 1BB2 3 D6 PULS D』X。U。PC 

150QOQO ※ 

15050 ※ PLAY MUSIC 

15100 1 

15150 184 PLAY EBU ※ 

1520O OO008 FLYMRK_EGU 8 

15250 4 

153 さ OO 14 さ 4 F6 PSHS D。 X。Y。U。PC 

15350 1886 EC BC 85 LDD GLOBAL 。 PCR =et g1oba1 base 
15400 18B9 3 BD FF7 ミ LEAU ENTRY1 。 PCR 

15450 18BD 33 CE LEAU D。U 

155OO 188F AE BD FF フ 7 フフ LDX CMNMBUF 。 PCR 

15550 1893 a6 01 LDA 1.X Check 1nt モ erva1 1aq 
1560O 1895 5 20 BITA 井 和 も 20 ェ in ロモ ev マ a1 ? 

15650 197 27 ま ワ 18B2 BEG YaLP NO return 

15700 1899 4 DF RNDAa 韻 生 DF C1 ら eaF in ロモ er ソ va1 子 18 ロ 
158750 189H Ra7 01 STA 1。X 

158BQO 189D 6 OO LDA SHPRAN 

15B5O 189F aZ CB 2B ST 人 Ra FART 。U 

159O0 18a2 BD 16 18BAQ BSR RUN p1ay SQFRANO 

1595O 18a4 6 O1 LDA 菩 QLTH 

16000 18Q6 人 Z CB 2H STa PART。U 

16050O 18a9 BD OF 1B ESR RUN play LTO 

1610O 188E 6 QOS LDA 菩 TENUR 

16150 188D 7Z CB 2B STa PART。U 

16SOQO 18EQO 8BD 08 18EQ ESR RUN p1ay TENOR 

16250 18E2 E BD FF5O YaLF LDX FIRJNMP 。 FCR 

163 さ OO _ 18B6 aF 6 STX FLYMRE。 

16 さ 350 18BB さ 紀 F6 PULS D。X。 YaU。PE 

16400 ※ 

16450 ※ ubrOutine RUN 

16500 * at 15ーFEBー 日 タ 

16550 *※ DaFam ら モ er 115 モ 

16600 ネ U : 三 で ロ 1Oba1 Da ※ 

16650 ※ a]1 ] 51 性 モビ コ 巳 己 紀 選 ビ ツ @ ロ 

16700 ネ 

16750 18Ba RUN EQBU 3 
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リス ト 2 
16800 3 
16B5O 。 1BEBA ミ 4 さら 6 FSHS 。D。X.Y 
16900 18EC 6 CB SE LDR FRRT。U ChecE ha1t 1a ロ 
16950 18EF C6 01 LDE 井 1 
17000 18C1 4a RUN1 DECA 
17050 1BCS 2E Q ミ 1 ヨ CZ ENT RUNS 
17100 18C4 5 合 SLE 
17150 18C5 SO Fa 18C1 ERA RUN1 
172OQO 18CZ7 E4 Cg Sa RUNE RNDEH STATUS。U ha1t 
17250 。 18CA 2S ら 6 75 1941 ENE NUR YES return 
17300 。 1BCC 30 4 に ビ LEAX CUUNT。U update delay COunt@F 
17350 18CE 6 CB SE LD 人 n FART 。U 
17400 18D1 4 QSLA 
17450 18DS 3O 86 LEAX 全 。X 
17500 18D4 EC 4 LDD ュ X 
17550 18D6 f さ CB 。 2 ア SUED TEMFH。U 
17600 1D9 ED 4 STD ュ ス 
17650O 18DE 4D TSTA COun モ tuUDP 
177009 1BDC。 326 63 1941 BNE NUR NH return 
17750 18DE 30 446 LEAX SEGBFNT 。U 
17 ヨ 00 18EO 6 CB SB LDAa FaART 。U 
17850 18BE ミ ヌ 4 人 SLR X ミニ 
179Q0 18E4 さ O ヨ 6 LEAX 介 。X で 呈 己 HUG ロ tia1 ロロ 1 ロモ エビ addFG5 呈 
17950 1BE ら 6 C6 7F LDE 菩 18 フ 上 1OOD COun モ er 
18O0Q0 _ 18EB 10aE 84 EXEC LDY ュ X ロモ in 上 FuCtiOn COdG 
18O5O 1BEE 人 6 人 O LDA が Y 丘 
18B100 1BED 10aF 8B4 GTFY 次 
18150O 18BFO 1 10 CMF 谷 昔 ま 10 Case CODE 
18 0 1 ヨ 8F2 24 65 1 ヨ F BEHS COUDE 1 も OXsHaLT 
18 18F4 8BD 4D 194 さ BSR HaLT 
1 昌 : 18F6 5F CLRE 選ぶ 1 呈 モ 1OOp 
18 さ 350 1BF7 2O 45 193E BRR NEXT 
18400 18F9 1 2O CODE1 CMPA 菩 ま 20 も 1X:DELAY 
1B450 1BFB 24 0 1902 BHS CODE2 
185OO 1BFD 8BD に 4 1958 BSR DELAY 
185S5Q 1BFF 5F CLRE EX1i= モ 1oop 
18600 19090 SO 3C 193E BR NEXT 
18650 1902 1 さ Q CODE2 。 CMFA 韻 ま さ O も 2X: TUNE 
1 ヨコ 700 1904 24 Q4 190a EHS CODE さ 
18750 1906 8BD 6 197 マ 3 ESR TONE 
1 ヨ BB0OO 190B 2O0 さ 4 19 さ E BRA NEX 生 
18 ヨ 5O 19Oa 1 40 CUDE3 CMPAa 革 40 生 う X: LEVEL 
18900 190 ビ 24 05 191 さ EHS CODE4 
18950 190E 1 プ 7 QOE7 19F 日 LESR LEVEL_ 
19000 1911 2O 2BE 19S3E ERA NEXT 
1905O 1913 日 1 5Q CDE4 CMFA 昔 ま 50 ま 4X:ENVELOFE 
19100 1915 24 05 hr が 85 BEHS CODE5 
1 ワ の 350 1 の 1 ア 717 OOFE 1 人 15 LESR ENVELO 
19200 。 191 20 22 19 さ E BRA NEXT 
19250. 191 選 1 6Q CODE5 CHMFA 菩 委 6O まま 5X: MTTCH 
19300。 191E 05 1925 EHS CODE6 
19 さ 50。 1920 1Z OOFE 11E LESR SMITCH 
19400 192 さ 20 19 193E ERR NEXT 
19450 1925 日 1 7o CDE6 CMPFRA 井 和 70 も 6X: HFPERQND 
19500 1927 24 05 192E EHS CODE7 
より 0 3 ウジ ワウ は ア O1AQ 1aD6 LHSR ロ FERRN 
19600 192C 2O 10 19 さ E ERR 全 NEX 征 
19650 192E 1 Oo CODE7 CMFA 韻 ま BBO フ X: BRQNCH 
19700 193O 24 05 19 さ フ EHS CODE ヨ 
3 の 75O) 92 ルズ O1FQ 1EB2F LESR BRANCH 
19800 1935 20 07 19 さ E ER NEXT 
1985O 1937 1 90 CODEB CMFA 井 90 生日 Xs LOOF' 
19900 1939 24 0 に た 1 コ EHS NEXT 
19950. 193B? サブ OS1D 1BSBE LESR LOOF' 
2OOOQO 193E 5 NEXT DECE deCFm 選 ロモ 1OOD COun モ モビ 
20050 193F 2A 7Z 18E8 BEFPL EXEC ビ 
20100 1941 35 E ら 6 NUR FULS De XaPG 
20150 し 3 
2OSOO 3 ubroutine HaLT 
ピコ 3 at 15-ーFEB- 晶 
2 ) * Daramーter 11is= モ 
SO350 * U := ミー ロ 1 ロ Da1 Da ら @ 
20400 * a1 1 1 モビ らら aF ビ 選 じ 己 らら 選 じ ツ @ ロ 
SO450 ※ 
SO5Q0O 194 マ HaLT EQU ネ 
SOS5QO ※ 
SO600 。 1943 3 06 FSHS D 
206O 1945 6 C8 SB LDR FART 。U se も t ha1t f1a ロ 
SO7O0 1948 C6 01 LDE 菩 ま 1 
20750 。 194 人 8 4 人 HALT1 DEC 
2OBOO 。 194E SB 19 1 1959 BMT HaLTS3 
2OB5O 194D 58 GLE 
20900 。 194E SO Fa 194 谷 ERA HALT 1 
2O950 1950 EA 人 CB SA HALTS ロ RE STaATUS。U 
2OOO 。 の 所 ア C ヨ 2 谷 STBE STaTUS。U 
21050 1956 35 6 FULS D.PC 
21100 * 
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リス ト 2 











2 る 135 〇 
81400 
21459 
S1500 
ご 155O 
1600 
21650 
1700 
21750 
ご 18009 
2185QO 
1900 
21950 





22500 
2255O 
22600 
22650 
2700 
22750 
22800 
2285O 
22900 
22950 
23O000 
23050 
2 さ 100 
2 さ 150 
23200 








DDD ト 


さけ 


2 さ 600 
2 さ 650 
23700 
2 さ 750 
23B00 
2385Q 
23900 
23950 
24000 
2405O 
24100 
24150 
24200 
24250 
24 さ QO 
24 さ 5Q0 
24400 
24450 
24500 
2455O 
24600 
324650 
247Q0Q 
24750 
248OO 
345QO 
24900 
24950 
SS5O0Q 
2S505O 
25100 
る 25150 
25200 
25250 
25 さ OO 
5 さ 50 
35400 
2545QO 


1958 
195 谷 
195 ビ 
195F 
1960 


1962 


1966 
196 
196 谷 
196B 
196D 
196F 
1 ウジ 1 





さ 1 


に 9) 


6 さ 
E4 
17 
E6 
58 
さ O 
EC 
さ O 
6 
さ D 
さ O 
人 n ら 6 
4 
4 日 
EC 
仙 7 
6 
4 
17 
E6 
4 ビ 
1 フ 
141<】 
81 
トン 4 
全 6 
に 6 


1958 
OOQ0QO 


さら 
4 に 
CB 2B 


6 
D O3BF 
E4 
OF 


全 ら 
4 
4 
E ら 6 


197 さ 
O001 
OO00 


さら 6 

7F 

2C 

7 19F4 
CB 1 

CB 2BE 


に に ] 
OF 


21 


4 


91 198E 


E4 

CB SC 

SF 19F4 
OC 

0 19AS 
QZ 

Q2B9 1CSZ 
E4 

09 19AB 
0Z 

O2BO 1C2 フ 7 
E4 

E4 

Q261 1COF 
CB 2B 


CB 12 
5 

BD OS2B4 
1 人 


BB 
61 
QF 


6 
E4 
CB 2B 


さ F 1COF 





E4 


OS239 1COF 
ら 1 

2 じ 

18 19F4 
C ヨ 2B 

10 











* subroutine DELAY 
*※ da キモ 1 ローFEB- 
* Daram 己 モビ 115= ト 
*※ 和合 = ニ ミ in5truction_ Code 生ま 10。. 生 1F 
* U ミロ 10ba1 Da5=e 
し a1 1 r 己 ) ら モ 己 ら コ 選 じ 己 6 選 に Ve ロ 
も 3 
DELaY EQGU * 
DLYCUD EQU 9】 
* 
FSH5S DS Y 
LEAX COUNT.U 
LDR 人 FART。U 
人 SL 
LEAX 谷 。X 
LERY LENDRT。 FCR こ a11 に u い 1 a モ 己 
LDA DLYCHD.S 1ength-data addr@ ら 5 
介 NDRa 韻 和 OF 
人 QSL 人 a 
LDD 合 。Y 
ADDD ae 
STD が 品 己 も モ dl1ay COun モ 上 e ヒ 
BES DA が XP 
※ 
*※ Subroutine TONE 
※ da も 14ーMQR- さ 
* DaFam モ er 1is= モ 
※ 台 て 1 ロモ ビ u い と 上 ュ 3On_ CO ロ d = まま 2O。。 ま 2 ビ 
※ Us に 1ODa1 Das@e 
L く 1 1] 上 己 ら 1 キモ B ビ 5 コレ じ 己 ほほ レツ YE ロ 
し 4 
TONE EQU ※ 
TNCOD EQGU 1 
TONMRE _EBU 9】 
※ 
FPSHS D、X。Y 
LEAS ご 3 あら 
CMFA 2 
EHI ENQT 
LEAY SCALE 。U 
LDE PART。U 
QSLE 
LEAY B。Y 
AND 人 Aa 韻 ま OF 
STA 14Y 呈 己 モ ら Ca1 与 上 51 5 上 @ 
CLR PA 
TSTE 
ENE ポ + マ 
INCE 
STH TONMRR 
代 NDE CTRL。U も tone ff1 aq ロ =O マ 
BEG ENQT YES return 
CHMPA も OC Fr も や 
ENE TO1 
LD 人 井 フ 
LESR REDFSG 
RB TUNMRK。G tone off 
BRA TO2 
TO1 LDA 草 フ 
LESR REDPSG 
CONM TUNWMRK 。 ら 
人 QNDB TUNMRK。S tone on 
TOS LESR MRTPSG 


LDB FART 。U 


SLB 
LEAX CTAVE 。 U 
LDD BBH。X Ca1 1 こい 1 a モ 己 


LEAX SCLDQT 。 PCR ほら こら a1 選 ー ロ & モ a addrG55 
LDQ 26 


MUL 

LEAX D.X 

LDA TONCOD.S 
RNDR 井 ま OF 
SL 人 

LDD Ra、X 

STAa TONMRK 8 
LDa FRRT 。 有 U 5=e 上 On 己 「 司 1 モ e ビ 
SL 

LBSR MRTPSG 
LDE TOUNMRK 。 
TNCA 

LESR MRTFSG 
LDA TOUNCOD . 
CMF 人 a 韻 ま 2 ビ 

EEG EN ロ T 

LDA FART。U 
LDH 井 和 10 
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リス ト 2 
255OO 19E1 4 和合 TON1 DECA 
255GO 民 ウ E 選 2B 19EZ EMI TUNES 
25600 19E4 58 SLE 
2565O_ 19E5 紀 . 20 FA 974 ERR TON1 
25Z00 1 ワ EZ EE CB 2 人 TUN2 BITE STaATUS。U check enve1ope f1aq 
750 19ER 2 フ 68 19F4 EEG EN ロ T 
25 ヨ 0Q 19EC 6 OD LDA 菩 1 ミ ュ f 千 ] a ロ デー1 then 5e ト ri ロロ 呈 
25BBO_ 39EE。E6 E8 29 LDBE MFORIM。U 
25900 。 19F1 1 フ 7 O21H 1COF LBSR MRTPFSG 
25950。 19F4 さろ ら 1 ENQT LEAS 1 
26000 19F6 3 HB ら FULS D。X。Y。PC 
6050 ※ 
6100 * =ubroutine LEVEL 
2615O * at 1 フーFEBーB2 
262O0 し ロロ aam 己 モレ 115 モ 
介 = で 1 ロ 呈 trFu ヒ モ 上 ュ On COd@ = まさ 0O.。。 も さ F 
* U := ニ < 1Ooba1 basee 
ポ 1 ] 己 ら 1 ら 上 G じ 呈 AF じ 己 BBFVGG 
26400 し 3 
6450 19F LEVEL EQU ※ 
26500 OQ0Q1 LEVCOD EQU ま 
ご 6550 0000 LEVMRE EQU 9 
S6600 * 
26650. 19F 日 3 06 FSHS D 呈 己 モ 1V@1 
26700 。 19FA - 7F LEAS ー1。8 
26750 。 ユ 9E ビ G8 LDA は に 】 
26800 。 19FE CB 2B DD 人 n FART 。U 
2685O 101 O22 う 3 1C2 フ LEBSR REDFSG 
26900 104 10 人 NDE 菩 ま 10 
So6950 1 人 06 E4 STE LEVMRE 。 8 
27000 108 ら 1 LDE LEVCQD.S 
27050 。 10R QF 人 QNDE 韻 ま OF 
27100 180C E4 ORE LEVMRE。5 
27150 1aOE O1FE 1COF LEBSR MRTFSG 
27200 。 1a11 61 LEAS 1。8 
27250 。 1 人 13 さき 昌 ら 6 FULS D。 PC 
27300 1 
※ subroutin ENVELOFE 
2S7400 3 at 1 ローFEBー ヨ ダ 
7450 * DaFam ら tr 11 も 
27500 ネ 谷 = ニー で 1n5truction_ Code : 生 40。。4F 
27550 し U := ミ ロ 1oba1 ba=@ 
27600 し 3 81 1] 悟ら 1 ら モ ら G ビ 呈 a ビ 選 じ 己 5 己 ビ Ve 
7650 ※ 
27700 1Q15 ENVELO EQU L】 
27750 * 
27800 115 34 OS FSHS 全 5 己 モ GnV@1 OD ら い aVv Orm 
27 ヨ 850 。 1a17 4 QF 人 aNDa 韻 OF 
27900 。 1 人 19 谷 Z EBI ジウ STA MFORIM。U 
27950 11C 355 B2 FULS 仙 。 FC 
SBQO00 ※ 
2805O ネ ubFOu も in SMITCH 
28100 * at 14-MQR- ュ 
2 コ 150 * DaFameteF 11i= も 
SBSOO ネ 谷 *ー で 1ntFuCtioOn_Code : $O。 も 
※ U := ミミ ロ l1oba1_base' 
* 1 1 上 己 ら 1 ら 上 司 aFG 5@ ビ ツ @ ロ 
ピン し 3 
28400 1a1E SMITCH EQU ※ 
2B450 O001 SMICUD EQU 1 
28500 O00O SMIMRE EQU O 
2B55O * 
SB600 。 1a1E 06 FSHS D 
28650 。 1a2O さら 7F LEAS ー1。S 
28700 。 1Q22 6 OZ LDa 韻 ア 
2B750 124 17 O2OO 1C2 フ 7 LESR REDPFSG 
SBBOO 1a2S7 6 61 LDAa SMTICHUD.8 
2885O 。 1A29 日 1 50 CIMFAa 韻 和 ま 5O Ca5 与 CUDE. 
28B90O0 。 1a2B 26 11 1n3E ENE SMITO 征 0:tOne On 
2B950 1a2D 6 CB 2E LDa FART。U 
29000 。 1 人 3O C6 O1 LDEH 菩 和 1 
29050 1 人 32 1 プア OO09 1aCF LESR BITSEL 
29100 135 EA CB 2C URE CTRL。U et tone 1a ロ 
29150 1a3B EZ C8 2C STE CTRL。U 
29200 。 1 人 3E 16 OOBD 1aCE LEBR 人 An HCTIMGS 
29250 1a3E 日 1 1 SMITO _ CMFA 井 和 品 1 も 呈 1: モ On@ Of 
29300 。 1a40 26 店 1Q5 ミ BNE MIN1 
29 さ 50 142 6 CB 2EB LDa PaRT。U 
2940O0 1245 C6 91 LDH 菩 和 も 1 
29450 1 人 47 1 フ 7 GOOB5 1aCF LESR HITSEL 
29500 。 1 人 4 紀 さ CNH 
29550 1a4E E4 EB 2C 人 QNDE CTRL.。U clear tone 1a ロ 
29600 。 1a4E EZ CB 2C STB CTRL 。U 
29650 1851 20 78 1aCH ER HCT IMS 
S9700 。 153 1 に アス MIN1 CMFA 韻 和 ま 王 つ も マコ ュ ロロ 1 5 己 On 
29750 155 26 14 1 人 6 BNE SMINO 
29BOO_ 1a57 EZ E4 STBE MTMRK。 
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AhX ク 








29850 
29900 





き Q0109 
さ 015Q9 
3O2OO 





30400 
30459 
ミ 05OG 
さ 0550 
3060Q0 
さ 06509 
さ 0700 
さき 075QO 
さ O8Q0Q 
さ Q ヨ 5O 
さ 0900 
さ 309509 
さき 100QO 
さ 105O 
さき 110QO 
さ 1150 
さ 1200 
さ 125O 








さ 1400 
さ 145O 
さ 1500 
さ 155O 
さ 1600 
さ 16509 
31700 
さ 175Q 
さ 180Q0 
さ 185O 
さ 1900 
さ 1950 
さ 2SOQOO 
さ 2050 
さ 2100 
さ 215O 
さ 2200 
さ 2250 
さ 2 さ 00 
さ 2 さ 50 
さ 2400 
さ 245O 
さ 2500 
さ 255QO 
さ 26Q0Q0 
さ 32650 
さ 2700 
さ 275O 
さ 280QO 
3285Q0 
さ 2900 
32950 
ささ 0OO 
さ 305QO 
ささ 10Q 
3 さ 150 
ささ 200 
うさ 3250 
ささ さ 00 
ささ さ 5O 
ささ 400 





ささ 750 
ささ BOO 
ささ 80 
ささ 900 
ささ 950 
さき 4000 
さ 4050 
3410Q0 
さ 4150 








159 
185 ビ 
1AS5E 
1 人 6 
168 
1 人 64 
1 人 6 ら 6 
1 人 69 
1A6E 
1a6D 
186F 
1A71 
1a74 
1876 
1A78 
187 谷 
187C 
1a7F 
1a81 
1 日 ミ 
1A86 
1a ヨ 9 
1aBE 
1A8D 
188F 
191 
19 マ 
196 
1 人 99 
189 に ビ 
1A5E 
1A7F 
1aa1 
1 人 naS 
1aa4 
1Qa フ 7 
1 人 a 
1AAC 
1aaE 
1aEO 
1AB2 
1AE4 
1AEZ 
1 人 B 人 人 
1aBD 
1AEF 
1aCO 
1AC2 
1AC ミ 
1AC5 
1AC8 
1aCE 
1aCD 


1ACF 
1aDO 
1aDS 
1aD さ 
1aD5 


1 人 AD6 
1aD 
1aD 人 Aa 
1aDD 
1aDE 
1aEO 
1QE 
1QE 
1 人 aE フ 7 
1aE9 
1 人 EE 
1aAED 
1aF1 
1aF ミ 
1 人 aF5 
1aF ア 
1aFA 


人 6 
C6 
8D 
C8 
E4 
6 
1 フ 
SO 
1 
2 ら 6 
巨 ア 
人 6 
に 6 
8D 
ER 
86 
17 
SO 
6 
RB 
4 
谷 ら 
81 
8 ら 
C4 
6 
AB 
1 フ 
仙 ら 6 
C6 
4 代 
2B 
58 
20 
E4 
EZ 
20 
8B1 
326 
CA 
6 
41=1 
+ ブ 
人 6 ら 
C6 
人 4 
2B 
58 
2O 
EAR 
EZ 
さる 2 


さ 5 


4 谷 
2B 
58 
20 
3 


さき 4 
さ O 
E6 
5 
さ Q 
EE 
10fE 
EF 
EE 
1 
に に 】 
10QF 
20 
1 
26 
さ QO 
全 ら 6 


CB 2EB LDA FART 。U 
98 LDE 韻 $ 日 
6F 1QCF ESR EITSEL 
お 計 E ロ RE 井 和 ま FF 
E4 RNDE SMTMRE。 
97 LDA 幕 Z 
91 人 6 1COF LESR MRTFSG 
60 1QCE ERA HCTIMS 
らき SMINO _ CMPA 代 韻 も 5 さ まさ : ロロ 1 号 呈 ロ f 千 
する 1281 ENE SMTIVE 
E4 STBH SMTUMRE 。 ら 8 
CB SB LDAa PART 。U 
Go LDH 韻 ま 日 
= ア 2 1aCF BSR BITSEL 
E4 RE SMIMRE 。 
07 LDR 人 井 7 
6190 1COF LEBSR MRTFGSG 
4 人 1 人 ACE ER HCTIMS 
98 SMIVE  LDAa #8 
C8 2B DD FART 。U 
O19E 1C2 フ 7 LESR REDFSG 
61 LDA SMICOD 8 
4 CIMF 全 韻 $ 己 4 Ca CHDE 
1D 1AAC ENE SMTIVO ま 人 44: VO1um Or 。 GnVG1ODG Off 
EF RANDE 井 EF 
Q8 LDA # 
CB 2H DDA FART 。U 
O176 1COF LESR MRTPSG 
C8 2B LDA FRART.U reset enve1one 1a ロ 
EF LDBE 井 $EF 
SMVE1 DEC 
Lek1 1 人 4 Er SMVES3 
SLH 
F 人 189E BRA SMVE 1 
CB 2a SMVES aaNDE STATUS。U 
CB 2 STB STATUS。U 
1F 1aCE ERRQ HCTIMS 
=) SMIVO _ CMFA 井 $ 王 選 呈 呈 YO1 um Of 千 。 envVe1OD@ On 
1E 1ACE ENE HCTIMS 
9 ORE 間 ま 10 
O8 LDA 日 
CB8 2B DD FART。U 
0155 1COF LESR MRTFSG 
C8 2B LDA PART。U set enve1ope f1aqg 
10 LDE 韻 ま 10 
SMVO1 DEC 
03 1AC5 BINI SMVO3 
SLBE 
FA 1ABF BRA SMVO1 
CB 2 人 SMVO2 ORE STATUS。U 
C8 2a STB STATUS.。U 
61 HCTIMS LEAS が ら 
6 FULS D,FC 
* 
BITSEL DECA 
Q さ 1AD BNr LESTIB 
QSLE 
FA 1ACF BRA BITSEL 
LESTIB RTS 
ネ 
ネ ubroutine ロ PERAND 
※ date 17-FEE-B2 
※ DaF8m 与 モ B レ 1155 キ 
※ 介 = ニー で in ロモ 上 い ヒ 1On_ COdG = も 60。 ら 1 。 も ら 62 あらさ 。 6 人 4 
3 U := < gl1oba1_base > 
ネ a1 1 r1 モビ ほら コレ ヒロ じ 己 ほ ら ビ ved 
* 
1AD6 ロ FERAN EQU ※ 
OO0Q6 OFEGE EQU に 】 
※ 
フ 6 FSHS DX Yk 
4 ら 6 LEAX SEGPNT。U 
CB 2E LDBE FART。U 
SL 
85 LEAX BE, X 
4 LDU ュ メ 
C1 LDY ュ U+ Y = ニーロ DEFrand テ 
84 STU 5 
66 LDU UFEGE 。 5 
ら 60 CMFA 井 ま ら 60 こ a5= 己 CUDE 
0Q6 1QF マ ENE SETUCT もら 60=: ら e モ 上 mDO 1 5 
CB 37 STY TENMPH。U 
さ 谷 1E2D BRA NaAREFD 
ら 1 SETCT CHMFA 昔 ま 61 生 ら 1 s ら 己 モ ヒモ avV 己 じ 己 ら 1 モビ 
QOC 1EQ ミ ENE NISFRG 
CB 12 LEAX CTaVE 。 U 
CB 2E LDR FART。U 
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さき 42OO 
さ 425QO 
さ 4 さ る OO 
さ 4350 
34400 
さ 445Q 
さき 4500 
さ 455QO 
さ 4600 
さ 4650 
さ 4700 
さ 475QO 
さ 4800 
さ 485Q 
さき 4900 
さ 4950 
3500O 
さ 35050 
35100 
3515O 
さ 52SOQO 
さ 5250 
35300 
ささ 50 
35400 
さ 5450 
さ 5500 
さ 5550 
さ 5600 
35650 





35700 
さ 5750 


さ 64509 
6500 
36550 
さ 36600 
さき 6650 
さ 6700 
さ 6750 
さ 6800 
さ 6850 
さ 6900 
3 さ 6950 









さ 70509 
さ 7100 
さ 7150 
さき 72O00 
37250 





さ 7350 
さ 7400 
さ 7450 
さき 750O 
さ 75580 
さ 760Q 
さ 7650 
さ 770Q 
さ 3775O 
さ 780O 
さき 785Q 
さ 7900 
さ 7950 
3 さ B00Q 
3050 
310O 
38158O 
さ 38200 
38250 
ささ OO 
383 さ 50 
さ 40Q0 
3450 





1aFD 
1aFE 
1BOo1 
1BO さ 
1BQ 
1BOQO7 
1BO 
1BOB 
1BOE 
1B1O 
1B12 
1E14 
1E16 
1E1 昌 
1B1E 
1B1D 
1B1F 
1EB1 
1ES4 
1ES ら 6 
1B28 
1B2 人 na 
1H2D 


1E2ZF 
1HE1 


4 
10aF 
SO 
1 
26 
1F 
6 
3Z 
20 
1 
2 ら 6 
専 所 
6 
17 
1 だ 
1F 
6 
17 
2O 
1 
FE 
1 フ 


うら 5 








1H さ ら 
1 ミア 
1H39 
1H3Ei 
1E3E 
1H40 
1B42 
1E44 
1B46 
1EB4 
1E4E 
1EB4E 
1B5O 
1H5 
1H54 
1E56 
1B59 


さ Q 


108E 
臣下 
EE 
仙 ら 6 
4 
27 
E6 
人 Q1 
ぞ ら 6 
EC 
さ 1 
10aF 
さら 5 





20 


6 
2 全 
6 
09 
SO 
96 
9101 
1D 
る 6 さ 
12 
2O 
OBE 
OOF 4 
SO 
9 
0C 
QQOEE 
OZ 
ら 6 生 
20 
OOES 
F ら 6 





OO0OO 


76 
4 ら 
C8 


5 
4 
1 
4 
らら 6 
E4 
OF 
Oa 
Cg 
C8 
C5 
9 ア 4 
4 
aE 
4 
F ら 6 


2E 
24 


7 ら 
CB 2 
CB 2 
4 ら 
CB 1E 
5 


全 避 
5 
に {6 
9/21 
91 
4 
人 Q 人 4 
C4 
OF 
1 
QBE 
4 


QF 
4 


1B2D 


1B1O 


1COF 
1B2D 


1COF 


1COF 
1B2D 


1COF 


1E5 


1E7D 


1BBC 


1 BBC 


NISFRG 


ENVFRG 


FTION 


GL 
STY 
ERAa 
CMF 人 Rn 
ENE 
TFR 
LDA 
LEBSR 
ERR 
CMFRa 
ENE 
TFR 
LDA 
LESR 
TFR 
TFR 
LDA 
LESR 
ERA 
CHF 人 Ra 
TFR 


人 。X 
NaREFQ 
韻 ら 2 
ENVFRG 
Y。D 

## ら 
MRTPSG 
NaREFQ 
韻 あ 6 さ 

ロ FTI ロ N 
Y。D 

昔 11 
MRTPSG 
Y。D 
a。H 
#12 
MRTFSG 
NaREFO 
芋 ら 4 
Y.D 


も 6 ご らら モ ngoisG freduenCy 
=1 . 22 ヨ BE+Q6/ 16※ 


も ら 6: ら 己 上 niVe1 OD 己 TF@G ロ unCY 
fー1 . BBE+Q6/ で 6※ 


6 人: ロ DtiOn 


LESR 
NaREFH FULS 


MRTFSG 
D.X。Y、U.FC 





* 
ポ 呈 い DFOutin 己 ERRNCH 
※ at 2 ローFEBーB タ 
ポ DaFam 己 モビ 115 も 
* 人 = モニ で in5truction_ COd@ も 70。. ま 7F 
※ U := ニ ミミ ロ 1oba1 ba 呈 
も 3 き 1 1 rr 己 1 ら モ レビ 5 ビレ 己 じ G ら 己 ビ ツ VGd 
* 
ERANCH EQU ※ 
BRaGBE EQU ら 
ERQACUD EQU Q 
* 
FSHS D。X。Y。U 
LEAX SEGQFNT。U 
LDBE FaRT。U 
SLB 
LEAX は 。 
LDU 4 
LDY ェ U++ Y ニテ OpDeF and 
STU s メ 
LDU ERAGH 。 
LD 人 a BRACOD .S 
人 QNDRa 韻 あ OF 
BEG ERRaLM 
LDE FART。U 
LEAU RFTCNT 。U 
CNMFA E。U 
BNE HCNARE 
ERaaLM LDD sX 
LEAY D。Y 
STY ィ 
HCNQRB FULS  。D,』X.Y。U.FC 
素 ubrOutine LOOP 
ポ da 上 ご 1 JUL 
*※ DaFameter 1i ら ト 
4 谷 と 1 ロモ キ Fu い ヒモ 上 ュ 1On COdG@ : ま $O。 日 1 
* U 1oba1 base ※ 
LOOF EQU も 1 
3 
FSHS DX 
LDBE FART。U 
LEAX RFTCNT 。U 
LERY SEGFNT。U 
LEAU REFERAT。U 
LEAX HB。X 
QSLBE 
LEAY 昌 。Y 
LEAU BE。U 
CMFA 菩 ま O Ca5= 己 CHDE 
ENE ENDLHP ま BQOiLOOF 
LDH 菩 1 5 己 モ FGDGa ト 上 COunt@ ビ 
STE 6 も 上 GD ら Ga 『@51 5 上 
LDD 。Y 
STD ェ U 
BRA FL 
ENDLOF CMP 谷 井 負 日 1 まま B1:END_LOOFP 
ENE POL 
LDE ュ メ 1nCF 選 m ら ロ 七 Da 上 上 1 5 上 
TNCE 
ANDB 井 ま OF 
STB 人 
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さ 500 
3855O 
3860O 
3865Q 
さ B7QO 
38750 
さ 38OO 
3885O 
3B900 
さ 3B950 
さ 39000 
さ 9050 
39100 
さ 9150 
さ 9200 
さ 39250 
さ 9300 
39350 
さ 9400 
さ 3945Q0 
395009 
さ 9550 
さ 9600 
さ 9650 
39700 
39750 
さ 9800 
さ 9850 
さき 9900 
さ 3995 〇 
40000 
4005Q0 
40100 
4015Q0 
40200 





40400 
40450 
40500 
40550 
40600 
40650 
40700 
40750 
408QOO 
4085O 
40900 
40950 
41000 
41050 
41100 
41150 
412O0 





41350 
4140O 
4145Q 
415QO 
4155Q 
41600 
4165O 
417oO 
41750 
41BQO 
4185o 
4190O 
4195O 
42o0O 
4205O 
421oo 
4215o 





4245O 
42500 
4255O 
42600 
42650 
42700 








1BBB 
1BBA 
1BBC 


1EBE 
1EB9O 
1B94 
1HB96 
1E9 
1E9 人 人 
1B9C 
1E9E 
1BAO 
1BA2 
1ER4 
1BRA ら 6 
1EAB 
1BRa 人 Q 
1 BAC 
1ERE 
1EE1 
1BE さ 
1BE6 
1BE9 
1EBBE 
1BEE 
1BCO 


1ECS 
1EC4 
1EC 昌 
1EBC 人 人 
1EBCC 
1BCE 
1EDO 
1BD2 
1BD4 
1ED6 
1BD 
1BD 人 Aa 
1EDC 
1EDE 
1BEO 
1BE2 


1EE4 
1EBE8 
1EE ム 
1EEC 
1EFO 
1EF4 
1EF6 


1BF フ 
1EFE 


EC 
ED 


35 


さ 4 
人 E 
BD 
6 
トル 4 
8D 
8D 
6 
全 フ 
6 
トル 4 
人 6 
84 
FEIA1 
トル 4 
CC 
ED 
ED 
CC 
ED 
ED 
BD 


さ 5 


さき 4 
RE 
8D 
B6 
谷 フ 
BD 
D 
86 
合 フ 
8 ら 6 
仙 フ 
人 6 ら 
4 
谷 フ 
BD 


さら 


6D 
SB 
8B6 
仙 Z 
6D 
21 
さ 


き 4 
86 
に 6 
BD 
4 谷 
る 

日 ら 
C6 
8 ヨ D 


C4 
a4 
F6 


1BBE ・ 


16 
BD FC 
4E 

さ E 
OS 
SE 
46 

さ 3D 
02 

1 
0 

0 人 4 
FE 
02 
04 
OOOQ 
OD 

8 11 
9001 
OF 

B8 1 ミ 
る Z 
96 


1BCS 


出品 
8BD FC 
1 人 
に 1 コ 
Q2 
る フ 
12 
さ D 
02 
O1 
0 さ 
04 
選 生 
04 
15 


92 


9D FC 
Fa 
BO 
D FC 
9D FC 
FA 


76 
1BE4 


1EBF フ 7 
1EE4 


1EF ア 


42 
1EE4 


1EF7 
1EE4 


1EF フ 7 


SO 


1BE 和 4 


18 
14 
1EFO 


9D FCOD 


1EBFC 


06 
OF 
OO 
QBE 


FE 
OZ 
FF 


02 


LDD が FGD ロ Ga モ 
STD 
FOOL PULS DX Ya。U。PC 
ネ 
も 4 Subroutin ら INTERVAL UN 
* da て 2 ローFEBー ヨ 2 
し 1 a1 1 1 幻 モビ 5 aFG じ 己 ほら E ビ ツ @ ロ 
※ IRGI&FTRGC muust be masked! 
1 
INTUN  EBU * 
も 4 
FPSHS D.X 
LDX CMMEUF 。FCR 
BSR STPFSUE 
LDR 井 和 まさ F@ad 上 imeF 
STAa に で か 1 C 
ESR RSTSUE 
ESR STFSUBE 
LDA 井本 まう D 呈 己 モ キュ mr 
STA ズ 。 ュ メ C 
LDA 井 ま 19 et TC。T 人 2。 本 ーD 
STA さ 。X RS 
LDa 4。X 
人 QNDA 井 ま FEE interva1 mod@ 
RA 韻 生 02 enab 1 1 ロ nt 上 erya1 
STA 44X 下 
LDD #O 
STD 6 
STD の 
LDD 井 1 3 
STD 15.X TS= ま 0000Q0001 (SOmg) 
STD 19.X% TSーD= ま 0000O0Q001 
ESR RSTSUE 
FULS D。X。PC 
3 
3 ubFOutine INTERVAI_ ロ FF 
も 3 at メロ ーFEBー ヨ 2 
※ a1 1] rr@51 teFr5 arG FeSeFVed 
※ TRGESZFTRB must be masked! 
3 
INTHFF EQU 4 
し 4 
FSHS 仙 。X 
LDX CMMEUF 。 FCR 
ESR STFGSUE 
LD 人 ム 韻 ま 3E ad 1 mr 
STA 2。X 
BSR RSTSUE 
ESR STFSUE 
LDA 井 ま さ D 己 ト imr 
STa 2。 X [m 
LD 人 n 井 ま D1 et TC 
STA さき 。 X RS 
LD 人 a 人 4。X 
介 NDR 井 和 ま FD di ab1 与 1 ロモ 上 己 ビ ツ a1 
STA 4.X TO 
ESR RSTSUE 
FULS 全 。X。PC 
ポ 
STFSUE TST [SUEINT。FCR1 
EMI STPSUE ready 
LDA 韻 ま BO StOD 5uD-5y5tem 
STA ESUBINT。FCR] 
STFSU1 TST [SUEINT。PCR] hugy マ 
EFL STFGU1 
RTS 
ポ 
RSTSUE CLR ESUEINT 。 FCR ] = ほ モ a ビ モ Su セー= ョ ys も モ m 
RTS 
* 
ポ subroutin RESET FSG 
ネ * 呈 き も 1 一 FEEーB 
し 3 き 1 ] し 己 ら 1 号 モ 己 じ 弓 コ ビ 己 刀 弓 ビン @ ロ 
※ 
RESFSG _EGU * 
* 
FGSHS D 
LDAa 昔 15 し 巳 ら BE ト PFGG 『 己 ら 1 も @F 呈 
LDH 韻 ま O 
RESFPS1 ESR MRTFSG 
DECA 
FL RESFS1 
LD 菩 ア 
LDE 井 ま FF 
ESR MRTFSG 
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2750 
42BQOO 
4285O 
42900 
42950 
4 る OO0O 
4 さ 05O 
4 さ 100 
43150 





43300 
4 さき 50 
43400 
43450 
43500 
43550 
4 さ 600 
43650 
4 さ 3700 
4 さ 750 
4300 
4 さ 3B50 
43900 
43950 
44000 
44050 
44100 
44150 
44SOO 
44250 
44 さ 00 
44 さ 50 
44400 
4445O 
4450O 
44550 
4460O 
4465O 
44700 
44750 
44BOO 
4485QO 
44900 
44950 
45000 
45050 
45100 
45150 
45200 





455400 


45500 
45550O 
4560Q 


1COD 


1COF 
1C11 
1C15 
1C17 
1C19 
1C1E 
1C1D 
1C1F 
1C21 
1C2 さ 
1C25 


1C ジ フ 
1C29 
1C2D 
1C2F 
1C1 
1 ささ 
1C35 
1C ミ Z 
1C ビ 3 
1CSE 
1CSD 


1C3F 
1C41 
1C43 
1C45 
1C47 
1C49 
1C4E 
1C4D 
1C4F 
1C51 
1 に ロミ 
1C55 
1C ロ 7 


1 ビ 59 
1CSBE 
1C5D 
1CSF 
1C61 
1 じ 6 さ 
1C65 
1C67 
1C69 
1C6H 
1C6D 
1C6F 
1C71 


1C7 ミ 3 
1C ビ 7Z5 
1 フフ 
1C フ 9 
1C7B 
1C7ZD 
す ビ 7F 
1C ヨ 1 


35 


さき 44 
RE 
内 フ 
6 
全 フ 
6F 
EZ 
6 
RaZ 
6F 


さ 5 


さき 4 
RE 
PA 
6 
内 フ 
6F 
6 
仙 フ 
E6 
6F 


さ 5 


6 


1COF 


1 
BD FEF フ 7 
91 
0 ミ さ 
4 
4 
91 
QOS 
84 
4 
92 


1C2 フ 


12 
BD FBDF 
91 
0 さ 
4 
B4 
01 
4 
01 
4 
92 


1CSF 


0922 
O89F 
082 さ 
Q07E 
073F 
06D7 
067 
061 日 
05C1 
056E 
052O 
Q4D6 
O00O 


0491 
Q44F 
O411 
03D7 
03QO 





QOS6BE 
900QO 





91DO 
01BE6 
O19D 
9186 


FULS D。FC 





3 
※ SubFOu モ in ロ 与 MRITE TO FSG 
※ (= 9=】 1 FEEー 昌 2 
※ DaFam 刀 モ F 1115 も 
も 3 介 =: ニ ド re ロ ister 5 己 1 ヒ モ tion s 〇 。。1 ロ 
* Bs da も a = 0O。。 ぞ 5 テ 
も 3 a1 1 F@ ロ 1 らら モビ 5 ar 己貴 ビ V 己 
ネ 
MRTPSG EQU 3 
※ 
FPSHS 仙 。X 
LDX FSGADR, PCR 
STa 1.X 
LDa 井 和 まさ ビュ a モ ch addr ら 5 らら 5 
STA ュ X 
CLR ュ X inaCt ュ vV 己 
STB 1。X 
LDA 井 ま る いじ ュ モモ 与 口 a モ a 
STAa ュ X 
CLR ュ X in ロ aC 寺 1 vV 
FULS 人 。X。FC 
※ 
※ subroutine ら READ FRHM PSG 
* date 1 FEB-2 
ネ Da レ am 己 モビ 115 キ 
し 介 : ニ < く regi5=ter_ =e1ection 』 0O..15 ※ 
ポ return Ya1u@ 
氷 BE := ニ < data sg 0。。255 > 
* 人 R。X。Y 。U Fr@ ロ 1 上 司 a レ 握 己 己 [vV ロゴ 
3 
REDPSG EQU 3 
し 1 
FPSHS 人 R。X 
LDX PSGADR 。 PCR 
STA 1.X 
LDAa 韻 和 まさ し a モ ch addre ら 5 
STa ュ X 
ELR ュ X in ロ aCti vV 
LDA 菩 各 1 rad da モ a 
STA 。X 
LDE 1 X 
CLR ュ X inactiv ら 
FULS 仙 。X。 FE 
3 
※ SCALE-DQTA ( さ 2.9 一 3969Hz ) 
3 
SCLDAT EGU ネ 
※ CTAVE QO 
FDE も 0922。 ま 09F 。 も O0B2 さ 。 ま 07E 、 まり 7 さ F 。 も 06D7 
FDBE まま 067 己 、 証 061 日 。 05C1 。 056E 。 02O。 ま O4D6 
FDE 第 0000 
※ CTAVE 1 
FDE も O491 044F 。 も 04 1 1 。 皇 03D7 。 0 さ RO 。 も O さ 6 
FDE 0 ささ 日 、 あ O さ OC 、 ま 02EO 02BH プ 。 0OG9O。 026 日 
FDB も 0000 
3 CTAVE 2 
FDBE ま 024 日 、 和 022 日 、 ま 0GO9。 ま 01EE。 01DO まま O1EG6 
FDH まま 019D。 も O1 昌 6。 ま O1 プ ロ 。 ま 015C。 ま O1 4 日 。. 主 1 さ 6 
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45700 
45750 
458Q0O 


45900 
45950 
46000 


46050 


4610O0 
46150 
46200 


46300 
46 さ 50 
46400 


46450 


46500 
46550 
46600 
46650 
46700 
4675O 
46 ヨ 0O0 


4650 


46900 


4695O 


47000 
4705O 


1C ヨ 3 
1C8B 紀 
1CB7 
1C ヨ 9 
1CBE 


1C8D 
1CBF 
1C91 
1C93 
1C95 
1C97 
1C99 
1C9H 
1C9D 
1C5F 
1CAa1 
1CA さ 
1CA5 


1CA7 
1CA 
1CAE 
1CaD 
1CAaF 
1CE1 
1CH3 
1CB5 
1CBZ 
1CB9 
1CEH 
1CED 
1CBF 


1CC1 
1CC さ 
1CC5 
1CCZ 
1CC 
1CCB 
1CCD 
1CCF 
1CD1 
1CD さ 
1CD5 
1CD7 
1CD 


1CDB 
1CDD 
1CDF 
1CE1 
1CE さ 3 
1CE 紀 
1CEZ 
1CE 
1CEE 
1CED 
1CEF 
1CF 1 
1CF ミ 


1 選 F5 
1CFZ 
1CF 
1CFE 
1CFD 
1CFF 
1DO1 
1DO ミ 
1D05 
1DQZ 
1DQO9 
1DOE 
1DOD 
1DOF 
1D11 
1D1 ミ 


9O170 
015C 
91 4 日 
013 ら 6 
000O 


O124 
O114 
0104 
OOF6 
OOE 
OODBE 
OOCF 
QOC さ 
OOBB 
OO8E 
0Oa4 
OO9E 
000O 


0092 
908 
00B2 
007H 
0074 
OO06D 
0067 
0062 
O05C 
0057 
0052 
QO4D 
9000 


0049 
00455 
0041 
003D 
903 人 
0037 
0034 
0031 
002E 
OOSB 
0029 
0027 
0000 


00255 
0022 
0021 
OO1F 
OO01D 
001B 
O001a 
0018 
001 フ 7 
0016 
00155 
001 さ 
O000 


1CF5 


さ OOO 
2400 
1800 
1200 
QOCOO 
Q09OO 
O60QO 
048O 
O30O0 
024O 
9180 
1000 
980O 
90400 
OS2OO 
9100 


FDBE 
* OCTAVE さ 3 
FDE 


FDB 


FDE 
3 CTAVE 4 
FDBE 


FDB 


FDBH 
し CTaVE 5 
FDH 


FDB 


FDBE 
し 3 UCTAVE 6 
FDH 


FDB 


FDE 


ENDaAT EQGU 


生 美美 科 


FDB 


FDBH 


FDE 


FDE 


END 


OOOO 


ま 0124 、$0114。 ま 0104 。 抽 OOF6。 も OOE 日 OODE 


も OOCF 、 ま OOC ミ 。 ま OOBB。 ま OOAE 。 ま O00R4 。 生 OO9H 


まま OO0OQ 


ま 0092。 ま OO0B 全 。 和 ま OOB2 007 日 。 ま OO074。 ま OO6D 


0067 。 ま 0062 。 ま 005C。 ま 005 フ 。 OO5S。 0O4D 


も OO00O 


証 O0049。 ま 004 ロ 。 ま 004 1 。 00 さ D 。 003 介 。 生 OO0 フ 


0034 。 ま 00 さ 1 。 ま 002E 。 も OO 。 も 00S9。 生 00 


$0O00 


も OO25。 も O022 つ 。 も 0021 。 ま 001F 。 ま OO1D。 和 ま OO1H 


0O1。 あ 001 日 、 ま 0017。 ま 0016。 ま OO1 旨 、 ま OO1 さ 


生 0000 


LENBTH-DATA 


※ 


和 まさ OO00。 も 2400。 征 180O。 も 120O0 


も 0OCOO 。 抽 O900。 ま 0600。 も 04 昌 O 


生 O さ 00 。 0240。 ま 01 ヨ 0。 和 も 100O 


OBOO。 ま 0400。 ま 02OO。 ま 010O 
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ES サウ ンド ・ エ ディ タ (S り UB) ダ ンプ ・ リ スト 
ら 十 る 直 生 。 キ 5 よら 6、 キ プ + 日 + サ "で + 旨 FC +D エピ 4510 QQ OO oo Oo oo oo oo oo oo oo oo oo oo QO_ QQO OO _ sgOO 
4C 1F 9?EB CE 4C QO CC 45 OO DD oO_ CC 4520 OO QO OO QQ oo oo oo oo oo oo oo oo oo oo QO 00 iQOO 
CC _ 455 BB DD Q4 CC 4 9O DD oO6 CC 4 45S さ 0 OO QO Qoo oO oo oo oo oo oo oo oo oo oo oo Q00 QO siGO 
QO_ EC 02 DD QR 17 Q1 9E ED 1 on 1 454Q QO QQO OO QO OO oOQ Oo OO oo oo oo oo oo oo 0Q0 OO siQQO 
ロ C > RF DC QC 36 96 DC 455O OO OO OO Oo go oo oo oo oo oo oo oo oo Q0_ 00 QQO gzOO 
49 5 49 5 49 5 49 456O OO OO oO oo oo oo oo oo oo oo oo oo oo oo QO OO iQO 
07 10 327 O1 2 ら NM 457O OO OO OO oO oo oo oo oo oo oo oo oo oo QO OO _ QQ iQQ 
OE 16 01 1 45BO BO O1 ヨ B0 O2 81 OoS 2 oo oo oo oo oo 78 oo GIF に / 
Q5 9E OoOa 459O OO OO FF FF OO oo oo oo oo oo oo oo oo oo oo oo 骨 罰 世 
? BB 36 10 Oo 45RO OO0 OO QO QO oO oo Qoo oo oo oo oo oo oo oo oo oo OO 
EC BE ED D1 1C RF DC sDE 45EO OO OO QQO QO oo oo oO oo oo oo oo oo oo oo 0O_ QO iQOO 
DC = 9E。Q6 5 日 49 EE s 1D 45SCO OO OO QQO oo oo oo oO oo-oo 0 

04 5 49 EC BE 45DO QOO OO QQO 0O QQ OO OO oO oo 

4D EC1 aa CO ES 45EO OO _ QO QQO oO OO oo oo oo oo 

SE Oo2 5 49 EC 45FO OO QO 00 QOo QQ QQO oo OO oO 


さら 6 06 CC OO Qi 
10 さ 4 10 17 O 
























ケ 4 9 麗 ビア 





Sumi 計 和 本 らら 


人 dd 


+H +C +D +E +F Sum 
4100 コ 


0C 10 27 
EC BE 36 06 
3 人 4 06 さき プア 
10 17 02 4 3 6 日 
DC oE 9E 06 5 49 
1o DC OoE 
Y DD 
> oo 


OO 


4180 CC OO 00 1O 
41EGO 潮 4 1 肖 190 
91 の 党 4 19 4E 
41DO OO Q フ oO 
41EO 34 19 后 。 6 


6D 20 


41FO _ 45 64 





Sums 2 





+BE +C ビ +| 
OK を 






5 QO 19 






oO 呈 っ 
2 





CC OO _QQ 
っ 4 1O 
4 10 17 O1 BO : フ 9 
コ F RS 33 42 CC sBB 
0 DD 12 CGC OO さ O 36 06 DC 122 16 QOO 5 








06 CE OO 0OC HBD 4D 1F CS 00 19 DD 14 
CC QQO 4E 36 0Q6 DC 14 C3 OO _ 09 36 06 
96 CC 00 56 Q6 CC 


7 1C SF 5C.F7 BC 4D OZ7 7 る 94 D1 C1 


+7 + 日 +9 + +B + ピ 
さ 4 10 さ Z 10 34 10 
さ 4 10 17 01 44 32 
9O 2F 5 ささ 42 CC OO 
OO 16 OO 9D CC OO _QO 
Q6 36 Q6 DC 16 16 QQO 7F DC 16 36 06 
4D C1 36 Q6 DC 16 さ 36 Q6 CC OO _Q6 BD 
E4 CO 10 27 Q0O 5a DC 12 36 06 CC OO 
D ミ 16 さ 6 Q6 CC QQO_QC BED 4D 1F CS QO 
14 36 06 CC OO 4F 36 0Q6 DC 14 C3 QO 
QO 5F 36 96 CC QQO _QQ 36 06 CC OO QO 


+1 
3 フ 
さ Z 








Q2 に 10 3Z 
10 さ 10。 3 
DC 0 2ExiFE 
12 C さ OO QO1 DD 12 QS C4 10 2F FF SD さ 
64 36 06 CC OO 54 ED 4D 1F 36 06 EC 





Q0_ 06 BED 4D 1F ES C1 C3 QO 19 DD 14 





Add  + す 0 〇 す 1 2 する +4.+5 + す 6。+ フ + せ 日 +9 + +B + ピ 
4400_ 06 CC QO 05 BD 4D 1F C ミ QQO 3E DD 1 EC 66 日 3 OO gzCBE 
4410 Q4 1O 2F QO Q7 DC 14 C ミ OQ _Q6 DD 14 DC 14 36 Q6 20 
442O DC 1 さ 6 06 DC 14 C ミ 3 OO 09 ミ 6 06 DC 1 ビ さ OO 02 szE1 
44 ミ 3O さ 6 Q6 EC 62 C さ OO O4 6 Q6 EC 6 3 さ 6 06 CC OO 02 gEE 
4440 さ 4 06 3Z 10 さ 4 10 3Z 1O 34 10 ミ Z 10 34 10 3Z 10 :22 
445O 34 1O さ 37 10 34 10 さ 37 1O 34 10 17 QO QOS 32 6E 39 s4D 
4460 17 QO 61 CC FC 2 DD 1 9E 1Q CC OO 15 EZ BQO EC za5 
4470 6 EZ BO_ EC 6C E7 BBQO_ EC 62 ED 日 1 EC 64 ED 日 1 EC :F6 
44 ヨ Q 66 ED 1 EC 68 ED 1 EC 6E E7 BO 9F 1 17 QO 45 :6C 
4490 39 17 OO _ さ 0 CC FC 2 DD 1 9E 1a CC OO 03 EZ7 O zaF 
44AO_CC OO_ 05 EZ7 Q CC OO 12 EZ7 OO EC 62 EZ Q EC 64 =:2 
44BO EZ ヨ Q CC QO 11 E7 O DC 10 CS OO BQ EZ O 9F 1 sFA 
44CO_ 17 OO 12 39 B6 FD 0Q5 2B FB CC OO BO FZ7 FD QO5 B6 s さ SB 
44DO_FD 05 2 FE 39 CC OO OO F フ 7 FD QO5 39 C6 OO 1F 9B sz:DE 
44EO 7E 94 BD OO OO _ 00 OO _ OO _QO_ OO_QO OO QO OO QQO _QO sz9F 
44FO_ OO OO _QO_QO_QO OO 00 QO _ 00 QQO QO QO QQO QO OO 90O OO 


10 





dd 0 1 + + さ +44 + 日 + ら 6 + プ + 日 +9 +Q +H + ビ +D + せ E +F GSum 
4500_QQ_ OO 1D OO 27 FF 2 QO さ F FF 1D OO QO QO OQ 0O :C6 











F6 


沖 
Q9Q0 
OO 
日 7 


+2 
QO 
oO 
0 


+ さ 
oO 
QO 
oO 


QO 


51 


+ 紀 
OO 
QQ 
QO 





+ ア 
QO 
9O 
oO 


+ 日 
0O 
oO 


+ 日 
OO 
oO 
QO 
Q0 
00 
90 
oO 
OO 


FO 


8E 


+ 
QO 
9O 
QO 















S1 















































1 01 OO OO OO oo QO QO OO QO 00 OO :B || 4FZO BO B7 FD 05 E6 FD Q5 2Q FE 35 2 7F FD Q5 1C QQ is6 
EQ OO OO QO OO OO OO OO QO QQ OO OO :a2 || 4FBO 39 さ 4 05 C6 12 BD 59 BD DD CC 29 QQ FD FC B2 BD :97 
OO OO 0OQ OO QO 00 QQ OO QQ QO QO OO :OO | | 4F90 EQ BD D3 BD 02 35 B5 C6 BO Bo FC B3 FA FC BQ F7 :7BH 
OO OO OO OO oo oO oo Oo oO Oo oo oo :Oo || 4FAO FC BO SO D7 ミ 4 さ 5 C6 1 BD 36 BD BA CC 04 02 FD :BE 
OO OO OO OO QQO OO OO OO QQ QQO OO OO :OO | | 4FEO FC B2 CC 11 o7 FD FC 4 BD C1 BD aa F6 FC B ミ 26 :FF 
OO OO OO oO oo oo oo QO oo oo oo oo :ooO || 4FCo 2Q F6 FC 4 27 12 5 5 5 27 QD 1O BE FC BB 6 :E さ 
OO oO OO OO QQO OO OO OO QO QQO QQO OO :OO | | 4FDO AO 27 Q5 a7 BO 5 26 F7 C6 OD E7 4 BD B9 5 B5 :DB 
OO OO OO QO OO OO OO QO OO QQ OO oo :Oo | | 4FEO BD B4 6 OC FD FC 日 2 20 92 QO QO 4F 1F BB BD a7 :FD 
OO oo oo oo oo oo oo oo QO QQO oO Oo :Oo || 4FFO Be6 FD O1 B1 FF 27 Q6 7D FD OF 7E De BO 7E 94 BD =:5D 
OO OO OO OO O0:OO OO OO 00'00 00 OO OO | | ーー ニーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
oo oo oo oo oo oo oo oo oo oo oo oo 
DO 
際 Add  +O +1 +2 + ミ +4 +5 + ら 6 + フ +B +9 + 人 +E +C +D +E +F Sum 
oOO さ 4 7F C6 4C 1F 9B CE 4C OO CC 45 OO DD Qoo CC 45 :98 
5O10 BO DD 02 CC 46 OO DD o4 CC 47 BO DD 06 9E QO EC :52 
5O2O O6 DD OB 9E OO EC QB DD Oa CC QO QC BD 4E DE DC :o1 





Add +O +1 +2 + 和 4 5Q 
4BOO QO QO _QQO oo 5040 
4E10 OO _QO OO 0O 5o5O 
4B2O QO OO OO 0o 5060 
4E3O_00 OO_Q0O 00 507Q 
4E40 QOQ_QQO 0O QO_ OO_QO OO QQO OO _ OO QQO OO _QQ QQ OO gi0O 





4B5O_ OO _ OO OO OO _ 00 OO _QOO0_QOQO_QOO_ OO _QOQO_ OO _QOQO_ OO _QO gsOO 

4E60_ 00 00 0QO QO_ 00 _ 00 _ 00 00 00 00 00 00 _ 00 90 QO_ iQO 

4EZ7O_ OO QO_QO OO_ OO QQ _QO oo oo Qo Qoo oo oo Qoo oO soO 5OBO DD 12 17 1Q 39 17 1B Q6 17 QC 9E CC QO OO 36 06 sa 
4BBO_QOO_QQO_0O 


OO0 OO QQO OO OO OO QO OO QO _QO OO OO iQO 50CO 
4E9O_QO OO_Q0O Q 5oDo 
4BBO_QO 00 _QQO 


4BDO Qoo QO oO QO OO OO QO OO QQ QO OO QoO oO QO QO oo Sum: 1C BH1 2C E4 E5 Q6 
dd  +O +1 + つ + ミ +4 + ロ +6 + ブ 7 + 日 + す 9 +Q +E + ビ 
100 2C 50 28 72 6 品 20 70 61 67 65 2C 4a 2 
5110 








5200 97Z 
5210 Q6 
522QO 16 
Rdd 523O 09 
4DQOQO 5240 2 ら 6 
4D10 5250 32 51 
4D2O 5260 QO 
4D30 ョ 27O 4 CO E4 CO 10 27 Q1 
4D4Q 52 ヨ Qo 62 CC QQO OO DD 18B CC 
4D5O 49 2A F 44 56 ED 64 EC C1 2 O4 BD 2C ら 29Q 49 EC BE ミ FF FF 1Q 





4D60 60 2B 1E 5B 49 2Q FB 44 56 3 64 20 06 
4D7O FB E さ 64 1C FE 2H O2 1 O1 69 63 69 62 
4DBO_ EC EC 62 6D 61 さ 32 66 2 05 43 呈 3 C3 OO 


52O 
52BO_EC BB 日 3 FF FF 10 26 QO QB CC OO OB DD 
52CO OBE DC 1 9E 1C 5 49 EC BE 4F DD 1E 17 
52DO 16 EQ ED 4D D6 DD 20 DC 20 3 QO_QQO_ 27 
52EO BB3 OO 41 DD 20 17 16 D4 DC 20 36 Q6 CC 
52FO 4D B9 さ 6 06 DC 1E さ 6 06 CC QO 00 BED 4D 


の Uio ま まま - 到 3 


1 や OO ょ ぉ お ロ 0OO 
(Ei 四 


ト =】 
| 
e】 
ご 
ご 
ロ 
四 
二 
レコ 
(W 
い 
ご 
に 】 
〇 
いひ 
ロ 
1」 
ユ 
ユ 
に 』 
に 』 
四 
ロ 
コ 
ロ 
し リ 
ドリ 
| 
いひ 
G 
広 
に 』 
ロ 
ー 
Ll 
いひ 
4 
ひ 


Rdd  +0 1 +G + さ 人 44 + 品 + ら 6 + プ + 日 +19 + 全 +E +C +D +E +F Sum 533O DD 1E 17 16 7 DC 20 36 06 CC FF DE ED 


mm 


ロワ ドロ DD ご 







呈 48BO 17 OB D6 39 DC 12 日 S OO Q1 10 2F QQO 1H 17 17 64 sBC 
呈 49O DC 12 日 さ OO O1 DD 12 DC 12 34 Q6 17 16 a1 さ 2 62 siEH 
54AO DD 22 17 17 19 17 0 H1 さ 9 EC 62 ヨミ さ OO_QO 10 2F si5F 




















52 








62 7F 














































Add +E +F Sum 
55OQ さら 6 Q6 =:DZ 
55810 00 01 :BZ 
55SO 34 10 sgDa 

さ 4 10 s2C 

5B 49 :5B 
555O さ 36 06 si2F 
55609 0 さ Q 


5570 





5580 

559O 

55QO OO BC っ 

55EO 05 52 人 

55CO O 
2O 


55DGO 
55EO 
5SFO 


5650 ご 介 
5660 1E さら 6 
5670 


568 ヨ 0 


Sums 


Add 。 +0 
5700_ 06 
5710 19 
5720 
5730 
5740 
5750 
5760 
5770 
5780 
5790 
57AQ 





Q0_ Q ミ 
10 37 10 34 10 
10 17 16 
QO QA 
Q4 EZ 


QB 3 る 2 
90 
0O 






Q6 CC 
CC OO 
10 34 
10 さ 4 
OE ヨミ 
OO 3F 
03 36 
62 CC 


dd  +O +1 
5900 37 10 34 10 1Z 
5910 a さ 
5920 06 
593O CC 
5940 さ 4 19 
595O さ 4 10 17 15 
5960 
5970 
598O 
599O 
59aO0 
59BO 
59CO 
59DO 
59EO 


+ + ら 6 
094 aD 
42 3 
96 CC 
CC QO 
10 37 10 
さき 2 6E 
ED QB 16 
ED 8 19 
17 Q4 2C 32 
04 EZ 
17 Q04 
DC 2 16 
10 36 
DC 2C 
さ 6 Q6 


下記 


GO 10 
36 
10 34 10 37 10 
さ 7 10 
QO 
94 
62 
5 世 
EC 62 さ 4 
DD 
2 人 
QO 04 
DC 
GO 


QO 19 26 


9 日 
96 
EZ 
06 
CE 
2C 
BB 
さら 6 


さっ 


QQO 
96 
OO QO1 























7 7 





+D +E +F 
DC 2 DD 
4D 1F 
QQO 
1O 


+ さ +4 
2C ヒビ 3 


DD 3 


oO Q1 
04 QO 

3 さ 6 
090 
17 さ 6 
34 
さ 4 10 

Q0O 
9 

き 4 0Q6 
さ 4 10 : 
Q2 71 
4:】 


QO 
Q2 7F 
QO さら 6 
さ 4 10 37 10 
37 10 34 10 17 1 さ 
CE 9O 7 
0 さ 3 さら 6 
37 1O さ 4 10 37 10 
る 4 30 ネプ は さ 
CC Q2 7F 
03 さら 6 


096 OO _Q1 




















dd +0 +1 12 オミ オオ 
5COO_D さ 32 6E CC OO 
5C1O_ 00 QA9 DC 3 9E 

49 

さき Ra 

10 
5G5O F9 3 さ 4 さ 2 62 DC さ 
5C60 9E 04 EZ QA 17 
CZ7O_ CC OO OO0_ 9E 04 
5CBO 26 QO QA CC OO 
5C9O_ 00 7 10 26 0QO 
5CAO 32 62 DC 3C 8B ミ 
5CBO FC D9 32 62 DC 
SCCO 51 ささ 42-39 EC | さ Q 
5CDO 7F さ 6 Q6 DC 26 3 QO QB 36 Q6 CC Q2 6E さ 36 Q6 DC siD5 
CEO 2 C さ OO QO7 さ 6 Q6 CC OO Q1 36 06 CC QO 03 36 06 *i4S 
5CFO CC OO QO2 34 06 37 10 34 10 37 10 34 10 37 10 34 9 
Su D5 5E DB 2C 6D F3 43 21 CC D7 69 35 iC9 
dd  +O キ 1 +2 + 4 + 王 + せ 6 + フ 7 + 日 +9 + 人 8 +E +C +D +E +F Sum 
5DOO 10 さ 7 10 さ 4 10 37 10 ミ 4 10 37 10 34 10 17 11 C4 :9D 
5D10 さ 2 6E EC 62 DD 3 DC さ 9E 1C 5B 49 EC BE さ FF se6F 
5D2O FF 10 27 OO ささ DC さ Q 9E 1C 5 49 EC BB 1F 89 4F =4 昌 
5D さ O さら 6 06 DC さ a 9E 1C 5 49 EC BE 4F 36 06 DC ミ さ 4 :F 
5D40 06 ミ フ 7 10 さ 4 10 さ 7 10 さ 4 10 17 QO 6B さ 2 66 DC ご :49 
5D5O C さ OO O1 DD 3a 16 FF BE 39 CC QO QO 36 Q6 CC OO siBE 
5D6O_ 01 34 0O6 ミコ 7 10 さ 4 10 17 11 9E 32 64 ED 4D OH 270 za4 
5D7O 61 67 65 20 さ 人 20 OO CC OO0 04 さ 6 06 DC 12 BD 4E saC 
5DBO BQ 17 FD BF CC OO QO1 DD 40 CC OO _Q03 36 Q6 DC 40 ie6E 
5D9O 16 OO 1 DC 4Q0 ミ 4 06 17 FD 78 さ 32 62 CC QQO_ 00 さ 4 sa6 
5DaO さき 0 ジ F =6 る 
5DBQO Q6 iDC 
5DCO EC :BF 
5DDO Q6 :1C 
5DEO ED :B 
5DFO さ 6 sF5 
Sum: 7 ミ F7 D9 09 BE CD Q9 B2 5F 75 DO FB ES BED 12 CC :19 
dd +O +1 + つ 2 + ミ +44 +5 +6 + プ + 日 + す 9 + 人 Q +E +C +D +E +F Sum 
5EQOO 0Q6 CC OO 21 ED 4D 99 36 06 DC さ 4 さ 36 Q6 CC OO 25 OF 
5E1O 5 0 
5E2O 
SE3O 
5E4Q 
5E5O 
SE6QO 
5E7QO 
5EBQO 
5E9O 上 
5EAO CC OO _QOE BD 4D B1 Q4 CO E4 CO 10 27 OO _ 03 17 Q4 :FS 
5EBO 52 DC さ 4 さ 6 06 CC QO QF BED 4D 99 36 06 DC 34 36 :9E 
5ECO_ Q6 CC OO 10 BD 4D HB1 Q4 CO E4 CO 10 27 Q0_ 03 17 szF6 
5EDO O4 97 DC 34 ヨミ QO 11 10 26 OO GS 
5EEO 3 さ 6 06 CC QO BQO BD 4D 59 36 06 
5EFO 1 ED 4D B1 a4 CO E4 CO 10 2Z 
Sum: 17 BQ 1 BO 9C DF 6E C9 18 52 BD 8B9 DS 1 25 si7ZE 








5 


3 








6420 OO _ 02 さ 4 06 さ 7 10 34 10 37 10 34 10 37 
643O さ Z7 1O 34 10 さ 7 10 さ 4 10 37 10 34 1Q さ ア 7 
644O 17 QR 1 さ 32 E9 00 10 39 CC QOO QR 36 Q6 
6450_QOQ_ 04 ミ 6 0Q6 CC QQ 1D 36 06 DC 26 CS OO 
646Q DC QO6 昌 さ QQ_BO さら 6 
QO_ 46 36 06 
10 さ 7 10 34 
10 37 10 34 


64 ヨ O O6 CC 
6490 34 10 

64AO さ 4 10 39 DC 32 DD 
64BO_ OO DD OO 2 DD 2E 
64CQO OO Q1 9E Q4 58 49 EC BB 1F 89 4F 3 QO 
64DO_QO OB CC QQO QC DD 32 16 QO 05 CC QQO QA 
64EO 42 日 S QQO OO 10 2F OO aB DC 28 36 06 DC 
64FO_ さ C1 53 4 さ CS 00 0O1 DD 3O 17 FE 0Q フ 7 DC 





dd 。 +O 1 + す 2 すさ + す 4 + す 5 +6 + プ + 昌 +9 +Q +B +C +D+E+F Gum 
6S5OQ QB DD 2E DC 42 ヨミ QO Q1 DD 42 DC 44 B さ QO 00 10 7 
6510 26 OO OF DC さ 2 ヨミ OO QOS DD 32 CC OO QO1 DD 44 16 :DC 
6520 OO _QOC DC 32 C ミ さ OO Q4 DD 32 CC QO QQO DD 44 DC 32 :EE 
653 さ O さ 6 0Q6 CC QOQ QD BD 4D 9 さ 6 06 DC 3 ミ OO _ 01 9E : さ a 
6540 O4 5B 49 EC BB 1F 9 4F さ 6 06 CC QO ヨ Q BD 4D E9 :5E 
6S5O_ a4 CO E4 CO 36 06 DC 32 36 06 CC 00 OB ED 4D 9 :18 
6560 さ 6 Q6 DC 3 日 ミ OO Q1 9E 04 5B 49 EC BB 1F B9 4F : 日 
6570 さ 6 Q6 CC OO 日 1 BD 4D B9 4 CO E4 CO aa CO E CO :6 日 
65B0 1Q 27 OO QOC DC 32 日 ミ QO 07 DD 32 CC Qoo Q1 DD 44 :DB 









608Q 
6090 
60aO 
6QEO 
6QEO : 
60DQ 
6OEO 





Rdd  +O 1 キー オ さ 4 + 6 + プ + 日 +9 + 人 Q +B +C +D +E +F Sum 
66Q00 OO_Q さ DD 32 CC OO Q1 DD 44 16 OO QC DC 32 日 5 QO :BS 
6610 O4 DD さ 2 CC QO QQ DD 44 16 FF AE 39 CC QQ 71 さ 6 :e6F 
6620 O6 DC 26 C さ OO OC 36 06 CC OO 7 さ 6 QG6 DC 26 C さ :55 さ 
66 さ Q_QO _OD 36 06 DC OE 36 06 CC 0QO_Q2 36 Q6 CC OO 02 =:47 
6640 さ 4 O6 さ フ 7 10 さ 4 10 3 フ 7 10 3 さ 4 1O 3 フ 7 10 さ 4 10 3 フ 7 10 』:22 
6650 さ 4 10 さ Z 10 34 10 さ 7 10 さ 4 10 17 OB 77 ミ 32 6E CC 5C 
6660_ QQO プ 1 さ 6 06 DC 26 CS OO 1 さ 36 QO6 CC OO フミ 36 06 』s3C 
6670 DC 26 C さ OO 14 36 06 DC QOE さ 36 0O6 CC QO 02 36 06 45 
6680 CC OO_Q2 さ 4 06 37 10 さ 4 10 37 10 さ 4 10 さ 37 10 さ 34 :99 
6690 10 さ 7 10 34 10 3Z7 10 34 10 37 10 34 10 17 QB さ 4 iQ4 
66RQO さ 2 6E CC OO 65 36 06 DC 26 C3 OO QB 36 06 CC OO :E2 
66EO 67 さ 6 06 DC 26 CS QO 1 36 06 DC OE 36 06 CC OO iaE 
66CO_O2 36 Q6 CC OO Q2 さ 4 06 3Z 1O 34 10 さ 7 10 34 10 :5C 
66DO さ 7 1O さ 4 1O さ 37 10 さ 4 10 さ フ 7 10 さ 4 10 さ 7 10 さ 4 10 :2C 
66EQ 17 07 F1 さ 2 6E CC QO 6C さ 36 06 DC 26 CS QO 0 36 26 
66FO _Q6 CC QO 6C 36 06 DC 26 CS 0O 18 さ 6 Q6 DC OE さ 36 :B さ 


Rdd  +O +1 +2 
6700 06 CC 00 
6710 10 34 10 

672SO_ 10 34 10 
6730 C3 QOO OCG 
6740 06 DC CE 
6750_ 10 ミ 4 10 

6760_ 10 さ 34 10 
677Q 06 DC 26 
6780 QO 14 36 
6790 さ 4 O6 さ Z 
6780 さ 4 10 3Z 
67BO 02 7D 36 
67CO_ DC 26 CS 
67DQ CC QO_Q2 
67EO 10 3Z7 10 3 
67FO 32 6E CC 








Sums 69 C6 FE 日 ミ さ F 29 F BE4 2B 9D F1 35 B6 97 9 35 szDB 


dd +Q 1 + オ 2 オミ +4 + ロ +6 +7 + 日 +19 +Q +B +C +D +E +F Sum 
68OO 78 36 Oo6 DC 26 C さ OO 1 36 06 DC OE 36 Q6 CC QO siBF 
6810 02 さ 36 06 CC OO _Q2 34 06 37 10 34 10 さ Z7 10 さ 4 10 si5C 
6B2O' ミア 3O さ 4 1fO 37 1O き 4 1O 37 10 さ 4 10 さ Z7 10 さ 4 10 s26 
6 日 さ 0 3 36 Q06 CC OO 11 36 06 siE9 
6840 06 CC QO 07 さ 6 Q06 CC :O 
685Oo 
6860 
687O 
688Q 
68O0 
68aO 
6 ヨ BO 
68CO さ フ 7 1O さ 4 1O. 1Z 
68DQO DD 44 DC 42 36 
6BEO QO 11 DC 42 3 
6BFO OB SE OO DC 42 








dd  + 〇 1 +2 + さ +4 +5 +6 + フ + 日 +19 +Q + せ 日 + ビ +D +E +F Sum 
69O0O さ 6 O6 DC 44 BD 4D 1F Q ミ 3 C1 5 ミ 43 3 OO Q1 DD 42 :62 
6910 DC 44 36 06 CC OO Oa ED 4D SB 
6920 OO 26 aF 3 CC QO 28 36 06 CC 


693Q 34 10 17 05 DO 2 64 BD 4D QB 
640Q0_ 06 DC Q6 CS Q2 96 36 Q6 DC 42 さ 6 Q6 CC OO 16 BD 7 6940 SD 2O OO CC OO O4 ミ 6 0O6 DC ミ っ 2 


641Q 4D 1F E さ C1 36 Q6 CC OO 16 36 Q6 DC QE 36 06 CC 5C 6950 ミ 6 O6 CC OO 19 BD 4D 1F CS OO 


dd +Q 二 1 + つ + さ +4 + 口 + す ど + プ + 日 +9 +a +BH +C +D +E +F Sum 














5 生 

















いや H ロ SDm ロ や mOQuDOG 


ドコ 
田 
ちい D ょ よ ひ m ロ 


906 


6E6O CC FC B2 DD 5 9E 5 CC OO 1C E7 Q EC @62 1 :B ヨ Oo 
6E7O EC 64 ED B1 EC 66 ED 1 EC 6 ED 1 EC 6E EZ 0 =sQ1 
6EBO EC EB 1O EZ7 BO EC 6C E7 BO 9F 5 EC 6a DD 5a CC :5a 











Rd +O +1 + つ + キ さ 4 + 品 +6 + プ + 日 49 +Q +B + ビ +D +E +F Sum 
6FOO 5B 17 OO 45 る 9 17 OO さ O CC FC B2 DD 58 9E 58 CC :75 
6F10 OO _O さ EZ BO CC QO 05 EZ7 O CC OO 12 EZ7 oO EC 62 :z35 
6F2O_E7 BO EC 64 EZ7 O CC OO 11 EZ7 0 DC 10 C さ OO 0 gi91 
6FSQ E7 BO 9F 5B 17 OO 12 39 B6 FD 05 2B FE CC OO 0 giEA 
6F40 F7 FD 0O5 BE6 FD 05 2 FH 39 CC 0OO OO F フ 7 FD 0O5 39 :OD 
6FSO_C6 OO 1F 9B 7E 94 BD OO 0O OO 0QO OO OO OO OO OO 1F 
6F6O OO OO OO_ 00 OO 00 OO OO 0O OO 00 00 0O OO OO OO OO 
6FZ7O_OO_ OO OO OO OO OO QO OO OO QO 0O OO OO OO OO OO gzOO 
6FBO OO OO 00 OO OO 00 QQO QO 00 00 009 OO 00 00 QO OO OO 
6F90_O0 OO OO 00 OO OO 00 OO OO O0 0QO 0O 90 09 OO Q0 oO 
6FAO OO OO OO OO OO OO Q0 0OQ OO QO 00 00 OO 0Q 00 00 si0O 
6FBO OO OO OO OO OO OO OO OO QO 00 00 OO OO OO OO 0O0 OO 
6FCO OO OO QO OO OO 00 OO OO QQO OO 00 OO QO QQ QO 00 gi0O 
6FDO 00 OO QO OO OO OO FB EZ7 F EZ F6 50 05 AO F2 F5 gz90 
6FEO 05 QO 91 QA OO OO O5 aO C 48 04 3C DC 74 DD 11 : さ 3 フ 
6FFO DS BC OR 40 O4 41 BC 4 04 3C Da E2 70 57 70 DO iC5 
Sum: BB 4 さ 31 1 ビ 2 71 23 1 D4 E3 DB 64 92 15 8 3D siDD 
dd 。 +O +1 +2 + さ 3 +4 + 王 +6 + プ + 日 +9 +aA +B +C +D +E +F Sum 





dd +O +1 +2 + さ +4 + 王 + ら 6 + プ + 日 9 +Q +H +C +D +E +F Sum 
7100 41 4E 44 20 5E 47 45 4E 5D 39 47 2 65 6E 65 72 gzDB 
7110 61 74 65 2C 54 2 eF 6E 65 20 6 さ 3 74 72 6C 2C 45 s6a 
7120 28 6E 76 20 63 74 72 6C 2C 4E 2 6F 69 23 65 20 :53 
71 さ 3O 63 74 72 6C 2C 4C 28 65 76 65 6C 20 6 さ 74 72 6C siD6 
7140 2C 51 2 75 69 74 2C 3F QO BD 4D D6 DD 1C DC 1C :33 
フ 15O 日 さ OO OO 27 F4 CC OO OC BD 4E DE DC 1C 3 OO 47 s21 
フ 160 10 26 QO OS 17 OO 3BE DC 1C 日 さ 0O 54 10 26 00 03 9 さ 
7170 17 O1 3D DC 1C 3 OO 45 10 26 00 03 17 Q1 呈 1 DC 93 
7180 1C 日 3 OO 4E 10 26 QO 03 17 02 BF DC 1C BS QQO 4C si95 
フ 190 10 26 OO OS 17 Q2 D7 DC 1C 3 00 51 10 26 FF 46 si70 
71AO さ 5 FF BD 4D OBE 4E 6F 77 20 47 65 6E 65 72 61 74 6 さ 3 
71BO 69 6E 67 OO BD 4D 17 BD 4D 17 9E QO EC B4 3 00 11 
71CO OO 10 26 OO 1C BD 4D OB 44 61 74 61 20 6E 6F 74 :52 
71DO 2o 6C 6F 61 64 65 64 OQ0 CC OO 07 ED 4E DE 16 QO siS5E 
71EO CE DC 10 C さ OO 4O DD 1E CC OO 00 DD 20 CC QO 02 4F 
フ 1FO 36 06 DC 20 16 0O 5 BD 4D OBE 56 6F 69 63 65 2D OB 
Sum: F1 90 9B 35 53 17 25 F2 16 10 CC 39 37 a1 62 2E sg65 
dd +O +1 + つ + る 3 +4 + 王 + ら 6 + プ + 日 +9 +a +B +C +D +E +F Sum 
7200 OO CC QO 41 D3 20 BD 4E DE BD 4D QB 20 QO DC 20 si 人 
7210 5B 49 9E 10 さ O BB 36 10 DC 1E 93 10 ED D1 DC 02 :85 
7220 さ 36 Q6 DC 20 CS3 OO O1 36 06 CC 00 60 BD 4D 1F E3 20 
7230 C1 DD 22 17 03 a6 CC 03 EZ7 DD 24 CC Q3 EZ DD 26 gzFO 
7240 CC OO O1 DD 28 17 09 7 DC 2 日 3 FF FF 10 27 00 :3Z 
725O OE BD 4D OB 2E OO 17 Q4 1E 17 09 2 ミ 16 FF E9 CC sEZ 
7260 OO 2C 36 06 CC 0O OO 34 06 37 10 34 1O 17 QA 60 7 人 8 
7 フ 27O さ 32 64 BD 4D 17 DC 20 CS OO O1 DD 20 3 C4 10 2F zia 
728O FF 75 ささ 42 BD 4D 17 BD 4D OE 4 さ 6F 64 65 20 45 sFF 
7290 6E 64 20 41 64 64 72 65 7 さ 23 20 3 20 O9 DC 1E :2C 
7280 3 OO O1 BD 4E BF DC 1E 日 S OO Q1 9E QO ED QOa 39 s9 全 
72BO BD 4D OB 54 6F 6E 65 20 43 6F 6E 74 72 6F 6C 0O saC 
72CO BD 4D 17 BD 4D 17 DC Q4 さ 4 06 17 O1 C2 32 62 39 03 
72DO BD 4D OB 45 6E 76 65 6C 6F 70 65 20 43 6F 6E 74 si0Z 

72 6F 6C OO BD 4D 17 BD 4D 17 DC Q6 34 Q6 1Z sC さ 





フ 7390 20 E4 日 7 7 7 87 7 BZ 日 Z 2o 20 20 20 20 さ 1 さ 4 sBA 
フミ AO 20 20 20 20 20 3 2o E4 E5 E4 E5 E4 E5 E4 ES5 QQO s1E 
フ 3BO BD 4D 17 BD 4D 17 BD 4D OB 57 61 76 65 20 46 6F sBF 
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リス ト 3 

7 さ CO 72 6D 3F OO BD 4D E2 DD 2C BD 4D 17 DC 2C 36 06 78 Q6 CC QO 06 DC 

7SDO GEOO 00.'BD 4D.99 36 0O6. DC 2C 36 O6 EE IOO'1OE :BD 」 日 | | ニー デーーー ニ ーー デニー ニーーーーーーー ニ ーーーーー ニ ーー ニー ニー ニー ニニ ーー ニー ニー ニ ーーー ニ ーーーー ニ ーー ニニ ーー 

7 さ EO 4D B1 Q4 CO E4 CO 27 CB BD 4D 17 BD 4D OB 45 6E :E1 A5 DA BO 7B AD B 3C 9E EF F2 

73FO 76 65 6C 6F 70 65 20 54 69 6D 65 28 78 3Q 2E 3QO se 

ーー コニー ニニ ニニ dd  +O キ 1 +2 +4 + コ す 6 7 + せ 日 + す 9 + 負 + す 提 キビ +D ナビ 

Sums QC D6 AF E 8B5 C2 46 さ Q FQA 41 91 5 DF 94 52 41 :9Z 7900 OO 25 BD E1 A4 CO E4 CO 10 27 QQO _QF DC 5QO 
7910 QO 21 5 C さ QQO O1 DD 54 17 QO DB DC 50 

dd  + 〇 O 二 1 +2 + さ 3 +4 + +6 + プ + 日 19 + +BH + ピ +D +E +F Sum 7920 4 さ 10 26 QB CC OO OB DD 4 17 QO C フ 7 DC 5O 

74Q0O さき 1 73 29 3F OO BD 4D E2 DD 2E BD 4D 17 CC 00 3O si2Q 7930 OO 41 1O QO Oo8 CC OO OC DD 54 17 QO BE6 DC 

7410 さ 6 06 DC 2E BD 4D 1F DD さ 3O 39 BD 4D OB 4E 6F 69 siFO 7940 ヨミ OO 5 26 Q0 OB CC QQO QOD DD 54 17 oO Aa5 
7950 5O B ミ QO 10 26 QO OB CC QO OE DD 4 17 oo 
7960 DC 5O 3 6 10 26 QO_ QB CC OO _QF DD 4 17 
7970 ヨミ DC SO 06 CC QO Q6 BD 4D 99 36 Q6 DC 59 
790 06 CC OO BD 4D B1 a4 CO E4 CO 10 27 Q0 0C 
7990 5O 3 OO 5 49 DD 4 17 QO 7 DC SO 36 Q6 
790 OO _QOC BD 99 36 06 DC 5O さ 6 06 CC QO QE BD 
79BO _B1 a4 CO CO 10 27 OO 03 17 OO 70 DC 50 36 
79CO CC QO OF 4D 99 6 06 DC 5O 36 Q06 CC OO 10 
79DO 4D BEB1 a4 E4 CO 10 27 QO OS 17 QO CB DC 59 
79EO 0O 11 1Q QO_ 03 17 Q1 07 DC 4E CS 0O 01 DD 

3 OO0 Q1 10 26 00 OB CC 0O 





06 


06 





+2 
36 
E 
06 
9E 
E 
9E 
QO 
E 
06 
CC 
4E 
E 
49 
36 
10 


+ さ 
C3 
02 
1 フ 
02 
02 
O2 
5 
902 
CC 
oo 
4 コ 


っ っ 


EC 
06 
の 


4F 
50 
OO 0 


+ ら 
DD 
9A 
ト ア 4 


oOD 


OD < 


OD 
00 





ミ 4 
4a 
49 
EC 


さら 
DC 


721 


06 


52 
06 


50 


QO 


さ 9 


OO 


90 


Qoo 
3 
に ん 
50o 
OO 
49 





QO 


+ ピ 
Q1 
90 
っ 24 
は ビ 
10 
E 
96 
oo 
1 フ 
CC 
1O 
5o 
CC 
4D 
17 


oO 
アズ 
DC 
OO 
BE1 
901 


4F 
04 
CC 
41 
OO 
QO1 
4E 
00 
4 


05 


+ ビ 
16 
OO 
E ァ 
60 
BQ0 
E6 
4 ミス 
00 
さ 2 
DD 

和 
に 4 
BD 
CO 
DC 



































中 だ 
17 
CC 
90 : 90 
96 
CC s01 
D ミ 
32 
0O 42 
06 :F さ 
CC 
さ 6 
10 
00 


QOE 30 
26 OO 
さ 4 10 
E7 D1 
06 CC 
QE さ Q 
OO OF 
1 a4 
DC 50O 
CC FF 
3 QO 









さき 4 





Sum 

Add 。 +0 キン 。 さき 
7DoO OO E oO 
7D1O 62 QO_ Q さ 
7D2O EC EZ BQ 
7D3O OO EZ oO 
7D40 QO FZ FD 
7D5O 05 C6 QO 
7D6O_QO OO _ 00 
7D70 QO oO oO 
7D8O OO OO0_ OO 
7D9O_ OO QO_QO 
7DaO oO oO OO 
7DEO OO 





QQO 


+ ォ ア 
1 フ 
oo 
Bo 
oO 
65 
94 
oO 
oO 
oo 
GO 
oo 
DO 
OO 
oo 
oo 
oo 








42 
CC 
OO 





05 
wp2 
12 
2a 
BD 
oO 
oO 
oo 
oo 
GO 


OO 
OO 








EZ 
OO 
さ ワ 
FE 
OO 
OO 
QO 
QO 
OO 
oO 
OoO 
oO 
GO 
oO 
OO 


4E 





3 OO 
DC 40 
20 30 分 
16 FF 
62 さ 6 
C1 
1E C さ 
OO 9E 
oO1 36 
06 EC 
10 


Q1 









3 

























+Q TB 
CC FC 
0 CC 
3 は 』E ピ ダ 
E6 FD 
39 CC 
oO oO 
oO 0O 
OO OO 
OO OO 
QO_QoQO 


OO _( 
OO OO 





4C 7 日 
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エキ スパ ンダ 





ETF Laboratory 笠 作 貴 弥 





私 は FM-8 を 手 に 入れ て 約 1 年 以上 に な り ま す が , いろ 
いろ と 使っ て いる うち に , 次 の よう な 不満 が で て きま し た . 
⑯ モ ニタ 機能 が 貧弱 . 

音楽 機能 が な い . 
グラ フィ ッ ク 画 面 の ウィ ンド ウ ・ コ ピー が で き な い . 
@⑳ 漢 字 フ ォ ン ト を 使い に くい (プリ ンタ 出力 が で き な い ). 

特に 倫 は, 主 に マシ ン 語 プロ グラ ム を 作っ て いる 私 に は , 
決定 的 な こと で す . 

そこ で , 以上 の 不満 を 解決 すべ く 今 回 の プロ グラ ム を 制 
作 小 . ま し: た: 

また , FM-7 を 入手 し た の で 移植 し まし た . 


ブログ ラム の 概要 


F-BASIC で は , DISK BASIC 用 に $⑧E8 一 $FE ま で 
の 中 間 コ ー ド が 割り 当て られ て お り , これ ら の 中 間 コ ー ド 
は , R OM 版 BASIC で は 使っ て いま せん . そこ で , これ ら 
の 中 間 コ ー ド に 以下 に 挙げ る よう な ステ ー ト メン ト を 定義 
し , F-BASIC を より 使い 易く し よう と いう も の で す . で す 
か ら 。 こ の ブロ グラ 人 (DISK シ ステ ム 安 は 使う こと が 
で きま せん . し か し , 拡張 モニ タ 部 分 は DISK シス テム で 
も 使用 可能 で す . 


追加 ・ 張 化 さ れる ステ ー ト メン ト 








支 COPY 0 さ ジ ン 0RSV7e こ ピーー 

文 KSYMBOL 漢字 シン ボル 女 

文 KPRINT 漢字 フォ ント の プリ ンタ 出力 
@SCROLL グラ フィ ッ ク 画 面 の スク ロー ル 

久 CRT 画面 表示 を 人 禁止 / 解 除 

@PSG PSG ヘ へ データ を 転送 | PSYE2Z2ーー 
旬 MUSIC 音楽 演奏 ド 用 

旬 TEMPO MUSIC 娘 の テン ポ を 設定 

支 MON コマ ンド を 増強 








但 印 は FM- 8 の み 


プロ ログラム の 入力 ・ 便り 坊 





モニ タ , また は 何ら か の マシ ン 語 モニ タ を 使っ て 入力 し 
で I く 2 さい りう: 


入力 し 終え た ら ,、 FM-8 で は SAVEIMYEXPANDER" 
He6800, を H7DFE,&H6800 と し て セーブ し て お きま し ょ う . 

次 に EXEC&H6800 を 実行 する と, 

Expanded MONITOR! 

Expanded F-BASIC!! 
と 表示 され , 拡張 命令 を 使う こと が で きま す . 次 回 か ら は 
FM-8 を スイ ッ チ ON 後 , LOADM"EXPANDER",,R と し 
て , この プロ グラ ム を ロー ド す れ ば OK です. CLEAR 廊 の 
設定 も 自動 的 に 行なわ れ ま す . 

FM-7 で は , プロ グラ ム は 256 バ イト 単位 で の リロ ケー タ 
プ ブル に な っ て いる の で , $ へ ム へ 00 か ら 入 力 し て 使え ます . 
DISK シ ステ ム で は その まま , 通常 の BASIC で は 十 $1000 
番地 か ら 入 力 す る と 良い で し ょ う . 

入力 し 終 を たら SAVEM“EX 一 BASIC", START, END, 
EXEC| RETURN | と し て モー ブ し て お きま し ょ う . 

次 に EXECSTART| RETURN と する と “Expanded ド 
BASIC" と 表示 され , 拡張 命令 を 使う こと が で きま す . 次 
回 か ら は .LOADM “EX BASIC",JRI RETURN | と し て こ 
の プロ グラ ム を ロー ド す れ ば OK で す . REX-MON も 同様 
で す (START,END,EXEC は 入力 アデ ドレ ス ). 


ash PL 





書式 : COPY (Xi, Yi) 一 (Xs,。 Ys) 【,。 オフ セッ ト 〕 

機能 : グラ フィ ッ ク 画 面 の 指定 さき れ た エリ ア の み プ リン タ 

ピ っ ee ゆ - -or 5 

解説 : 座標 指定 は , 80X25 の キャ ラク タ 座 標 で 指定 し ます . 
オフ セッ ト は プリ ンタ 用 紙 の どの 位置 に コピ ー す る 
か 指定 する も の で , 用 紙 の 左 か ら 何 ドッ ト 分 オフ セ モ 
ッ ト す る か を 指定 し ます . 省略 する と オフ セッ ト な 
し と 見 な し ます . 
COPY(0.0) 一 (79.24).160 と すれ ば , HARDC2 と 同 
じ で す . COPY 命 令 で コピ ー し た 方 が 40 秒 ぐら い 速 
く な り ま す . 

この 命令 は , 初め ドッ ト 座 標 で ウイ ンド ウ を 設定 する よ 
うに し た の で す が , プロ グラ ム が か な り 長 く な っ た の で , 
の の よう 人 E 才 じ た 。 


文 KSYMBOL な 6. ire お 72 81607oSf678:9582tGi な GSth7oY To 


AN 一代 < 


1 


^1 


書式 : KSYMBOL(X, Y), 横 倍 幸 , 縦 倍率 (, 【 カ ラー コー 
ド 〕【, 機能 〕〕 : 漢字 コー ド 〔, 漢字 コー ド 〕 ・・ 

機能 : 漢字 フォ ント を 画面 上 の 任意 の 場所 に 任意 の 大 き さ 
で 表示 し ます . 

解説 この 部 分 は , 長山 泰光 氏 が 82 年 6 月 号 で 発表 きれ た 
も の を その まま 使わ せ て 頂き まし た . 
勝手 に 使っ て し まっ た こと を 誌面 を お 借り し て , お 
諸 び い た し ます . 
な お , この プロ グラ ム 全 体 を 作る に あたっ て , 長山 
氏 の プロ グラ ム を か な り 参 考 に させ て 頂き まし た . 
COPY 文 と この KSYMEBOL 文 を 組み 合わ せれ ば , か 
な り 応 用 が 効く と 思い ます . 


次 国 還 |ked2MAIRE2Se 


書式 : KPRINT 漢字 コー ド 〔, 漢 字 コ ー ド 〕 …… (9) 
機能 : 漢字 フォ ント を 直接 プリ ンタ (MB27401 ま た は MP- 
80TYPETII) に 転送 し 印字 する . 
解説 バッ ファ フル (48 廊 字 ) ま た は , 漢 字 コ ー ド の 代わ り 
に “ グ ? で 印字 改行 し ます . 
印字 は プリ ンタ の 標準 外 の 機能 コマ ンド ESC`J? を 
使っ て , 圧縮 邑 字 する の で 通常 女 字 と ほぼ 同じ 大 き 
さ で 印字 され ます . 
FM-7 で は 以下 の 機能 キャ ラク タ も あり ます . 
2c2050 が の アス ーー クッ リア の の パー ンジ 2 ルズ 
… 倍 文字 指定 
… 倍 廊 字 モー ド 解 除 
@… た て 2 倍 文 字 指 定 
以上 の 機能 キャ ラク タ を 漢字 コー ド の 代わ り に 使う こ 
と に より 、4 種 類 の 廊 字 の 大 き さ を 選択 で きま す . た 
だ し 通常 婦 字 と 縦 2 倍 娘 字 は 同一 行 に 混在 で きま せん . 


SCROLL TMRCCKKXCYNYOCCYU ま た XKOK2 す LZD 


書式 : SCROLL オフ セッ ト 値 , 方 向 

機能 : VRAM に オフ セッ ト を か け , 擬似 的 に スク ロー ル さ 
生ま すず.。 

解説 : オフ セッ ト 値 160 で , 1 ドッ ト 行 スク ロー ル し ます . 
方 向 は 0 で 通常 。 1 で 逆 方 向 の スク ロー ル を 行ない 
ます . 

この 命令 は BIOS の メン テ ナ ン ス ・ コ マン ド を 使っ て , サ 
プシ ステ ム の ハー ド を 直接 コン トロ ー ル し て いる の で 非常 
に 高速 で す . ゲー ム な ど に 応用 で きる と 思い ます . 


ーー 半 


書式 : CRT ON/OFF 

機能 : 画面 の 表示 を 有効 に し た り , 禁止 し た り し ます . 

解説 画面 を 点滅 きせ たり , CRTOFF に より 表示 を 禁止 し 
て お き , 他 の 命令 を 使っ て 図形 を 画面 に 描き , CRT 
ON で 表示 させ れ ば 一 度 に 図形 が 浮 び 上 が り ま す . 


書式 :PSG レジ スタ 番号 , デー タ 
機能 : PSG ヘ へ デー タ を 転送 し ます . 


書式 : MUSIC 文字 式 
機能 : 文字 式 で 示さ れ た デー タ を 音階 デ ゼータ と 見 な し , そ 














表 1 
オク ター ブ 指 定 
| コー ド 回 M | H | 
| オク ター プ 低 | 中 | 高 ] 
@ 音 形 指定 











| コー ド P1 |P2|PslP4l 
| 長 さき 2522 | 502 | 752 |100%| 
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音 長 指定 

| コー ド 提 揚 可 
音 等 | 朋 別 川中] 

@ 音 程 指 定 














コー ド lcl ロ IEIF 背 半 R 
音 程 | ドミ | ファ ン | ラ | シ | 半音 上 げ る 休 符 


1 つの 音符 は オク ター ブフ 指定, 音 形 指定 音 長 指定 , 音程 指定 に 
よっ て 構成 され ます . この うち 前 の 音符 と 等 し い 場 合 , 音程 デー タ 
を 除い て 省略 する こと が で きま す . 
オク ター ブ 指 定 (L・M・H) 
音階 レン ジ の 切り 換え で す . 

@ 音 形 指定 (P1 一 P4) 

同じ 音 長 で も 、 ス タッ カー ト 気 味 と か 、 テ ヌー ト 気 味 と か の 変化 を 
("943 

@ 音 長 指定 (0 一 9) 

音符 の 長 さ を 指定 し ます . 

@ 告 程 指定 (CDEFGABC) (#) (R) 

音程 を 指定 し ます . 半音 は # の み 有 効 で 音程 指定 の 次 に 半 を 書き ま 
す . また R の と き は , 休 符 と な り ま す . 


れ を 演奏 し ます . 

解説 : 音階 デー タ の 書式 は 表 1 を 参考 に し て くだ さい . 音 
形 ・ 音 長 ・ オ クタ ー ブ 指 定 は 省略 する こと が で きま 
す . その 場合 は , それ 以前 で 指定 され た の と 等 し く 
な り ま す . 














書式 : TEMPO 式 

機能 : MUSIC 文 の 演奏 速度 を 指定 し ます . 式 の 値 は 1 一 255 
で , 大 きい ほど 遅く な り ま す . 

解説 : PSG,MUSIC,TEMIPO ス テー トメ ント は , 当然 の こ 
と な が ら P SG カー ド が な いと 使え ませ ん . 基板 サ 
ービス も され て いる の で , お 持ち で な い 方 は 早速 製 
作 ま も まう | 


この コマ ンド は 『F M-8 活 用 研究 』 に 発表 し た デバ ッ ガ が を 
改良 , 整理 し て , FEF-BASIC と リン ク し だ た も の で す . 
文選 コマ ンド 

プレ ー ク ・ ポ イン ト を 設定 し ます . アド レス を 入力 する 
と そこ へ プレ ー ク ・ ポ イン ト が セッ ト さ れ ま す . パ *” を 
入力 する と 解除 され ます . 
友 D り コマンド 

メモ リ ・ ダ ンプ の コマ ンド で す . オプ ショ ン を 指定 する 
こと に より , プリ ンタ へ も 出力 する こと が で きま す . ダン 
プ の 一 時 停止 は IESC| で , 中 断 は [STOP| で 行ない ます . 
また , カー ソル を 移動 し て 同時 に 複数 行 の エディ ッ ト が 
で きま す 
文 G コ マン ド 

F-BASIC の G コ マン ド と 同様 で す . 
災 1 コマ ンド 

指定 きれ た アド レス より , 入力 され た 文字 列 を キャ ラク 
グー ュー ラー ド に 直 必 所 に 大 下 天 し まず すず, 
廊 K コ マン ド 
指定 され た メモ リ 
廊 し コマ ンド 

ディ ス ア セン プル の コマ ンド で す . オプ ショ ン の 指定 に 
より 5 ブリ ンタ SS の 出力 品 能 すま だ 。 マシ ンジ ラード 
部 分 の エディ ッ ト が で きま す . 
廊 M コ マン ド 

メモ リ ・ チ ェ ン ジ の コマ ンド で す . この コマ ンド 実行 中 
に 限り テン ・ キ ー 部 分 が 16 進 キー に な り ま す .[ 困 で バッ ク , 
較 で イン クリ メン ト し ます . [ 作 を 入力 する と 16 バ イト ( 画 
面 が 40 字 モー ド の と き は 8 バイト) バッ ク し , エディ ッ ト 
< モード に な り 。 ス ネス ク リー ンジ * 現 デ ィ ッ ド が で きま す 。 
まだ 。16 バ イト 入力 する ご と に ペル が 鳴り チュ ジ ンク ・ 

















・ エ リ ゲ を 同一 デ ーー タ で クリ ア し ます -. 





表 2 拡張 モニ タ コマ ンド 一 覧 
書式 , 機能 
BB BIRETURN 1 * ネ ** ネ ネー ア ドレ ス RETURN 


2 





D DIRETURN | 
D 先頭 アド レス |IRETURN| | 
D 先 頭 ア ド レス , 最終 アド レス (, Por, AP)!RETURN | 

G G「RETURN 

G ア ドレ ス RETURN | 

| | 先頭 アド レス , 文字 列 |IRETURN 

K | K 先 頭 ア ドレ ス , 最終 アド レス , デー タ RETURN | 
aoSU ーー 15 行 ディ ス ア セン プル 

L 先頭 アド レス RETURN 

し 先頭 アド レス , 最終 アド レス (,P) RETURN 

M | MIRETURN 

M 先 頭 ア ドレ ス RETURN | 

Q | QIRETURN| 

R RIRETURN | F-BASIC に 同じ 

X | X 先 頭 ア ドレ ス , 最終 アド レス, 転送 先 先頭 アド レス RETURN 





8 行 ダ ンプ 






































サム を 出力 し ます . 16 進 以外 の キー 入力 で , コマ ンド 待ち 
に 戻り ます ( 図 1). 
文 QG コ マン ド (FM- 7 の み ) 

拡張 モニ タ 切 り 離 し . 通常 の モニ タ を リン ク し て BASIC 
の コマ ンド 待ち に 戻り ます . 

文 RR コ マン ド 

下 -BASIC の R コ マン ド と 同様 で す . 
文 X メ コマ ンド 

トラ ンス ファ の コマ ンド で す . 転送 エリ ア が 重なっ て い 
て も か まい ませ ん . 

G, 1I, K, 双 コ マン ド に つい て は 処理 する 前 に 確認 の 
た め ,. ヾ Are you sure?(Y/N)′ と 開い て くる の で Y ま た は, 
N を 入力 し て くだ さい . 

呈 各 コマ ンド の 書式 一 覧 表 を 表 2 に 示し ます . 
モニ タ ・ モ ー ド より , F-BASIC へ 戻る に は [CTRL|-[CI 








また は | 黄 ,STOP| を 入力 し ます . 

















FE-BASIC で は DISK シ ステ ム の ため に , ワー ク ・ エ リア 
に ジャ ンプ ・ テ ー ブ ル が あり ます . $1F9 一 $1FD の 5 バ 
イト が それ で , $1F9 に 追加 ステ ー ト メン ト 数 . $1FA. 
1FB に 追加 ステ ー ト メン ト の キー ワー ド ・ テ ー ブ プル, $ 1 
FC, 1FD に 追加 ステ ー ト メン ト の 処理 先 デ ドレ ス を セッ 
ト し まず す 、 

キー ワー ド ・ テ ー ブ プル は , キー ワー ド の 終わ り の 娘 字 の 
ビッ ト 7 を 1 に し た も の を 並べ ます . テー ブル の 最後 は , 
$00 で 示し ます . 

処理 先 で は A レジ スタ に 中 間 コ ー ド を 入れ て ジャ ンプ し 


』O 


て 来る の で , それ に よっ て 各 ル ー チ ン へ ジャ ンプ する よう 
に すれ ば OK で す . 詳 く は リス ト 1 を 参照 し て くだ さい . 





FM- 8 拡張 BASIC 部 分 と 拡張 モニ タ を 合わ せる と 約 6 K 
バイ ト も あり , フリ ー エ リア が 大 幅 に 減少 し て し まい ます . 
拡張 BASIC と モニ タ 部 は , 独立 し て 動作 さき せる こと が で き 
る の で , それ ぞ れ 別々 の テー プ を 作る こと を お 薦め し ます . 

その 場合 は , 次 の よう に し ます . 

SAVEM“"EX-MON",&H7000,&H7DFF,&H7000 

これ で , 拡張 モニ タ の み の テ ー プ が で きま し た . 

次 に , 

SAVEM"EX-BASIC", 和 を H6800,&H6E90.&H6800 

LOADM"EX-BASIC",& を HF00 

$7700 一 $7702 を $12 (NOP) に する . 

SAVEM“EX-BASIC",& を H7700,&H7D90,&H7700 

これ で , 拡張 BASIC の み の テ ー プ が で きま す . 
図 1 テン ・ キ ー の 16 進 化 





FM- 8 FM- 7 








| 
| ロ 








ho ml の IDU 








ー | で | コア 
らら ーー に - ド ビー 
































結構 便利 な プロ グラ ム が で きた と 思い ます が , いか が で 
民 ょ うか 7 

KPRINT 文 」。 COPY 文 な ど は 非常 に 役立つ と 思い ます . 
みな さん も ぜひ 使っ て くだ さい . 


参考 文献 

1) “PSG カ ー ド の 製作 ^ : 下 M-8 活 用 研究 
2) “KSYMBOL 女 ” :I/O782 年 6 月 号 

3) FM-8 の ROM を 解読 ” :I/O'81 年 12 月 号 
4) 6809 デバッガ” : FM-8 活 用 研究 
その 他 6809、 FM-8, 工 -3 に 関す る 記事 


モブ ログ ラム 


1 "EXFRNDED F-BAGIC DEHO 
20 MIDTH4Q。 5: TEMFO 1O 
0) 
人 449 LODC 
59 
ら 6 
プロ ( 
Bo FHR J=1 T ロ 19 
マロ FOR 1=1 THU 
100 FOR =1 TO 
11Q NEXT 

< FR J=1 T ロ 19 








0』15 





に 





っ) 











TO 3 さ 9gCOLDRX MOD6+1:FRINT" 右 "agMUSTCVF11CEB "ENEXT 


TO 3 さ 9:COLORX MDDG6+1:FRTNT" 隊 ": MUSIC"F11CEG" NEXT 
。40) 。、"DEM ロ FRDGRRM" 。 ら 。 日 5 
Ss MUSTC "F1 ミ LCDEFBAEMCDEFBABHCDEFGQB" 


SCRUDLL 160。1:NEXT 
SERLL 160。 Gi NEXT 


さ Q FOR =1 TH 100:CRTHFFNEXT 
140D FOR エモ 1 TD 1QOiERTUN: NEXT 
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デモ ・ プ ログ ラム 
















































































15Q_ NEXT 
169 FE 
1270 FOR ・ 
18Q FR \J 肖 。 離 
NEX 征 
きり 7E 
BEIPY_ COTO か = こ ( プ 9 の 3 且 25) 
END 
EEEEPcsHIREEizs= 王 aaasaiassmasrarsrvsssd リリ スト ] (FM- 8 有用 ) = 
Na EXPRANDER 
し る まる そる そる も る る すす する る る る る る る る る る る る る る 3 
ポ 間 半 ドーBRGTC EXPRNDER 香 弄 。 \ 
*※ Version 1.0 ミ # 
* (C) ETF Laboratory * 
* 。 Designed by TEa5a5aEu *\ 
六 HER ロ -09 QASSEMBLER !! * 
米 素 素 素 素 素 玉水 素 水 水素 涼 素 涼 炒 ※ 玉 玉 氷 ポ ポ 素 
FT MM。NOG 
6BOQ EEGIN EQU まま 6B00 
0O0QO SETDF_ $QQO 
DRG BEGIN 
GB1R 701D LESR $ も 701D far IN aFFEND 
BC F8 LERX BEGTIN-2。FCR 
o) CHFX 1 
11 681B ECC HITOHT 
LDD 4 
680C 9 SUED 生 さ F 
6BOE FSHS Aa。BB 
6B1O 9F STX 負 人 4 
68122 1F TFR X。D 
6B14 和 計 SUED お ず キ 
6816 DD STD も 3F 
6818 ED JSR まま 941 人 4 11 Valiables C1ear 
681E 6 HITQMT LDA # 日 
681D BZ 01F9 STa $1F9 
6820 ミロ BD 0G51 LERAX CODE 。FCR 
6B24 EF 91FA STX $1FA < 
8D 0019⑦ LEAX NLYS。FCR 
901FC Gi も 1FC 人 ョ 
8D 0655 生 LEAX EUFF 。FCR 
STX EUFFO.F'CR 
6F CLR CCNT 。 FCR 
さり LERAX MSG1-1。FCR 
ED 9FDF JSR も 9FDF ー MSG_FRTINT 
4 948D JHNF ま 94BD ー BASIC HOT 
* 
81 EB aaNaLYS CMFA 井 ま E 日 ISAEN 綴 2 
10S7 02O1 6 人 4 LEEG FSG 
81 臣 償 CMF'A 井本 E ビ ウ MUSIC 
ビア 4 6 ビ 6BERQ EEG MUSIC 
81 EAA CHF'A 韻 ま E 人 n TEMFO 
10S7 016 昌 69EC LEBEG TEMF ロ 
81 EB CHF 人 Aa # ま EE GRT。 ? 
10 デ アー OS6F 6 に 9 LEEG CRT 
81 EE CHF 提 和 ま E ビ SCRLL ? 
10 デ フー 02S2 6B2 LEEG SCRLL 
B1 ED CHFR #$ED ESYMBOL 
10S7 04C9 6DSF LEEG ESYHMEiL 
1 ヨ CMFR 韻 員 EE ビ ド EPRINT ? 
1027 03FS 6CSE LEEG EFRTINT 
民 選 CMF'a 韻 ま EF CUEY_ 例 
OSEH6 6BSB LEEG GOEY 
974 JNIF' まり 974 を 5yR 江 洛 所 IEGFE 
※\ 
5 CODE FCC | 避 逐 ど FSG for FPSG CaRD 
( 4D FCC : MUST テ * MUSIC Music F1ay 
QOQOSB 67D ら 44 FGE FTTHEME 立 2 ENEG7 Gr NHSEGE 
6 人 4 語 FCC *CR デ CRT Disp1lay or Not 
68855 に 所 1 加 罰 相 ) BCROL フ 2「 SCROLLL_ UF or DOMN 
688BE 4 1 届 時 8 「EBYMEO フ FEGYMEL 
6 人 人 4 日 ド GE "EFRINT" EFRTINT ERNJTI Frint モロ FRINTER 
6898 人 4 EE )COUF 小 * CUFY Mindow CoOPy 
687 ビ りら FCB 9) 
*※ 
90C 689D QD ISG1 FCE 
OO0067 689F 4 尻 誰 区 YExpanded F-BASTC !!" 
O006B 6BES ロ O FCE 0 
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スト 2 


FM- 8F-BASIC EXPANDER ダ ンプ ・ リ スト 








dd 

6800 
6810 
6820 
6830 
6840 
6850 
6860 
6870 
6880 
6890 
68AQ 
68EO 
68CO 
68D0 
68E0 
68FQ 





Add 
6EQ0Q 
6B10 
6E2Q0 
6B30 
6B40 
6ESO 
6B60 
6B70 
6E8Q 
6B90 
ら 6BAQ 
6BEO 
6BCEQO 
6BDO 





17 
9F 
so 
06 
DF 
19 
B1 
Q2 
5o 
4F 
78 
21 
26 
1E 
4C 


E9 


+O 
00 


0 00 


+0 
07 


00 


さき 4 


98 1 30 


45 
8D 
6E 
ジ 
27 
ED 
E6 
CF 
CC 
70 


21 


01 


81 


27 


26 


+1 
9D 
0/ 
Q0 
F1 
10 
26 


02 


1F 
00 
角 
94 
01 
10 
4 ご 
43 
4B 
61 
QQO 
39 
40 
40 


D8 


の 
00 
OO 
00 
0Q0 
00 


+2 


D2 


っ ロ 
Ke 


00 


10 
51 
8BD 
8D 
68 
27 
77 
52 
50 
6E 
00 
34 


25 


81 


35 


+ う 3 
BD 
03 
00 


BC 
人 3 
BF 
04 
B1 
81 
04 
40 
D4 


20 


02 


F8 9C 45 


Et 
01 
326 
E8 
ER 
C9 
50 
3 
49 
65 
QQO 
17 
81 


06 


Q0 


DD 
FA 
6F 
19 
10 
81 


4 ミ 
4E 
64 
QQ 


20 


に 4 
さき 


+6 
BD 
03 
00 
27 
BC 
E 
A1 


BC 


BC 


= 


60 
50 


4 さ 


ミ F 
<O 
BD 
27 
27 
EE 
C7 
52 
D4 
20 


QQO 


ky 6 
9E 
9E 
QQ0 
03 


10 


24 
ED 
8D 
04 
02 


02 


+8 


01 


20 


FO 


+8 
00 
QO 
00 
QQ 
00 


っ 
< コ 


35 


11 
94 
00 
21 
01 
eF 
27 
55 
4C 
4F 
2D 
QQ 


+9 
27 


02 


02 


+9 
00 
7R 
00 
3D 
00 
0Q3 


+9 
34 
BC 
D7 
ダグ 
BC 
02 


24 


02 


DC 
14 
中 
30 
81 
81 
03 
53 
CC 
0 
42 


9D 


B9 


48 


45 


E6 


+ 仙 
04 
00 
EZ7 
40 
D7 
8Q 
QD 


45 
に 1 
BF 
8BD 
E5 
EE 
F2 
49 
4B 
D9 
41 
D2 
A6 


27 


81 


さ 1 


40 


+BE 
ED 
50 
BC 
8D 
9D 


っ 


34 


93 
QB 
01 
0Q 
4 
10 
B1 
C3 
紀 き 
QQ 
53 
ED 
80 
4D 


52 


A6 


+E 
00 
Q0 


00 2 


QQ 


02 


SF 
BZ 
FC 
SE 
6C 
27 
EF 
54 
59 
QD 
49 
9D 
81 
25 


27 


34 
01 
3O 
ED 
81 
02 


10 


45 


4D 


QR 


43 


86 


30 


69 


+E 
00 
Q0 
00 
00 


04 


+E 
さ 5 


4 


10 


06 
F9 
8D 


+F 


04 
00 :g: 


E7 
E6 


B1 : 


03 


ES : 


0D 
93 
85 


8D :: 
BD : 


27 
6 





+0Q +1 +2 + さ + 人 4 +5 ロ + ら 6 +7 + 日 19 + +H +C +D +E +F Gum 
30 
7 
4 


4 





























Add 

CO00 
6C10 
6C2O 
6C3Q 
6C40 
6CSQ 
6C60 
6C70 
6C80 
6C90 
6CAO0 
6CBO 
6CCO 
6CDQ 
6CEO 
6CFO 


+0 
06 
8BD 
FF 
Ce 
Ce 
14 
B1 
BC 
26 
Q5 
2E 
04 
86 
D8 


+1 
86 < 
FE 
03 
QB : 
08 3 
5 26 
DC 27 
EA 
0 だ 3 
86 
86 
42 
0D 
AB 
30 
C6 


+ さ 
BD 
Ce 
08 
ED 
14 
EE 
26 
BC 
B1 
7E 
BD 
1E 
QB 
BD 
FF 
4F 


+4 
023 
1H 
3D 
QD 
CE6 
39 
ED 
E6 
上 
D8 
2 
6 
30 
01 

70 


+5 
86 
6 
ED 
C ミ 
08 
16 
9E 
6 
27 
AB 
86 
1R 
8D 
CA 
9D 


+ ら 6 
Ga 
AQ 
QB 
QO 
68 
QQ 
BF 
BC 
D7 
8BD 
01 
8D 
01 
E6 
DE 


上 
7E 
人 7 
CS 
07 
80 
Q4 
AF 
E ミ 
7E 
7E 
8D 26 
17 
D8 
BC 
さ 4 


+8 
D8 
80 


+B 
04 
F9 
OF 
9D 
FA 
QQO 


+C 
40 ミ 
10 


さら 





07 


01 
40 


[0 


35 


D9 5 2 


+7 +D 
BD 
B1 
20 
06 
3D 


add 

6DQQ 
6D10 ミ 
6D2Q0 
6D30 
6D40 
6DS0Q 
6D60 
6D70 
6D ヨ Q 
6D90 
6DAQ 
6DEO 
6DCQ 
6DDO 
6DEQ 
6DFO 


+0 


3 さ 


05 


05 





05 


OF 
E6 
D1 2 
9D 
ささ 
05 


+0 
34 
0 04 
10 


08 3 23 SF 





Add 

70Q00 
7010 
7020 Q2 
7030 
7040 
7050 
7060 2 
7070 
7080 27 
7090 
7080 
70BO 
70CQ 
70DO 
70EQ 2 
70FQ 


QQ 


Rdd 
7100 
7110 


+Q +1 
9E 44 
FB ジ 


+2 + さ +4 
9C 48 25 
F6 2Q0 CD 
7120 84 7 4 30 1F 
713Q 2 10 26 FF 6BH 

9E 8D 


7140 26 FB 20 


ト の 4 
9E 
93 
9C 
QD 
9 ミ 


+B +9 
48 A6 
44 DS 
44 24 
ささ 27 
46 25 


+5 +6 
QF 10 
DC 46 
さ 1 3 
DE 44 
09 11 


+A 
8Q0 
48 
F4 20 
09 CE6 
FSS が 


+R 
AZ 
1 コ 


+ ヒ 
AO 
02 
RS 
QF 
2 


+D 
9C 
9E 
8D 
8D 
20 


+E 
46 
46 
2E 
10 
FS 


+F 
2 
A6 
oD 
5A 
17 


Sum 
64 
sE1 
き さ 
5 さ 0 
CS 








61 


』O 











リス ト 2 F-BASIC EXPANDER ダン プ ・ リ スト 
7150 04 FB FF Q3 14 7D 0 13 10 26FF 44 39 OF 32 QF sa 7530 87 AO 3 さ Q 01 BC 04 71 25FS8D 6B HB6 Q4 3D 26 DO :76 
7160 33 17 03 27 26 08 BE 03 14 9F 44 03 33 39 17 03 ES 7540 39 6 B4 81 20 26 04 30 01 20F6 8C 04 4D 24 E9 :5F 
717Q 34 DD 44 17 03 15 27 F3 17 03 28 DD 46 17 03 QB :28 755Q BD 9C 25 E5 7 AQ 20 E9 34 12 30 8D Q7 BE 17 QQ i62 
7180 27 EB 17 02 FB 17 03 03 27 ES B1 41 26 07 97 32 :02 | 7560 ES BD OB17 00C5B1 59 10 26FB34 35 92 8D 14:FE 
719Q 17 Q3 07 20 FO 81 50 10 26FF 0Q5 97 31 20 F1 BD za2 7570 34 7C 4F 1F BR ED DS3635 7C さ 4 7E 4F 1F BE RD :88 
7180 BC OF 4C DE 44 OD 33 27 09 C6 08 BD 17 SA 26 FB 96 7580 DC F3 35 FE 34 7E 4F 1F BBH BD DCFA35FE34 76 iz1D 
71BO 20 9B BD 1Q 11 93 46 25 F9 27 F7 QD 4C 27 BE 17 za3 759Q BD F2 7F QS 13 CE DC QC BD DB FF BDF2 DB 8D 18 z8D 
71CEO 00 D1 20 8 ヨ 9 34 04 0D さ 1 26 2D B6 01 97 32 B6 00 :49 75a0 BD DB 8D 4C 35F634 76 7F 03 13 CE DC 14 BD DB :FE 
71DO CS 1 28 26 22 1F SO 17 04 SE C6 QB 8D 76 33 58 BB 75EO FF BD F2 DB ヨ D Q2 35 F6 7D QS 13 27 0 4F 1F BB :FB 
71E0 17 04 SD C6 08 17 00 90 5 26 Fa 17 04 02 7D 03 :04 75CO 1 01 7E 94 8BD 10 BE 05 4 BE 04 3D BF 00 D9 10 :8B 
71FQ 13 10 26FE BR 35 4 QD 4C 26 15 30 BD QR 33 17 zi 75DO BC QQ 04 27 10 10 BC QO 01 27 QD 31 さ C 6 04 7 :B6 


73DQ 
73E9 
73FQ 


Add 

7400 
7410 
7420 
7430 
7440 
7450 
7460 
7470 
7480 
7490 
74A0 
74BO 
74CO 
74DQ 
74EQ 
74F0 


Rdd 
7500 
7510 


7520 








+O 
に 141 
8D 
A6 


+1 
E4 
03 
80 


02 


+2 
32 
16 
B1 


+3 
03 
04 
QD 
SA 
QF 


OF 


+ さ 
61 
FE 


っ 
で | 


+4 
EB 
03 
32 


OF 


+4 
03 
FB 
B2 
C1 
C1 
16 
32 
Qe 
17 
20 
07 
QA 


05 


+4 
39 
9Q 


27 


30 


QA 


+5 


25 


17 


25 


QD 


10 


+5 
8D 
BE 
1B 


+6 
86 
Q3 


07 < 


10 


+ ら 6 
E7 
Q4 
81 


さ A 
04 


直 


っ 
3 


3D 


20 


+B 
44 
3B 
04 
B7 
Q6 


+8 
06 
8D 
10 


02 


Q1 


+9 
1F 
ER 


ク , 
デ 


20 


+ 全 
89 
10 
FB 


04 


31 


+EH 
8D 


の 
な 


74 


10 


+C 
E1 
FE 
8D 


+D 
1E 


っ 
3 


CO 


中 選 
89 
1F 
25 


+F 
39 
02 
09 





Sum 
sEF 
s 4B 
:D7 














dd  +0 +1 +12 + さ ミキ 4 + ロ +6+7+ せ 日 49 + +BH +C +D +E +F Sum 
76aQ 41 34 16 6 11 Fe6 01 ES FD 01 04 B6 Q2 B7 01 Q3 :4 き 
7610 BE 05 0 BD F2 D8 35 96 BD 02 1F 9 34 Q2 47 47 siBF 
762Q 47 47 BD Q2 35 Q2 ヨ 4 QF 17 03 0 34 1E SF 1F 9B 0OC 
7630 6D BD 0BFD 26 05 ED DS 5S2 35 9E BD DB 8B 35 9E isEF 
7640 6 20 20 E7 A6 0 27 04 BD E1 SQ F8 39 34 37 17 gi3F 
7650 00 81 30 BD 0B aa EC 1 BD BE 6 2D 8D CD QD 29 :EB 
766Q 27 06 EC ヨ 1 BD B2 20 08 6 1 ヨ D EQO 8D D2 8D DO 21 
7670 BD CE C6 07 96 28 27 OD 34 02 a6 B0 8D 9E 35 02 g:D8 
76 ヨ 0 5R 5R 4 26F1 SD 27 0S BD HG6 Sa 26 FR 6 80 1 iQ3 
7690 20 27 03 SC 8D 95 31 BD 08 73 34 20 ACE E1 26 ED :FS 
7680 C1 04 27 13 6 0 ヨ 1 20 27 04 17FF 7E SC C1 Q4 gi6 
76BQ 27 05 BD BC 5C 20F7 8D 87 BD 85 6 80 81 20 27 iCC 
76CO_ 03 17 FF 67 31 8BD QB SF 34 20 AE E1 26 ED 17FF 』 人 F 
76DO 1F 35 B7 30 8D Q8 29 86 20 C6 27 87 0 5 26 FB i2E 
76EQ ヨ 6 Q1 97 2 ヨ D QE 96 27 4 48 30 BD Q4 47 EC 86 zaA 
76FO 1F 51 6E BB 31 D 08 QB EF 1 QF 29 E6 CO E7 0 』2C 





dd  +0 +1 12 + ミ +4 + ロ + キ 6 +7 + ヨ 49 + +BH +C +D +E +F Gum 
7700 C1 10 26 0 0D 29 10 26 01 0C 0C 29 20 EE C1 11 』BF 
7710 26 0C 0D 29 10 26 00 FE QC 29 20 EE QC 29 30 BD iD1 
7720 04 E4 3 E6 84 C1 BB 10 27 00 a6 QD 29 19 27 00 i4F 
7730 EE C1 54 26 18 D6 03 54 10 24 00 95 30 BD Q4 C6 iCQO 
7740 C6 81 3 08 29 26 03 86 44 BC 6 55 SF 20 68 C1 :B6 
7750 57 26 QD QQ 29 26 03 6 32 BC ヨ 6 353 C6 03 20 57 23 
7760 96 03 84 FO 81 20 26 19 0 29 10 26 00 6 96 03 si95 
7770 84 QF 10 27 QQ 9E CC 4C 42 DD Q7 C6 QA 6 20 20 3C 
7780 36 96 03 81 0 25 48 96 03 84 OF 1 OE 24 16 B1 』B5 
7790 QC 26 3E E6 8B4 C1 1 26 38 ON 29 26 3 6 59 BC DB 
7780 86 53 5F 20 12 96 03 B4 FO 81 CO 24 03 86 59 BC :44 
77BO 6 53 SF QR 29 26 5D QCE 29 97 QD D7 27 4F E6 84 』7E 
77CO 30 BD 03 87 3 31 BD 07 40 6 80 2B 06 7 AO 20 』44 
77DO F8 20 4 さ B4 7F 7 QQ QD 27 26 29 QD 29 26 0Q4 96 1E 
77E0 02 20 02 96 03 84 FO 26 04 6 06 20 15 44 44 44 :E8 
77FQ 44 ヨ 4 03 26 10 6 Q4 D6 0D C1 41 27 Q5 C1 42 27 jiC6 


Sum: CC 2D E6 C2 99 74 A6 55 D2 3Q Ea 4E 3B 54 32 DD :7E 


fdd  +0 +1 12 + さ る +4 45+6+7 + ヨ 19 + +TBH +C +D +E +F Sum 
7800 Q1 4C 97 27 39 81 Q1 27 EQ 1 0Q2 26 03 6 08 BC :93 
7810 6 07 20 EE 9C 29 C6 0B D7 27 4F C6 BB 20 a1 D6 :0S 
7820 02 C1 ヨ QO 25 48 C1 CO 25 03 6 42 BC 6 41 C4 QF 47 
7830 C1 03 26 04 86 44 20 31 C1 0C 25 2D C1 QD 26 12 』2E 
7840 E6 84 C1 64 27 EE C1 91 27 02 5F BC C6 09 6 20 i7F 
7B50 SO 18 D6 02 C1 CO 24 04 6 5B 20 QD D6 02 C4 OF 6F 
7 ヨ 60 C1 QE 24 Q3 6 44 BC 6 55 SF 16 FF 4C C4 FQ C1 』5C 
7870 60 24 QF C1 40 25 OE 26 03 B6 41 BCP 6 42 C6 03 gzD4 
7880 SQ EB 5F 20 C9 C1 10 24 02 20 CS C1 20 26 Q6 6 siBD 
7890 42 97 0B 20 B7 C1 3Q 26 21 D6 02 C4 0OF C1 04 24 :84 
78BA0 Q4 C6 QB 20 9 C1 QB 24 04 C6 Q1 20 A1 C1 QC 26 iQ7 
78BO 03 C6 04 BC C6 03 6 20 20 BO D6 02 C4 QF C1 QE :12 
78CO 25 04 C6 Q2 20 BB C1 QD 27 EA C1 QA 25 06 C6 04 』3B 
78D0 86 43 20 96 C1 09 27 DC C1 06 25 D8 C6 QA 20 D6 :D6 
78EQ E6 EQ D7 Q4 QF 2C 34 Q4 54 54 54 54 さ 1 ヨ D Q6 1E :26 
78FO さ 1 S1 BD 19 C6 2C E7 0 3 04 30 01 C4 QF BD 0QD :48 


dd  +Q +1 +2 + さ +4 + ロ +6 +7 +18 419 + TB +C +D +E +F Sum 
7900 04 2C 25 01 39 CC 2 2 DD QF DD 12 39 34 10 30 :37 








62 


&O 


リス ト 2 F-BASIC EXPANDER ダン プ ・ リ スト 


55 C2 53 57 C9 54 46 D2 54 53 D4 4E EC4 4F D2 53 :F5 

D4 4 さ C ミ 4 ミ DS3 45 D1 47 C5 47 D4 48 C9 4C CS 4C z:9B 
D ミ 4C D4 4D C9 4E C5 50 CC 52 C1 52 CE SS D2 56 :E6 
CS S6 D ミ 4 ミ 57 41 C9 5 59 4E CS 4C 42 SS D2 4C :4E 





7910 BD Q1 Fa C1 Q6 25 02 QE 2C C1 0C 25 Q2 C6 06 SB iC6 
7920 3 EC B1 ED 1 35 90 A6 CO 97 04 さ 1 BD 0Q1 CE 30 :BB 
793Q BD 05 DB C6 08 D7 2D 44 34 02 24 21 EC 1 34 02 』C1 
7940 96 2D B1 02 26 OE 96 02 84 QF 1 06 25 06 35 02 BE 
7950 86 53 20 Q2 35 Q2 ED B1 86 2C a7 0 BC さ 1 22 35 iBD 42 52 C1 4C 45 41 DB 4C 45 41 D9 4C 45 41 D3 4C :9H 
7960 02 0 2D 26 D2 B6 20 7 82 39 a6 CO 97 04 8D 46 :0D 45 41 DS 50 5S 48 DS 50 5 48 BS 50 55 4C DS 5Q giED 
279705DDWUG2OeUBPBDSE4SDDKUHmO9YDO.97 が 05106P2BW2OVEEisIDB | = ニュー ニーーーー ニ ニー ニーーーーーーーーーーーー ニ ニニ ーー デー ラニ ニニ ーーーーー ニ ニニ ーーー ニ ーー ニー ニー ニラ ーー 
7980 6 23 97 QF 20 E4 B6 23 97 OF 20 EB 34 02 B6 24 :Ba 0 
7990 97 10 35 B2 E6 CO D7 Q4 1D DF 2 DS 2 34 04 8BD CZ 
79A0 15 DD 11 35 02 D OF DD 13 20 E1 EC C1 DD 04 0C 61 
79EO 2 20 E6 Qa 2B 39 BD QB 1E 89 8D QF 1E 89 20 QB :4 ミ 
79C0 1F 89 B4 QF 1E 89 44 44 44 44 39 81 0 25 02 8B :68 
79D0 Q7 BB 30 39 86 2D 97 OF 39 6 C4 4 60 27 11 B1 :94 
79E0 20 27 QA B1 40 27 03 6 53 BC 86 SS5 8C 86 59 8C :7 ミ 
79F0 86 5B 97 18 86 2C 97 15 6 CO 97 Q4 2B 14 84 1F :CE 


+0 +1 +2 + さ +4 + ロ + ら 6 +7+ ヨ 19 + +BH +C +D +E +F SBum 
55 4C DS 46 43 CS 3C BB BB 1R 36 BB 4 QF QE 42 :19 
21 BB 2 SD 2D 15 BB BB 3F BC BB BB 94 90 BB 1E :47 
62 BB 09 51 27 5a 7EBQ0 7074 66687Ae6a8 ヨ 4 86 zi9 さ 
7C 78 6C 76 6E 72 98 9C 8O 4 AB BO AC B4 BB 4R :E9 
00 4 BB 39 BB 57 さ C HB RB 1R 36 BB 45 OF QC 42 ze6F 
21 BB 2 5D HB 15 3C BB BB 1B 36 BB 45 OF QE 42 :B4 
21 BB 2a SD BB 15 さ C BB HB 1R 36 BB 45 QF 0QC 42 gi4 
21 BB 2 SD 2D 15 3C BB BB 1B 36 BB 45 OF 0C 42 :F9 
21 BB 2R SD 2D 15 4 18 4E 54 09 12 60 BB 24 0QS giQR 
62 06 18 91 60 BB 54 18 4E 54 09 12 60 64 24 03 i3D 
62 0Q6 18 30 60 64 4 18 4E 54 09 12 60 64 24 QS gi 
62 06 18 30 60 64 54 18 4E 54 09 12 60 64 24 03 』88 
62 06 18 30 60 64 84 18 4E Q6 09 12 60 BB 24 0S BE 
62 06 60 BB 60 BB 54 18 4E 06 09 12 60 64 24 03 sS5E 
62 Q6 60 64 60 64 4 18 4E Q6 09 12 aQ 64 24 QS iB6 
62 06 60 64 60 64 54 18 4E 06 09 12 60 64 24 03 giBG6 











Add  +0 +1 +2 +3+4 15+6 +7 +18 19 + +B +C +D +E +F Sum 
70Q0 1F B9 58 SB 5B 28 Q8 BD CR5SO5S454 54 1F 98 16 :S3 


720 2R 97 19 17 QO 96 10 26 00 8D 39 CC 2R 2R DD 19 :9C 


+O +1 +2 + さ +4 + ロ +6+7 + 日 49+ +H +C +D +E +F SBum 
62 06 60 64 60 64 0OD Q8 4578B7061 6E 64 65 64 :30 
20 4D 4F 4E 49 54 4F 52 20 21 21 QQ 41 72 65 20 igE2 
79 6F 75 20 7375 72 65 20 3F 20 28 59 2F 4E 29 siE2 
20 00 41 64 64 20 20 2B 30 20 2B くさ 1 20 2B 32 20 iDD 
2B 33 20 2B 34 20 2B 35 20 2B 36 20 2B 37 20 2B iRB 
さ B 2O 2B 39 20 2B 41 20 2B 42 20 2H 43 20 2H 44 :F2 
20 2B 45 20 2B 46205375e6D0QO0OD0QAS537S6D iC2 
3 20 Q0 4C 61 7 さ 74 20566572 7 さ 696F 6E 20 iz14 
38 32 F2 37 F3 32 35F4 20 48 45 52 4F 2D 30 39 CS 
41 53 53 45 4D 42 4C 45 52 20 28 43 29 20 42 59 iQD 
20 45 54 46 20 4C 61 62 6F 72 61 74 6F 72 79 20 siSE 
20 20 44 65 7 さ 6967 6E 6S 64 20 42 79 20 20 20 i9E 
20 20 54 2E 4B 61 73 61 73 61 6B 75 20 20 20 20 76 
0Q0 00 00 QO Q0O 0Q0 QQO 00 0Q0 QO QO Q0O 00 QQ QO 0QO gQO 


人 dd  +0 +1 12 + さ ミ +4 45+6+7+8 19 + +H +C +D +E +F Sum 
7BO0 20 42 20 44 50 58 20 59 20 55 20 50 43 44 20 58 CB 
7B10 20 59 20 55 20 55 20 50 43 2 2 2 20 41 20 42 sSF 
7B20 20 43 43 44 50 02 QE 15 1B 9F 22 28 9 2C 40 9 :03 
7B3O 68B 6C 78 9 BR Q2 35 01 EE 02 C1 Q2 BE 02 94 02 jiB2 
7B40 7 02 82 02 E7 02 a2 02 B9 03 DE 41 42 DB 41 44 z05 
7B5Q CS 41 44 C4 41 4E C4 41 53 CC 41 53 D2 42 49 D4 :8B4 20 56 
7B60 43 4C D2 43 4D DO 43 4F CD 44 41 C1 44 45 C3 45 :F7 42 41 
7B70:4FD2045SBNC7 な 4984E)CS! 4 40 D0' 45S 3D2、4E 5S。 54 。 | | ーーーーーーーーーーーー ニ ーーーーーーーーーーーーーーーーーーー ニ ニー ニー ニーーー コ ー ニ ーーー ロ ーーー 
7BB0 CC 4C 53S D2 4D 55 CE 4E45C7 4E 4F DO 52 4F CC zDF 
7R90 52 4F D2 52 54 C9 52 54 DS 53 42 CS3 53 45 DB SS :76 

















MI-/ XX-MOM ダンプ ・ リス ト EE 































| dd 。 +OQ +1 キオ ( 十 き +BE +C +D +E +F Sum る 61FO_ OB 17 OO 1 ミス :9QO 
60QQ 30 BC = 45 24 さ 4 06 9F 45 1F siQ2 
6019 1Q0 QA 3F BD BF E1 6 7E B7 :B6 Sum: ES 67 さ 35 9 RB ER 7E DD 18B ER 1E E1 Q5 7 7 FB :F 
6020_ Q2_ 65 3 D QQO 15 OF Q7 C6 10 6F siBO に 
ら BG Sa 3Q BD Q B 32 62 34 FF 1F sgBD Rdd 。 + ロ +1 
@e049 5QO BR _G BE GE 10 FF Q3 16 1Q0 si4C @2Q00_ 10 26 



















6050 FE Q 計 さ 1 17 0 05 EC 17 05 47 』3F 0 55 17 Q3F 
6060 EGG 04 3 57 ER B1 17 Q4 36 17 Q04 
6o7O 24 17 0 DO 日 1 4 44 10 27 01 27 s 

B1 49 っ 4 B1 4C 10 27 


608O 日 1 47 
0 QO 





27 03 OF B1 8 = 
Q5 9C 2O AO 17 
6 35 FF 17 0 ミ 
DE 


10 27 02 
ら 61 1O 2Z 0 くる 
E さ 2 1Z OS 
60C EE 1F_O1 1 プ 0 さ C1 
6QDO_ ヨ QO 17 Q3 DO 20 F ミ 
6QOEO_ 9E 44 E7 BQO 9C 46 
















oo 









Sum: E5 5 D6 74 2 


仙 dH 。、 キ ひ 士 1 キ 受 や さ , ヤオ キキ ギア 日 オ + 店 人 す 縛 
6100 DD 48 39 8BD EZ7 17 Q4 Sa 9E 44 9C 48 
上 BQO _A7 aO 9 46 25 F 27 F6 20 

ゝ 3 4B 1F Q2 9E 46 6 B4 7 4 さ 30 
F4 20 RB5 BD 2E QD 3 さ 2 10 26 FF 
09 C6 QF BD 10 SQ 26 FE 20 SE 
ら 6150 46 25 F 27 Q さ 
ら 6169 10 26 FF 44 3 29 
6170 14 9F 44 Q3 ァ さ 1 フ 
61BO 17 Q3 2 DD 46 17 Q ミ OD 27 EE 17 02 
= さ 3 8B1 41 26 07 97 さ 2 17 QS 09 20 

05 97 さ 1 20 F1 BD BC QF 4C DE 
QB BD 17 5 26 FB 20 9B BD 10 
F7 QOD 4C 27 BE 17 0O Da 20 89 
B6 01 97 3Z2 B6 OO CS 1 2 26 
C6 OB 17 OO B2 3 さ 3 SB 17 94 76 




















63 


0 


FM- 7 EX-MOM ダン プ ・ リ スト 


BD QZ 6C C6 04 さ 4 Q4 BD さ A A6 C4 
HB1 27 OA 17 O0 E9 .4D 10 26 FC DD 
Q4 5 26 E1 C6 Q4 34 Q4 BD 19 EC 
QO 90 27 Q5 17 QQO CB ED C4 さく 42 





DC C1 06 25 DB8 


EEBO 1 9 避 






































+ 各 TB + ビ +D 
54 54 4 54 
さき 5 Q4 さ O Q1 
DD oOF DD 12 
2 C1 QC 25 
CO 97 Q4 31 
ミ 和 4 
B4 
Be 
に 1 
台 ら 
5 9 ァ ア 
1D 
1 る し 20E1 EC 





6900 2O_D6 
6919 05 FC 
6520 BD QOD 


10 さ Q 



















6959 
6960 
6779 
6989 
679Q0 
6980 SQ 
69HO 
69CO 































6499 65DO 1E 89 BD QF 
ら 648Q OO DR 2 つら 0 の ユ 69EO 44 
10 < フ 7 FH EF 


ら 64RG 


69FO 
4 に O ーー 


oo D9 BD 1 。 
4H 8D 
25 Ooa 


5 39 6 


Sumi 


倫 、『 TO、 や せ 本 分 = そ さ 生生 * や 6 キテ + 日 や は 3 人 日 * じ * す D 
68QOO 11 1 20 2Z on 1 40 27 Q3 Be6 53 BC Be 55 
1 6 2C 97 15.A6 CO 97 Q4 
5B 5B 2 QB BD CR SO 54 54 





Sums F ア うら 9 














ndd + さ +4 + 口 +6 + ア + 日 O ド 仙 ら 6 4F 1F 
650GQ 02 6 BO _BD D け 17 ア 8BD 39 CC 
に 内 補記 に に 4 2D 2D 2D DD 
FE 5 1F 20 77 6 41 20 FB 6 CO 9Z 
BD CO 2 2O 61 DZ 
04 3D 全 ら 6 O2 Bo SD 
: 9 人 4 4D 24 17 ド FT 3 
07 D6 17 ら aO BD 17 8D 
35 52 BD 6REO QC 28 EC 
4F 1F BBH 6ACO_ QOS 17 FE F7 CC SQ 4 く DD 1 39 EC.C1 DD G5 
35 FE 34 6ADO 2Z7 07 B6 20 97 18 97 15 39 CC 2 2 20 E9 
FF 34 76 6aEO 96 Q4 5 190 26 Q2 35 2 Bo 5E 97 QE 6 SD 
7D 8D 1 日 6aFO_ 35 B2 6 27 97 QE 97 10 D6 02 BD 09 D7 OF 
09 BD D9 ー ーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
4F 1F BE BA 57 EO ヨ B2 Fg 7C 76 65 1D 
00 D9 10 
Ro 04 7 人 Add +QO +]1 オオ る + 紀 +R +C +D +E +F Sum 
"ーーー ュー 6HOO_QOD 29 26 0C C1 2B 02 C6 2E 39 12C 
Su CO 48 0 2C に 11DYY 1 あの 4 さい うさ 
44 55 20 5O 4 さ 44 sDZ 





人 add 


+ ム 6 + プ ブー+ 日 すけ +a +B +C +D +E +F Sum に に 拉 と 2 2 2a 
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660 の CF 2Q0 FS Bo6 QQ BD さ C B6 で ! 3 44 9F 22 28 
6619 E9 BD DA 30 34 16 86 11 6ESO 4Q 9 6 6C 9a 02 C1 02 
6630 E7 ol 6B6O 94 02 7 OS B2 02 E7 0O2 2 Q2 E9 OS DE 41 














So3O BD 6E7O 41 44 CS 41 C4 41 4E C4 3 CC 41 5 さ 
る 64 け 1 フ 7 6BBO 49 D4 43 4 ビ 44 41 C1 
ム 66 BE 6B5O 4D DO 4a 
@66 ひ no 6EQQO 5 C7 4E 4F 
6 ム 679 DOt ら 6REO 1 
6 る 668 8D 6ECO 
665O 56 6RDO 
ら 6 人 OO F1 6EBEO 
ら 66EO = BD 
@6CO + 月 ら ェ 
66DO 5 に Sums 24 76 2F 
eoEO 人 S 1 
SSF BD Rdd 
ー 6COO 
り 6C1O 
ら 6C2O 
dd  + 〇 +1 オキ オオ 4 + キオ + ユ 7 + 日 + す 9 +TQ +E + 選 +D +E +F Sum 6C30O 
OQ 6eC4Q 
ら 6C5GQ 
6C6O 
ら 6 ビ フウ 
6CBO 
6C9O 
6CAO 
ら 6CEGO 
GCCO 
6CDG 


6CEO 
6CFO 


Rdd  +O +1 + 人 2 + さ +4 + 品 すら 6 
6DOO 24 Q3 62 06 6Q0 64 60 
6D1O 人 S4 0 さ 3 62 Q6 60 64 60 
6D2O 24 03 62 06 60 64 60 


+B +C +D + ピ 
= Q6 09 12 60 





06 Q9 12 60 
78 70 61 @6E 











Add  +O +1 +2 + る 3 +4 + 品 +6 +9 + 各 ら 6DSO_ 65 64 20 4D 4F 4E 49 21 21 QQ 41 
6BQQ_ Q4 96 02 20 Q2 96 Q さ 26 094 6D40 65 2O0 79 ecF 7 20 7 ミ さ F 20 28 89 
68B1O 44 44 44 4 03 26 10 D6 oOD 6D5O 4E 29 20 QQ 41 64 64 20. 2B さ 1 20 
6B2O0 42. 27 O1 4C 97 27 3 27 EQ 6D6Q0 さ 2 20 2B ささ 20 2B さ 4 2H さ 6 20 2B 
683O 08B BC ヨ 6 Q7 20 EE QOC QB _DZ 6D7O 20 2B 3 20 2B 39 20 42 20 2B 4 ミ 
684O an1 D6 Q2 C1 B0 25 4 日 25 OS 6DBO 2B 44 20 2B 45 20 2B 6D QO _QD QA 
685O C4 QF C1 Q ミ 26 Q4 6 さ 1 C1 6D9O_ 75 6D 3 2Q0 QQO 4C 61 7 ミ 74 20 56 65 22 7 ミ 69 
6 ヨ 60 26 12 E6 4 C1 64 27 ダ 分 ア 6DAO_ 6E 20 3 さ 2 F2 さ 7 F さ さ 1 3 くさ F4 44 45 42 55 47 
6870 6 20 20 1B D6 Q2 C1 Q4 8B6 6DBO 56 65 72 7 さ 69 6F 6E 20 3B さ 2 F2 さ 9F さ さ 1 F4 
6BBO_C4 QF C1 QE 24 QS 日 6 B6 55 6DCO 46 4D 2D さ 7 20 6 65 72 7 ミ 69 6F 6E 20 3 ささ 
6890 FO C1 60 24 QF C1 40 26 0 さ 6DDO ささ F さ さ フ 7 F4 20 4 45 52 4F 2D さ Q 39 20 41 3 











6BAO C6 Q3 2Q0 EB 5F 2Q C9 24 0Q2 6DEQO 45 45 52 20 28 4 く 3 29 20 42 59 20 45 
6BBO_Q6 6 42 97 QB 20 BZ 6、 ジ す 6DFO 4 ら 6 2 6 ね Fe7 ど 61。 4 6E フン 2E' ィ デ E。 .4D, 
6BCO Q4 24 04 C6 QB 2Q0 89 24 QO4 6 


6BDO_QC 2S6 03 C6 04 BC C6 9 ミヌ 86 20 20 
6BEO_ C1 OoE 25 Q4 Co6 02 20 BB C1 QD 2 


Sum: 3 さ E E4 さ B E ウ F7 DS BD B7 7 3 CE 23 E2 F7 1C 
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FM-7 EX-MOM ダン プ ・ リ スト 
人 dd +O 1 +2 + ミ +4 +5 +6 + プ + 日 +9 + +B +C +D +E +F Gum 
6EQQO 6E 6E 79 20 5 さ 6F 66 74 20 44 65 7 ミ 69 6 フ 7 6E 65 zED 
6E10 64 20 42 79 20 54 2E 4B 61 7 く 61 フ 73 6 ム 61 6B 75 2E =:4 さ 3 
D2 BE BB 99 23 C3 94 BF 1 BZ C6 E6 CA D2 ES 93 :30 
7 ビビ ベー ビビ 人 ASIC ダンプ ・ リス ト EE 
dd つ + う 3 人 4 +5 す 6 + プ + 日 +9 +A +B +C +D +E +F 6aBO 4 
6BOO 03 BC F6 9C 45 24 11 DC 45 93 3F 6a9O 26 
45 Q3 E1 DD さ F BD BF 51 6 09 BZ ら 686O RaO 
BD BF Q2 04 30 BD OO OE BF Q2 19 6aBO OO 
57 DB 6E 9F 03 16 81 F4 27 51 B1 6aCO_OO 
602 F6 10 27 O1 73 7E 92 AO 11 00 6aDO_O8 
BO QOO OO 1B OO OO QO QO 00 0O0 Q0O 6aEO _ 10 
05 06 07 9D D2 BED 92 BF BD 99 ら 6aFO DD 
5 の 4CHdt ワ a の SE OS の Em の wpE SEBialMNEia テ ー コ ニニ ニニ ーー デニ ニニ ニニ ニニ ュー ニー ニニ ニー ピー ニー ニー ニニ ーーー コ ニコ ラニ ーー ニニ ニニ ーーー ピピ ーー の 
さ 39 OO OO OO OO OO OO OO _ OO _00 Sum: BE さ O 45 C7 B3 CO 9 OQ1 7 8 92 F3 C9 EO DD 89 sz86 
10 E7 BC F1 9D DB 1 DQ 27 03 
BC E6 1F 10 E7 BC 
14 1 2C 26 E5 人 Add  +O +1 +2 + さ +4 + 品 +6 + プ + 日 +9 + +B +C +D +E +F Gum 
96 63 F BC BE ら 6EOO_05 30 25 EE 1F 20 C1 OB 27 05 68 C4 5Q 26 FH 33 』26 
BC B5 7 ヨ C BO < 6B1O 41 35 BB EF 02 BD F1 7D 33 CB 14 35 BB QO 0O QO siE6 
6 6E2O 6C D1 4F a7 BC F7 9D D2 9D DB 27 56 B1 2C 27 03 』EE 
6B3O 7E 92 AO 9D D2 8B1 23 27 26 1 5D 27 E5 81 5B 27 isFD 
ら 6B4O E2 1 DC 27 QB 81 40 27 11 BD 9 O2 BD 15 20 DB SD 
6EBSO_BD さ 1 6F BC CB 6F BC C6 20 CC 7 BC C1 20 CZ BD 』96 
ら 6B6O_ 73 20 EF EE BC BA QF C1 A6 BC B2 7 CO EF BC BO iC 
6B7O 4D 27 03 6C BC A9 6C BC 6 a6 BC a3 B1 2 25 02 :5B 
6BBO_BD Q1 39 6D BC 99 26 04 6 QQ 20 55 17 QO B2 CE si1F 
6B9O 0O4 40 BD 5O 6 1E BD 49 6 4 BD 45 6 O1 6D BD BE 
6BQO_FF 7C 27 O2 BE 17 ヨ D 3986 OD BD 35 17 QO 92 CE iDB 
ら 6BEBO _O4 42 6D BD FF 68 27 Q02 さく 4E BD 2 B6 1B BD 21 』55 
6HEO_B6 4Q ヨ D 1D 6 23 6D BD FF 54 27 0o2 BB OD D 11 iCF 
6BDO 86 OD BD OD 3O BD OO FaF BDFF 44 6F BD FF 3F iC 
6BEO 39 16 FD BR さ 1 BD OO E9 E6 BD FF ささ 34 44 EC A1 』28 
6BFO_ED BD OO _aD 3O BD OO A5 9D DE 34 40 BD 1F 35 40 ヵ :99 
Sum: 25 BA 4 QAC 1D 5 2D 54 90 DF 9F FE CC SB 日 QO EF 14 
Add +QO 1 +2 + さ +4 + 品 +6 + プ + 日 +9 +a +B +C +D +E +F Sum 
6COQO 33 41 BD 19 C6 02 4F BD DB 6D a4 27 Oo2 BD D2 SA :B9 
6C10 26 F4 35 44 6D QO 27 O1 5 5a 26 DO 39 C6 08 34 saD 
生ま こら きこ こ に ニー こと ーー 6C2O 44 C6 OB 6B C4 49 6D BD FE F4 26 02 さ 33 42 ささ 42 :B5 
に の (に 】 っ 
Sumi 24 12 D6 2E CS 6 EB さ 1 QA 71 QF 6F 7E FD Ba DO giEE 同和 5 の 9 SH 部 2 の 昭 8 に NE 
6C5O_ FE CD 3D 34 02 1F 1 
Add  +O +1 2 + る ス +4 + オ 5 +6 + フ プ + 日 +9 +Q +E +C +D +E +F Sum 6C6O_ 49 CE 45 52 41 53 6 
6A00 07 B6 0Q1 E5 97 FEB OF C2 9D DB B1 3B 27 2F BD 92 siDC 6CZ7O 4E D4 53 4F 55 4E 7 
6Q1O 92 81 2C 27 12 BD 99 BC C1 QB 25 03 7E 96 63 D7 :C9 6CBO_5O_ 52 49 4E D4 4B 191 
6n20 FB 9D DB B1 さ B 27 16 BD 92 92 BD DE E2 24 03 ZE ze6 ヒ 6C9O_6E 64 65 64 20 46 4 
6Q30 92 AO D7 C2 9D D2 B1 3B 27 03 7E 92 AO 9D D2 26 』65 6CaAO 40 00 QQO 45 SB SQ0 2 
6Q40 QO1 39 Bo6 05 Oa C6 10 3D FE QOS Q4 DF C5 33 CB 11 iCC 6CBO 2E さ O 3 人 4 
6Q5O_ 83 Q2 BO 22 355 FF 05 04 33 5F DF C9 FC QO5 06 OF :B4 7 
6Q60 C7 OF CB 97 CB D7 CC BD 92 CS ED 9 05 DE 3D BD :B9 ずい 
67O 25 6 FF 97 F ヨ 7F O1 A5 DF F5 DE 3D DF F ミ 3 BD EA iC6 六 四 
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CLIST 実 行 例 


0' OR 人 5 EN 0 (8 
SUSUN ゆ SW)SSMN)9 上 D 
196G0SE:DD 
PP で HEX(DT JEXT PPS 


SUESNDtSW MT 
0 3 





『BASIC_ ANALYZER」 は BASIC プログ ラム の 開発 , デ 
バッ グ , 解析 を 短 時 間 に 少 な い 労 力 で 行なう た め の ツ ー ル 
で , F-BASIC に CLISTVLIST,FIND, SYSTEM の 4 つの コ 
マン ド を 新た に 拡張 し ます . これ ら の コマ ンド は 一 般 の コ 
マン ド と 同じ よう に , ダイ レク ト で , また は プロ グラ ム 中 
で も 使用 で きま す . また , すべ て の コマ ンド で プリ ンタ へ 
の 出力 が 可能 で あり , 特に CLIST コ マン ド で は カラ ー プ 
リン タ へ の 出力 も サポ ー ト され て いま す . 

プロ グラ ム 自 体 は 2.5 K バ イト と 小さ く , ポジ ショ ン ・ 
イン ディ ベン デン ト な の で , メモ リ 上 の 好き な 所 に 配置 で 
き , 20K バ イト 以上 の 大 き な プ ログ ラム の 開発 に も 使え ま 
あら 


本 プロ グラ ム は 完全 に リロ ケー タプ ブル で す が , リス ト ど 
お り の 位置 ($7600 一 $7FFF) に ある も の と し て 設 明 し ま 
す . まず , CLEAR,&H75FF, と し て エリ ア を 確保 し て くだ 
さい . カラ ー プ ロッ タ ・ プ ブリ ンタ を 使う 方 は その 機種 に よ 
っ て , 次 の よう に プロ グラ ム を 書き 換え て くだ さい . 

W ク タン デ ィ 製 CGP-115 
PORE & を H7602,0 
@NEC 製 PC-6022 
POKE を H7602,1 
@ 精 工 舎 製 GP-700M 
POKE を H7602,2 
テキ スト ・ モ ー ド で 色 指 定 の コン トロ ー ル ・ コ ー ド が - 
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BASIC ブ ログ ラム の 開発 , 
デバ ッ グ , 解析 に / 








SN / 2 
= 
` 述 






NL【 


NN 


1 
ん 
間 


半井 秀明 三 


ーー 三 う 









間 聞 / 


2 3 


CHR $ (29) で 次 の 色 に 変わ る タイ プ ' が 朝 , CHR $ (27) 二 
CHR$ (97 一 100) で 4 色 を 指定 する タイ プ が @, CHR$ 
(20) CHR$ (48 一 54) で 7 色 を 指定 する タイ プ が W に な 
り 。 ま 33 
他 の 機種 の 場合 で も , 上 記 の どれ か と コン トロ ー ル ・ コ 
ー ド が 一 致す れ ば 使え る と 思い ます . な お , GP-700M に 
つい て は 発売 前 に 直接 メー カー に 問い 合わ せ た も の な の で , 
仕様 変更 な ど が ある と 使え な い 場 合 が あり ます . 
FM-7 と 8 で, また は BASIC の バー ジョ ン に よっ て 次 の 
よう に 書き 換え て くだ さい . 
FEM-8 の 場合 
POKE &H7601,8 
@F-BACIC の バー ジョ ン が 1 の 場合 
POKE &H7DD1、 HED 
POKE &H7DCD, &HB3 
@⑥F-BASIC の バー ジョ ン が 2 の 場合 
POKE &H7DD1, &HF1 


コマ ンド の 設 明 


LCLIST〕 

CLIST は BASIC プロ グラ ム 中 の 命令 を その 働き に 応じ し 
て 色分け し て 出力 する も の で す . 

CLIST の 出力 を 見 る と 一 見 し て 全体 の 構造 が わか り ま す . 
そもそも 単色 の リス ト が 見 に くい 原因 は , 本 来 立体 的 構造 
を 持つ プロ グラ ム と いう も の を 平面 に 。 ある い は 直線 的 に 
表わし て いる と ころ に あり ます . これ が CLIST に よっ て 立 
体 的 に 表現 され ます . 以 た 例 と し て 地図 が あり ます . 質 
良い 多 色 刷り の 地図 は , 1 色刷 り の 地図 より は る か に 見 や 
すく , 一 見 し て 川 と 道 と 境界 線 の 区 別 や 高低 の 区 別 が わか 
り - ま sk すら 

な お , CLIST に は 画面 で リス ト を 追い な が ら 文 字 列 検索 を 
する 機能 も つい て いま す . 

CLIST で 表示 され た カラ ー リ スト は その まま 普通 の リ 
スト 同様 に エディ ッ ト す る こと が で きま す . 

色分け は 表 1 の よう に な っ て いま す (画面 出力 の 場合 ). 
FM-7 で は パレット 命令 で 表示 色 を 変え たる こと も 可能 で す . 

F-BASIC の LIST に 準じ て いま す . 特別 な 使い 方 と し て 
次 の よう な も の が あり ます . 































































































図 1 VLIST 表 示例 - 表 1 CLIST カ ラー 
凝 数 / 属 性 10 進 の 値 10 進 の 値 / キ ャ ラク タ 格納 アド レス 
65 (41/"A" OB2| 細 1 = 
2 5 lk 六 エディ タ ・ テ バッ グ (NON など) 柴 色 反転 
カセ ッ ト , プロ グラ ム の 入出 力 (SAVE な ど ) | 青色 反転 
音声 (BEEP,PLAY な ど ) 緑色 反転 
に 6 3 初期 設定 (DEF な ど ) 柴 色 
X "ABCD・" (41,42,4 さ 。44 0A) Eo8s5] マシ ン 語 の 取り 扱い (POKE, EXEC な ど ) 赤色 
ASClII コ ー ド デー タス 入力 (INPUT,READ な ど ) 青色 
画面 表示 (PRINT,LINE な ど ) 緑色 
GR プロ グラ ム の 流れ に 関す る も の (GOSUB な ど ) | 水色 
配 | o) 1! Eog41] 変数 処理 。 代入 , 計算 (LET な ど ) 白色 
1) 1546! Eo8451 ファ イル へ の 出力 , ディ スク 関係 / 
列 | (⑤) 2 さ ! LoB49] 拡張 命令 // 
(③) 452! toB4D1 行 番号 。 セパ レー タ 黄色 
注 ) 2 通り 以上 の 働き の ある 命令 は 働き に よっ て 色 を 変え ます . 
中 表 2 ROM 内 ルー チン 
CLIST(n-m〕 “文字 列 2 
は 行 番号 で 省略 可 . 機 能 | FM-7 。| FM_8 
90 行 近い 1 エラ ー(IN 条 件  B レ ジス タ に エラ ー コ ー ド ) BDD1| 92AB 
は ほほ ゃ で も 9 コマ ンド ・ レ ベル へ BE72|345 
この 命令 で は 指定 きれ た 文字 列 を 提 し な が ら n 行 か ら m 区 中 列 を 読 胡 取 中 抽 玩 べ (OUT 条 件 > メレ | HHFT | SDEN 
6 3 に ジス タ に アド レス , ロレ ジス タ に 文字 数 ) 
行 ま で 表示 し < 復 履 改行 9B50| 9F97 
また , LIST と 違っ て マル チ ス テー トメ ント が 可能 な の X メ レジ スタ か ら 0 0 を 見 つけ る まで て 出力 D678|DB1B 
で CLIST10:CLIST50:CLIST100-200 の よう な 使い 方 が X レ ジス ター 1 か ら 0 0 を 見 つけ る まで 出力 9BDB| 9FDF 
で きま す . カラ ー プ リン タ へ の 出力 は CLIST e, CLISTe _| 空白 1 つ 出力 9C22|A026 
100 の よう に し ます . D レジ スタ の 内 容 を 16 進 出力 AC37|AFE3 
A レ ジス タ / AC3D|AFE9 
[VLIST〕 D レジ スタ の 内 容 を 10 進 出力 B615|B96D 
こ CLOSE CE4B|ID10F 
OPEN CEDFID1A3 
これ は 変数 の リス ト を 出力 する も の で , カシ オ の Css 一 1 文字 入力 (IN 条件 : A レジ スタ ) D0721D336 
BASIC の VARLIST 命 令 を 拡張 し た 機能 を 持っ て いま す . 1 文字 出力 (OUT 条 件 : A レ ジス タ ) D08E|D352 
VLIST を 実行 する と , その 時点 で 登録 きれ て いる 変数 名 ABORT テ スト D678|D8C2 
を すべ て 表示 し ます . 必要 に 只 電 け を 表示 し た BREAK テ スト BS999 も 
才 記 き 6 門 き DA80|D 
1 学 型 と 電 示 こと が で き 
s DO で NM の 2 8 用 汽 導 渦 和泊 
0 天守 ROHS ナド DK の 本 50 の が BEEP(ON=$81。 OFF=S00) FD03|FD03 
陸 ま 3985 5 防 6 き 5 その 16 進 表示 . キャ ラ 16 進 で 表わさ れる 定数 を 文字 列 に コン バー ト (O0|B620|B978 
クタ 表示 を 行ない , 文字 デ 型 は ASCII コ ー ド の 表示 を 行 な UT 条 件 : X レジ スタ に 文字 列 先頭 アド レス , 
ます . 1N 条 件: $17 に 属性 (1,2, 3,4.8) を セッ ト し 
に ーー 3 8 mi ト ュー m $76 に 16 進 数 を セッ ト , 属性 4.8 の と き は FM- 
人 全 を 区 こ 示 は 必要 以上 を ) 禁 1 り 
胡 示 例 を 図 1 に 示し ます - 列 で 村 め 婦 の 閑 人 7 は $ B301。FM-8 は $ B676 を コー ル ) 
ける た め , 値 が 0 や *" (ヌル スト リン グ ) Ss テキ スト 中 で $FEF 2 の 形 で 表わさ れる 定 | 9 7 4D|9BEF 
示し ませ ん . た だ し , すべ て の 要素 が 0 や ツ で も 配列 名 は 数 を コン バー ト す る の に 先立っ て コー ル す る . | BD19 |C083 
表示 し ます . また , 配列 番号 は すべ て 通し 番号 で 表示 さ 4 注 ) 属性 1 コ 1 バイ ト 難 数 。 2 コ 2 バ イト 各 散 。 3 こ 文 字 型 
ます . DIM 文 で DIM S(a,b,c) と 宣言 され た 配列 で SD 4 三 単 精度 型 , 8 = 倍 精度 型 . 
の 配列 番号 n は 
ーー な ど を 出力 し ます . 
05 ai ノ : これ を 付け た 場合 、* が な いと き は 単に 窒 数 ご と の 
な り ま す . た と そば , DIM S(1,2,3) と 宣言 し た 配列 の 改行 を 行ない *※ が ある と き は 配列 の 要素 数 が 25 を 
Ph ら 1 十 2X2 十 3X2xX3 ニ 23 と な る の で , 越え る 配列 の 内 容 を 省略 し て , 変数 名 だ け を 表示 し 
ます . これ は 事務 系 プロ グラ ム な ど で , 非常 に 大 き 
290 Me Ah い 配列 が 使わ れ て いる と き , 表示 を 省略 する た め の 
の よう に 表示 され ます . も の で す . 
VLIST を 単に 実行 する と 変数 名 の み を すべ て 出力 し ま 例 
す . VLIST に は 22, ! 。 #,$。 ※. プ の 6 つの オプ ショ と > 財 
詩 精 度 型 , 者 の 内 容 と 共に 出 
ン が あり , それ ぞ れ の よう な 意味 が あり ます . Eu 。 が 人 を を の 届 入ら が 名 
カ し ます . 
ア の ノン 東 科 弄 変 数 を 改行 | 中 - 
 : 整数 型 変数 の 出力 VLIST 多 ン 沿 変 数 名 の み を 改行 し な が ら 出 力 
1 し まず, 
! : 単 精度 型 の 出力 VLIST @ キ | $ * 全 部 の 変数 名 を プリ ンタ に 出力 し ます 
革 : 倍 精度 型 の 出力 8 拓 * ダ 時 3 
$ 文字 型 の 出力 な お , VLIST で は リス ト 上 に は 存在 し て も 実行 時 に 使 
*:・ こ れ を 付け る と 変数 名 の 他 に その 内 容 。 格納 アド レ われ な い 変 数 は 表示 され ませ ん . 
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〔FIND〕 


これ は 指定 し た 文字 列 を 含む 行 の み を 表示 する コマ ンド 
で す . た と える えば, “HSS” と いう 変数 名 を すべ て “HISCORE" 
と 変え だ い 場 合 は ,。 この コマ シド で “HHSGP を 含む 行 だ 
け を 表示 させ て , 修正 する と いっ た 使い 方 が で きま す . 

この IND 機能 は CLIST 機 能 と 共に , BASIC テ キス ト 
の 内 部 表現 に 左右 され ませ ん . た と えば “NTA$" の よう 
な 指定 で “PRINT A$” を 捜す こと が で きま す . 

CLIST と まっ た だ たく 同じ で す が , 文字 列 が 見 つか っ た 行 の 
み を 表示 し ます . 出力 は 単色 で す . 





例 

FIND 10.50 “ABC” 10 行 か ら 50 行 の 間 で , ABC を 含 

む 行 の み 出力 し ます . 

FIND @-100“DEE" 直前 に 表示 し た 行か ら 100 行 の 
間 で DEF を 含む 行 の み , プリ ン 
ンタ へ 出力 し ます . 








表 3 BASIC ワ ー ク (FM- 7 , FM- 8 共通 ) 





栓 能 | アド レス 
テキ スト ・ ポ イン タ 0033 
変数 開始 (DEFFN 含 む ) ポイ ンタ 0035 
配列 開始 ポイ ンタ 003B 
フリ テモ エリ アボ ポイ シタ 003D 
リス ト ・ ス ター ト ・ ア ドレ ス 00A2 
リス ト ・ エ ンド ・ ア ドレ ス 00A4 
現在 実行 し て いる 行 00AB 
ファ イル ・ ナ ン バ ー 00BF 
デバ イス ・ ナ ン バ ー 02EB 
WIDTH 00C3 
バッ ファ か ら 1 文 字 読 む 0D0D8 
バッ ファ か ら 1 文字 読み ポイ ンタ を 1 つつ 進め る 00D2 
色 の コー ド 01E5 
ステ ー ト メン ト ・ テ ー プ ブル 01EF 
バッ ファ ・ ト ッ プ ・ ア ドレ ス 04 3D 
バッ ファ ・ エ ンド ・ ア ドレ ス 0536 
スタ ッ ク 下 限 ポ イン タ 003F 
文字 領域 下限 ポイ ンタ 0045 

ー 








[SYSTEM〕 


これ も Css-BASIC の SYSTEM コマ ンド に ヒン ト を 得 
た も の で , BASIC プロ グラ ム の テキ スト ・ サ イズ (10 進 数 
で 表示 され , 1024 で 割る と 何 民 バイ ト か わか る ) の 他 , 
BASIC プ ログ ラム ・ テ キス ト の 格納 先頭 アド レス , ユー ザ 

定義 関数 の 格納 先頭 アド レス (=BACIC プ ログ ラム ・ テ 
キス ト の 格納 最終 アド レス 1 ), フ リー エリ ア 先 頭 ア ドレ 
ス , シス テム ・ ス タッ ッ ク ・ エ リア の 最終 アド レス , BA 
S I C エ リア の 最終 アド レス を 表示 し ます . 

ちな み に CLEAR 300,&H6FEE を 実行 する と , BASIC 
エリ ア 最 終了 アド レス =&H6FFEF, シス テム ・ ス タッ ク ・ エ 
リア 最終 アド レス =&H6FFF 一 300 と な る の で , CLEAR 
文 が どこ に 設定 され て いる か わか ら な く な っ た と き に も 使 
えま す . 他 の コマ ンド と 同様 に プリ ンタ 出力 の と き は “"@”" 
を つけ て くだ さい . 





20 種 程度 の ROM 内 ルー チン と 20 種 程度 の BASIC エリ ア 
を 参照 し て いま す . し た が っ て FM-7 使 用 時 に は , ロー ド 
する と き 自 動 的 に FM-7 用 に ジャ ンプ ・ テ ー ブ ル を 書き 換 
えて で てい ます. 使用 し た ジャ ンプ ・ テ ー プ ブル を 表 2 に, BA 
SIC ワ ー ク を 表 3 に 示し ます . 

最も 苦労 し た 部 分 は , 一 文字 出力 と 色 指 定 を 普通 に BI 
OS コー ル し て 行なう と フィ ー ル ド が 設定 され る ため, C 
LIST 表示 の 後 エ ディ ッ ト が で き な い こと で し た だ た. あの “Y 
AMAUCHI" を 使っ て 直接 サブ プ CUT の ア . ド リ ビ ュ ー ト ・ 
バッ ファ 書き 換え を 試み た の で すか が 不発 に 終わ り ま し た . 

“PUT CHARACTERLINE" の コマ ンド を 使っ て カラ ー 
出力 し た と ころ , フィ ー ル ド が 設定 され な いこ と が わか り 
うまく 二 まし 企 

蛇足 か も し れ ま せん が , この プロ グラ ム を ロー ド し た 後 

(も ちろ ん , オー ト ・ ス ター ト で ) 先頭 か ら $90 バ イト は 
不要 な の で , BASIC プ ログ ラム が 大 きく な っ た と き は , 
CLEAR 文 を 設定 し 直し て ください. 


1 ANAL Y プ ビ ド R プア セン ブル ・ リス ト 








1 3 1 
人 *\| BASIC _ ANALYZER V2.@ for FN-2/8 1 
3 * | 1 
4 ※| file name "ANQLZ6g9" 1 
5 に | 1 
6 に | by H.HIRAI 83/4/21-23:19 1 
? | 1 
8 ※ レレ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーー 
19 2699 RG を Z599 . STaRT aDD. 
11 3 

12 * BASIC LUIORK 

13 3 

14 gg12 cstype EQU ま 12 

15 g933 text EQU $33 

16 9935 simple EQU ま 35 

1Z g93B array EQU $3B 

18 g93D free EQU 3D 

19 g9Z6 csset EQU ま Z6 

29 99a2 start EQU ま 人 2 

21 99a4 end EQU 4 

22 g9A6 curent EQU に 

23 99BF fileno EQU ま BF 

24 99C3 width EQU ま C3 

25 g9D2 getinc EQU ま D2 

26 geD8 get EQU ま D8 

22 g1ES color EQU ま 1E5 

28 91EF table EQU 1EF 

293 g2E6 deuice EQU ま 2E6 

39 g43D buftop EQU ま 43D 

31 953C bufend EQU ま 53C 

32 g93F stack EQU 3F 

33 g941 strinq EQU る 41 

34 9g945 basic EQU 45 

35 を 

36 き CONSTANT 











3Z 

38 998C CNPX EGU まま BC for 3 skip 
393 ポ 

49 * LINK _ROUTINE 

41 

42 2699 8C LINK FCB CMPX,Z」1 

43 2693 C6 39 LDB 提 ま 39 

94 ?Z695 EZ 8CF8 STB LINK,PCR 

45 Z698 EC SCF6 LDD く LINK+ 1 ,PCR 
46 Z69B 5 DECB 

42 269C 22 9 の 6 BEG LINK9g 

48 7Z69E 5a DECB 

43 Z6gF 22 95 BEG LINK1 

59 2611 CE 22 LDB 寺 CPR1 1 SMUGP- 1 
51 2Z613 8C FCB CMPX 

52 2614 Ce 15 LINK9 LDB 幸 CPRI 2-SLUI3P- 1 
53 2616 EZ 8D9653 LINK1 STB SMJ3P , PCR 

54 261a 81 9Z CMPA  #2 

SS 2Z61C 26 12 BNE LINK3 

56 2Z61E 86 14 LDa 

5Z 2629 39 8D93B4 LEAX JTaBLE ,PCR 
S8 2Z624 31 8CZaA LEaY <ERROR,PCR 
59 2Z62Z EE 81 LINK2  LDU ) キキ 

59 Z6293 31 21 LEAY 1jY 

51 Z62B EF a1 STU すう Y キ キ 

2 2Z62D 4 全 DECA 

E3 Z62E 25 FZ BNE LINK2 

54 2ZE39 CC 8915 LINK3  LDD # ま BO9 15 

55 Z633 CE 91EF LDU table 

56 2Z636 RB C4 LINK4 DDa ,U 

BZ 2Z638 33 4 人 LEAU 19,U 

E8 2Z638 ED C4 TST jU 

53 Z63C 26 F8 BNE LINK4 

7Z9 2Z63E 81 Fa ENPR 持 和 ま Fn 

Z1 2Z649 1922 918Z LBHI ERR21 

Z2 2Z644 RE 43 LDX 3jU 

73 2646 34 12 PSHS 

Z4 Z648 1Z g339 LBSR _ NaIE 
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25 Z64B 39 8D998E LEAX START,PCR 185 7Z9C  BD 9C BSR MRITE2 
26 Z64F AF 43 STX 3,U 186 7ZeE DC 35 LDD simple 
ZZ Z651 1183 @26D CMPU table+39 187 ZZ19 93 33 SUBD text 
Z8 Z655 27 @Z BEQ LINK5 188 ZZ12 8D ^5 BSR PRINTD 
29 Z65Z 1922 9179 LBHI ERR21 189 ZZ14 8BD 91 BSR CR 
8 Z65B AF 4D STX 13,U 199 7Z15 39 8C41 LEAX <ST1-1,PCR 
81 Z65D 8C FCB CHPX 191 7Z19 DC 33 LDD text 
82 Z65E 33 55 LINKS LEAU -19,U 192 7Z1B  BD 1a BSR SYSOUT 
B3 Z659  aE 41 LDX 1U 193 7Z1D 39 8C59 LEAX <ST2-1,PCR 
84 ?Z662 31 8D9915 LEAY NANE,PCR 134 7Z29 DC 35 EDD simple 
85 Z666 19AF 41 STY 1,U 195 ZZ22 8D 13 BSR SYSOUT 
86 7Z6693 6 C4 LDa ぅ U 196 2Z24 39 8CSF LEAX <ST4-1,PCR 
82 ZEEB 8D 1D BSR LINKZ 192 2227 DC 3D LDD free 
88 ZD 39 8C1D LEAX <NAMES,PCR 138 7223 8D 6C BSR SYSOUT 
89 ZZ 8e @4 EDA 4 199 7Z2B 39 8CEE LEAX <ST5-1,PCR 
dg Z622 8D 1E BSR LINKZ 299 72Z2E DC 3F LDD stack 
31 ze24 35 12 PULS AX 291 7Z39  BD 95 BSR SYSOUT 
92 Z6Z6  aZ BC1IA STA <code,PCR 292 7232 39 8CZD LEAX <STZ-1,PCR 
93 Z6Z9 AF 8C18 STX <other,PCR 3293 2735 DC 45 LDPD basic 
34 ZZC ABC4 LDA  ,U 294 ZZ37 34 66 SYSOUT PSHS Aa,B 
95 26ZE 6B94 Ap6A W4 295 ZZ39 17 FFEE LBSR MRITE2 
36 2689 。 AZ C4 人 s 務 計っ 296 2Z3C 35 96 PULS ajB 
82 2662 39 ea 267 ZZ3E 17 FFEF LBSR HEXD 
8 ーー 298 2Z41 16 FF63 LBRA CR 
299 半 ニ ニニ ニニ ニ 
99 Z683 E + T NAVEE 
1 痕 - 5688 BZ a ET /V と の 216 ZZ44 6D SsTe 。 FcB 13 
161 Z682 28 91 BPL LINKZ 211 ZZ45 42 FCC 。/BASIC PROGRAM SIZE = ノ 
192 2689 4^a DECA 212 ZZ5 合 6 FCB ら @ 
103 258Q 26FZ 所 NKZ NE LiNK6 213 ZZ5B 54 ST1 FCC 。/TEXT TOP ADDRESS = *$/ 
194 Z68C 39 RTS 214 ZZZ9 99 FCB  @ 
195 内 215 ZZZ1 52 ST2 FCC 。 ノ UIORK TOP ADDRESS = * ノ 
216 ZZ86 99 FCB 9@ 
196 * NEUU STATEFENT TABLE 
19Z 217 Z787 46 ST4 FCC 。 ノ FREE TOP ADDRESS = $ ノ 
218 ZZ9C 99 FCB 9 
NAMES FCC  /FIN ノ 
198 2888 84 FGB  $C4 p 219 ZZ9D 53 STS FCC 。/STACK END ADDRESS = *%/ 
119 2691 43 FCC  /CLIS ノ 226 ZZB2 69 FEGS :9 
111 2695 54 FEB  $54 221 ZZB3 42 STZ FCC 。 ノ BASIC END ADDRESS = $/ 
112 2696 53 FCC  /SYSTE ノ 233 7Z6B 9 FCB  @ 
113 269B CD FCB  $CD M 224 引 
114 769C 56 FCC 。 ノ VLIS ノ 238 本 
115 45084 を な ) 8 人 | 22e zzZc9 ce ge2 ERR2  LDB  W2 
11Z を PFS は UNP TABLE 227 ZZCB 15 FED3 ERR21 LBRA ERROR 
118 内 228 内 
119 26Q1  ZE 92AB ERROR JHP  $922B 233 b2 の に 
129 26A4  ZE 9DB6 STRING JMP  $3D86 
121 26AZ  ZE 9F9Z CR JHP  $9F9Z 232 2266 FE 人 寺 BSR PAGE 
122 26AA 。ZE 9FDF MRITE2 JMP  $9FDF 2338 2253 85@5 EDS 前 
123 Z6AD 7ZE AO26 SPACE JMP  $a926 334 2255 1 プア EEP6 BR PEEA 
124 Z6BO 7ZE AFE3 HEXD  JMP  $*AFE3 に に 
235 ZZDB 35 82 PULS Aa,PC 
議 26B3  ZE AFE9 HEXA JI や  *AFE9 238 
26 Z6B6 7ZE B5Z6  OV4SET JMP  $B6Z6 SET SNG. 
127 Z6B9 。 ZE B96D PRINTD JP  $B95D 338 EE 
128 Z6BC 7ZE B9ZB CONV  JMP  $B978 TO ASCII 
129 Z6BF  BD 9BEF  F2SET1 JSR  $3BEF は 2266 8 ObEN な LDB は Ms 
13@ 26C2  ZE CO83  F2SET2 JNP  $C983 241 225E 62 8i。 ffTeWa8 
131 Z6C5 ZED1OF CLOSE JHP  $D1eF 0 
132 Z6C8 ZED1AS OPEN JIP  $D123 gcE5 BS 3 BDD 3 昌 ま 0O 
133 Z6CB ZED336 INPUT JMP  $D336 243 228 中 8286 PT 詳 Ne 
134 Z6CE 7ZE D352 PRIA  JMP  $D352 245 の 
135 Z6D1 ZEDBIB MRITE JMP  $DB1B 」 
136 26D4 ZEDC83  CLS JIP  $DC89 242 OU 
137 Z6D7  BD DDSB8 BREAK JSR  $DDSB 
248 ZZE9 34 92 PRDH PSHS ^a 
8 26DA 7ZE DBC2 ABORT JMP  $DBC2 248 22EB 4 3 す 
138 BEA BU 志 BFA 259 ZZEC 27 68 BEQ PRAH9 
141 FD93 EQU  \$FD@3 on=*81 off= の 323 ZZEE 1Z FEBF EBSR HEXD 
148 る ZZ7F1 35 82 PULS Aa,PC 
2 円 
4 CSGSR 人 0 MGRN 254 * PRINT AccA in HEX 
255 と 
145 7Z692 UIORK EQU ERROR-15 
146 2633 code EQU MORK+1 ま F4etc 。 352 2 34 62 PRAH RB こ Np 
147 Z694 other EQU MORK+2 (2byte〉 ZFS 8C B 
148 2888 RG PEG(U OMBRRE4 258 ZZF6 1F 98 PRAHO TFR  B,』^A 
149 Z692 stradd EQU LORK+5 (2byte) 288 2 35 ILS BB 
159 7e99 flag1 EQU MORK+Z DATA,REM」/」"" 3 UES 后 
151 259a flag2 EQU MORK+B 」 382 き 0ETST 
152 269B fla93 EQU MORK+9 EorD 263 
153 263C fiag4 EQU MORK+19 RAN 264 ZZFD 6C 8DFE9C VLIST INC SM1,PCR 
154 7633 9fiag EGO  f!agi 52 265 Z891  EF 8DFE94 CLR  vflag,PCR 
155 ZD Su1 EQU MORK+11 2E6 Z85 Sp p2 JSR oetinc 
156 769E SUM2 EGU MORK+ 12 267 789Z 81 49 CMPA  /@ 
152 769F SM3 EGU MORK+13 268 Z899 26 @E BNE 。 VLIST2 
158 7Z629 SM3 1 EGU LUUORK+ 14 259 Z89B 8D CF BSR LOPEN@ 
159 日 2Z6 Z89D 29 98 BRA 。 VLIST1I 
16@ * STATEIENT START 221 Z89F 。EA SDFEB6 VLIST の ORB ovflag,PCR 
161 基 222 2813 EZ 8DFE82 STB uvflag,PCR 
162 Z6DD 4F START  CLR^ 人 、 273 2812 9D D2 VLIST1 JSR ogetinc 
163 Z6DE SF CLRB 224 Z819  C6 29 VLIST2 LDB  # 多 29 
164 Z6DF ED 8CBB STD Su1,PCR 225 Z81B 81 DC 6 な WE の 
165 Z6E2 ED 8CBA STD SM3,PCR 226 Z81D 2 フ 2F ゥ EO ORECGT 
166 2Z6E5S 3DD8 JSR get 2 フ ZZ Z8IF 54 SRB 
162 26EZ Aa9 8CA3 SUBA code,PCR 228 Z826 81DB GRP 人 AB タッ 
168 2 2 が 9SC1 EEA FIND 229 Z822 22 EB BEQ  VLISTg 
289 Z824 54 LSRB 
1Z の 9 Z6EF 192Z の SC@ LBEG  CLIST 281 7Z825 B1 23 CMPA 昔 / 間 
171 26F3 4 合 DEC 合 282 782Z 22E6 BEQ 。VLIST9 
122 Z6F4 22 6 BEQ SYS 283 Z829 54 CSRB 
123 2BF6 4 DEC 合 284 282Q 81 21 CMPA 肝 / 
174 Z6FZ 1922 9192 LBEQ  VLIST 285 782C 2 フ E1 BEG 。 QiST6 
12Z5 Z6FB 9D DB8 JSR get 286 Z82E 54 GRB 
126 Z6FD EE 9C94 JMP [other,PCR1 287 Z82F 81 25 EN や 全音 
172 2 288 Z831 22 pC BEQ  VLIST@ 
128 は SYSTEI 283 Z833 54 LSRB 
299 2834 81 ン 
186 ZZ96 3D DC2 SYS JSR getinc 231 283E 32282 人 ES 
181 ZZ792 BI 49 CHPA 半 7@ 292 2838 AE BDFESD LDA ovflag,PCR 
182 ZZ94 26 93 BNE SYS9g 293 Z83C 85 9F BITA  #$F 
183 ZZ96 17 9D1 LBSR LOPEN 294 283E 2E ee BNE 。 VLIST3 
184 ZZ99 39 8C32 SYS@ LEAX <ST9-1,PCR 235 2846 。 8 @E GR 介 放 
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296 
292 
298 
299 
399 
391 
392 
393 
394 
395 
396 
39Z 
398 
393 
319 
311 
312 
313 
314 
315 
316 
312 
318 
319 
329 
321 
322 
323 
324 
325 
326 
322 
328 
329 
339 
331 
332 
333 
334 
335 
336 
33Z 
338 
339 
349 
34 1 
342 
343 
344 
345 
346 
34Z 
348 
349 
359 
351 
352 
353 
354 
355 
356 
352 
358 
359 
369 
36 1 
362 
363 
364 
365 
366 
36Z 
368 
3693 
329 
37 1 
322 
373 
374 
375 
376 
37Z 
378 
329 
389 
381 
382 
383 
384 
385 
386 
382 
388 
389 
339 
391 
392 
333 
334 
335 
336 
39Z 
3938 
399 
499 
491 
492 
493 
494 
495 





7842 
7Z846 
7849 


784C 
784F 
7853 
7855 
785Z 
7Z85a 
785C 
78SE 
7Z8SF 
7859 
7861 
7862 
7864 
7866 
786Z 
7Z863 
786C 
786D 
28EF 
7Z8Z1 
7Z873 
2875 
787Z 
7878 
78793 
787B 
787D 
287E 
7889 
7882 
7883 


7Z886 
7889 
7Z88B 
788F 
7892 
7896 
7898 
789 生 
789C 
7Z89F 
28A2 
78a4 
7Z8^AB 
28a8 
78AAa 
7Z8aD 
78aF 
7Z8B2 
78B4 
7Z8BZ 
78B8 
78BA 
7Z8BC 
7Z8BE 
78C@ 
78C2 
7Z8C4 
78C6 
7Z8C8 
78CA 


Z8CC 
78CE 
7Z8CF 
7Z8D1 
78D2 
7Z8D4 
78D5 
78DZ 
78D8 
7Z8Da 
7Z8DB 
7Z8DD 
7Z8DE 
78E9 


7Z8E3 
7Z8E5 
7Z8E6 
7Z8E8 
7Z8EA 
78ED 
7Z8EE 
7Z8F9 


7Z8F 1 
7Z8F4 
7Z8F5 
7Z8FE 
7Z8F8 
7Z8Fa 
7Z8FC 
7Z8FE 
7Z399 
7Z9392 
7Z994 
7992 


7399 
7Z99C 
7Z919 
7Z912 
7Z914 
7Z916 


全 Z 
12 
16 


12 
A6 
85 
27 
12 
Aa5 
E6 
44 
44 
44 
44 
34 
C4 
SC 
AE 
17 
5A 
26 
35 
SE 
C1 
22 
4C 
4C 
C1 
22 
4C 
C1 
22 
4C 
16 


12 
34 
198E 
1 フ 
に 
85 
22 
34 
BE 
12 
35 
5 
81 
26 
12 
8D 
19AE 
EC 
12 
4D 
26 
8D 
SD 
Ce 
8D 
8D 
8D 
EC 
8D 
35 


86 
8C 
86 
8C 
86 
8C 
86 
8C 
86 
8C 
86 


8DFES3 
1BF 
FEZ9 


FE88 
8DFE46 
F@ 

93 
FE4D 
84 

89 


92 
gF 


89 
FE62 


F8 
@4 
21 


4 
ec 


FF45 
@43D 
g68 
SDFE93 
19 

2C 

19 
@43D 
FE2F 


FF21 


SB 
SD 
28 
29 
2C 


22 
FDEB 


FE 
98 
FF@6 


F3 


925C 


STa 
LBSR 
LBRA 


VLIST3 


VN1 


PRIKKL 
PRIKKR 
PRIKL 
PRIKR 
PRIC 
PRIST 


LBSR 
LDA 
BITA 
BEG 
BSR 
LDB 


uvf 1 aq ,PCR 
いり 
CLOSE 


BREAK 
vfl aq ,PCR 
も Fg 

VN の 

CR 

3 

ュ バキ 


昔 3 
VNE 


PRIA 


TaB 
に 4 

電 buftop 
VCONV 、 
vfl ag ,PCR 
電 ま 19 
VVE 

し 3 

幕 buftop 
URITE 

し 3 

な 

2 

VVE 

TaB 
PRIKL 
1.S 

YY キ 
PRDH 


Vv9 
PRISL 
PRIST 
1 

VSAa 
PRIST 
PRIKR 
1,S 
VaDpD 
azY,PC 


W ノ 
CMPX 
7【 
CMPX 
2] 
CMPX 
< 
CNMPX 
人 の) 
CMPX 
AR 
CMPX 
2 
PRIA 


PRIC 


VSHE 
Y+ 
PRAH 


VSHg 
PRAC 


VSHE 
ザキ 

の 
VSa1 
fileno 
VSa2 
幸 7・ 
PRIa 
USAa3 


TaB 

vf 1 ag ,PCR 
# ま 19 

VSE 

PRIST 

ル ,4 


PR.fromYtoY+B 








496 
49Z 
408 
499 
419 
411 
412 
413 
414 
415 
416 
412 
418 
419 
429 
421 
422 
423 
424 
425 
426 
427 
428 
429 
439 
431 
432 
433 
434 
435 
436 
437 
438 
439 
449 
441 
442 
443 
444 
445 
446 
442Z 
448 
449 
459 
451 
452 


454 
455 
456 
452Z 
458 
459 
469 
461 
462 
463 
464 
465 
466 
46Z 
468 
463 
479 
471 
472 
473 
474 
425 
4276 
472 
428 
479 
489 
481 
482 
483 
484 
485 
486 
48Z 
488 
483 
499 
491 
492 
493 
4934 
495 
496 
492 
438 
4993 
59@ 
59 1 
592 
593 
594 
595 
S96 
S9Z 
598 
599 
519 
511 
512 
513 
514 
515 


2918 19aE 
291B 8D 
291D 8p 
Z91F 12 
2322  BD 
2924  E6 
Z926 1geE 
Z929 8p 
Z92B 8D 
292D 39@ 
232F 1F 
2931 83 
Z934 34 
2936 Aa5 
Z93a 85 
293C 22 
?293E 12 
2941 8D 
2943  a5 
Z945 。 12 
Z948 8D 
294A 35 
Z94C 34 
294E 34 
2359 EC 
Z952 34 
Z354  E6 
Z956 3a 
Z952 3 
2958 34 
Z95A 。 12 
Z95D 34 
Z95F EC 
Z961 83 
7Z964 34 
Z966 12 
Z969 35 
Z96B 6a 
29ED 22 
Z96F 17 
Z972 29 
2924 32 
29Z6 17 
2929 35 
29ZB  ^6 
Z9ZF 85 
Z981 2 フ 
Z983 85 
72985 22 
Z987  C1 
Z989 26 
298B EC 
Z98D 1983 
2991 22 
?993  a5 
2995 CE 
Z998 34 
Z99A 8B1 
299C 22 
299E Aa5 
29a9 1F 
29A2 ED 
29A4 26 
29A5 4a 
29A7 26 
29A3 1F 
Z3AB 29 
Z9aD 8D 
29AF 8a5 
Z9B1 12 
29B4 12 
Z9B7 8Dp 
29B9 IF 
Z9BB 23 
29BD 19a3 
Z9Ce 26 
29C2 32 
Z9C4 29 
Z3C6 Ep 
29C8 25 
Z9CA 39 
Z9CC 29 
Z9CE 8D 
Z3p9 12 
Z303 12 
Z9p6 8Dp 
2908 1F 
Z9DA  a3 
29DC 19a3 
Z9DF 26 
29E1 29 
Z9E3 EE 
29ES 33 
Z9EZ  EF 
Z9E9S 33 
Z9EA 12 
29ED 12 
Z9F9 12 
Z9F3 EC 
Z9F5S 34 
Z9FZ 12 
29FA 35 
Z9FC 16 
Z9FF 12 
Za62 35 
Za94 39 
Za96 35 


@5 
FFE9 
EB 
61 
FFSF 
14 
8DFD 1a 
19 
ZC 
2g 
ec 
91 
24 
1E 
ga19 
EC 
4 
ggg9 
4E 
@3 
28 
E4 
12 
Aa 
gz 


F3 
21 
ga 
3B 
E4 
FED2 
FD29 
2 人 
19 
64 
6 
DC 
54 
3C 
84 
94 


FCBA 
FCBD 
FEE2 
E4 


~19 


FCBF 
19 
FED9 
FDCC 
16 
SB 
84 


VS9 


VAR9 


VaR 1 


VaR2 


VARV 


VARV9 


VaRV1 


VARV2 


VARV3 


VARS 


VARSg 


VaRS 1 


VARINC 


VARNUN 


VaRE 
VARE9 


PULS 


PSHS 
PSHS 
LDD 
PSHS 
LDB 
RBX 
ABX 
PSHS 
LBSR 
PSHS 
LDD 
SUBD 
PSHS 
LBSR 
PULS 
DEC 
BEQ 
LBSR 
BRA 
LEAS 
LBSR 
PULS 
LDA 
BITA 
BEG 
BITa 
BEG 
CMPB 
BNE 
LDD 
CMPD 
BHI 
LDa 
LDU 
PSHS 
CMPAa 
BEG 
LDA 
TFR 
TST 


DECA 
BNE 
TFR 
BRA 
BSR 
LDA 
LBSR 
LBSR 
BSR 
TFR 
SUBD 
CNPD 
BNE 
LEAS 
BRA 
TST 
BNE 
LEAX 
BRA 
BSR 
LBSR 
LBSR 
BSR 
TFR 
SUBD 
CNPD 
BNE 
BR^A 
LDU 
LEAU 
STU 
RTS 
LBSR 
LBSR 
LBSR 
LDD 
PSHS 
LBSR 
PULS 
LBRA 
LBSR 
PULS 
LEAX 
PULS 


全 
VS^a 
PRIST 
TAB 
PRIKL 
55 
1 
VSH 
PRIKR 
5 
X,D 
3 


合 
vf] aq ,PCR 
も 19 
VADDE 

TaB 
PRIKKL 

,S 

HEXD 
PRIKKR 

人 PC 


B 
X 
) ペ キキ 
a,B 
バキ 


B,X 
PRIKL 
B 
ューーX 
1 
メ 
PRINTD 

も 3 

3S 

VaR 1 

PRIC 

VaR9 

1,S 

PRIKR 

B,X 
ufl ag ,PCR 
まあ 19 

VaRE 

革 生 29 

VaR2 

甘 1 

VaRE 

ー2,X 

本 25 

VARE 

4,S 

守り 

AB,U 

に だ 】 

VARS 

3S 

XY 
jY キ 
VaRV1 


VaRV9 
YiX 
VARV2 
VARNUI 


4,S 
1,U 
4,S 


CR 
SPACE 
PRIKL 
4,S 

X 
PRINTD 
X 
PRIKR 
TAB 
AB,X 
D,X 
B,PC 


ARRAY 
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10 


BASIC _ ANALYZER ア セン ブル ・ リ スト 








516 
512 
518 
5193 
529 
521 
522 
523 
524 
525 
526 
522 
528 
529 
539 
531 
532 
533 
534 
535 
536 
53Z 
538 
533 
549 
541 
542 
543 
544 
545 
546 
54Z 
S48 
5493 
5S5@ 
551 
552 
553 
554 
555 
SS6 
55Z 
558 
5593 
Se9 
Se 1 
S62 
53 
564 
Se5 
SE 
56Z 
Se8 
569 
5Z@ 
5Z 1 
572 
523 
S24 
575 
5?ZE 
5ZZ 
5Z8 
5Z9 
S89 
581 
582 
583 
584 
585 
S86 
58Z 
588 
589 
539 
591 
532 
593 
534 
535 
S36 
59Z 
598 
5939 
Eg9 
691 
592 
693 
594 
595 
E96 
59Z 
6g8 
699 
19 
611 
B12 
613 
514 
615 
516 
61Z 
518 
619 
5629 
521 
622 
523 
624 
525 


2A98 
7A9a 
ZA9C 
2A6E 
ZA19 
2A14 
7A15 
2A18 
ZA1A 
2A1D 
ZAI1F 
2A21 
7A24 
7A26 
7A28 
2A2B 
7A2D 
フ A2F 
2a31 
2A33 
7A35 
7ZA35 
7A38 
2A3a 
7A3B 
7ZA3C 
7A3D 
ZA3E 
7ZA49 
7A42 
7Za44 
7a46 


7a47 
7Za43 
7a4B 
7Za4D 
7Za4F 
7ZA53 
Za55 
7ZA57 
7a53 
ZSB 
7ZA5D 
7ZASF 
7A6 1 
7Za63 
Za56 
7A59 
7a5B 


7ZA5E 
ZZ6 


ZZE 
7Za86 


7ZA8E 
7Za96 


Zn9E 
7aa6 


7ZaaE 
7ZaB6 


7ZaBE 
7ZaC6 


7ZACE 
ZD6 


7ZADE 


7ZAE2 
7ZAEA 


7ZAF2 
7ZaFA 


7B92 
7ZB9A 


7ZB12 


7B127 
7B1F 
7ZB26 
7B2E 
7ZB36 
7B3C 
7ZB41 
7B47 


7ZBS59 
7ZBS52 
7ZBS6 
7BS8 
7ZBSB 
7ZBSD 
7ZB69 
7ZB63 


95 
g5 


9B 
96 


94 
9g93 


g9 
92 


9B 
96 


99 
95 


99 
96 


96 


99 


99 
gg 


11 
91 


ge 


gD 
g3 
14 


99 
g93 
99 
し ル 4 


34 
5D 
と 
12 
29 
39 
33 
E6 


35 
3B 
393 
28 
BDFC85 
12 
91 
13 
FE2F 
g3 
95 
FEE5 
E4 
98 
FESB 
DD 
84 

り F 
86 
92 


p2 
B4 


89 
93 
92 
91 


3B 
3D 
1E 
E3 
8DFC46 
gE 
84 
gF 
92 
86 
84 
8B 
E6 
FDE6 
FEE3 
DE 
FC39 


76 
8DFB493 
g5 
FBZ3 
53 
8CBZ 
8C11 
89 


り LDX 
V@ CMPX 
BCC 
BSR 
BITA 
BEG 
TST 
BNI 
LBSR 
C ト PB 
BNE 
LBSR 
BRA 
V91 TFR 
LBSR 
BRA 
V92 LDA 
ANDA 
LEAX 
人 DDB 
RBX 
BRA 
V93 LDA 
LSRA 
LSRA 
LSRA 
LSRA 
TFR 
CMP 谷 
BNE 
LDA 
V93E RTS 


V1 LDX 

V11 CMPX 
BCC 
BSR 

V12 BITA 
BNE 
LDa 
aNDA 
aDDA 
LEAX 
LpD 
LEAX 
BRA 

V13 LBSR 
LBSR 
BRA 

VE LBRA 

攻 

* COLOR TABLE 

基 

革 

TABLE FCB 
FCB 

革 
FCB 
FCB 


FCB 
FCB 


FCB 
FCB 


FCB 
FCB 


FCB 
FCB 


FCBE 
FCB 


FCB 
TABLEF FCB 
FCB 


FCB 
FCB 


FCB 
FCB 


FCB 
を 


きる ま xSS ど 553 


xS 


全 B 
に だ 】 
V93E 
幕 1 


array 
free 

VE 

U93 

ぃ f] ag,PCR 
V り 13 

ュ X 

守 和 F 
革 2 
人 X 
っ X 
D,X 
U1 1 
VN 
VaR 
V11 


ヨ ,*95 , $ ま 53 , 4 , 124 , ま 24,3 
2, ま 54」11。11.3。3,5,5 
*CO-$CF 
11」1, ま 44 4,4」4」1.5 
6,6,9.5,9,5,5,3 

ま D9- を DF 

9, の 9,2,9, の , の 9,$ ま 85,9 
5,9,9,9,9,9。 
*EO-$EF 

の 9,9,9,9, の ,9,9,9 
6,6,6,5,6,5, 

ま を F9-$F3 
6,6,12,12 


9@,9 
3 


*FFB0-$ ま FF8F 
9,9,9,9,1,9,9 
9, の 9,9,9,2,9,9 
*FF39- ま FF9F 
9, の 9, の ,9,9, の ,9,9 

の 9, の 9, の 9, ま 21 の の, の ,9 
*FF 人 AO 一 ま FFAF 

ま 11.5,29,9,1」1,1 
1 , ま 39,9,5,6,6,6,6 
る FFB ロ ー ま FF 昌 4 
6,6,6,5,1 


,9 
,9 


* BIOS CONAND 


※ 


DATA1 FCB 
FCB 
DATA2 FCB 
FCB 
FCB 
DATA3 FCB 
FCB 
DATA4 FCB 


3 

\ PRINT CHR$ も 〈 

※ 

PRAC PSHS 
TST 
BEG 
LBSR 
BRA 

PRACO LEAX 
LEAU 

SETB LDB 


ま D , の, の 9, ま 人 ,9,9,5,9 
3, の 9,9,9, の も 11,$D 


も 14.9 


cc) with COLOR 


AB,X, YU 
SUI3 , PCR 
PRAC9 

PRIA 

PRACE 
DATA1 , PCR 
<PRAC 1 ,PCR 
> パト 








526 
62Z 
628 
629 
639 
531 
5632 
633 
634 
635 
636 
63Z 
638 
639 
649 
541 
542 
543 
644 
545 
646 
64Z 
648 
549 
659 
651 
652 
653 
654 
555 
5S6 
65Z 
658 
659 
569 
661 
562 
663 
564 
565 
66 
BZ 
568 
669 
629 
571 
622 
523 
624 
25 
626 
ZZ 
628 
629 
6589 
681 
682 
683 
684 
685 
686 
58Z 
688 
583 
639 
691 
692 
693 
694 
695 
536 
692 
638 
599 
799 
7Z91 
792 
7Z93 
7Z94 
7Z95 
7Z96 
7Z9Z 
7Z98 
7Z99 
7Z19 
み ま 3 
Z12 
Z13 
Z14 
Z15 
Z16 
yy4 
Z18 
Z19 
7Z29 
7Z21 
7Z22 
223 
Z24 
7Z25 
7Z26 
72Z 
7Z28 
7Z29 
7Z39 
7Z31 
7Z32 
7Z33 
Z34 
7Z35 


7ZB65 5 
7B6Z 全 Z 
7ZB69 Sa 
7B5a 26 
7ZB6C E6 
7ZB6E 39 
7ZBZ9 faF 
7BZ2 6E 
7ZBZ4 39 
7B2Z6 aF 
7ZBZ8 39 
7B7Z^a 8D 
7ZBZC 19AE 
7ZBZF 32 
7B81 39 
2884 33 
7B8Z 29 
7B89 1E 
7B8B 全 Z 
288D 全 Z 
789@ EZ 
7ZB92 EZ 
7ZB935 1E 
7B9Z AB 
7B99 全 Z 
7B9B Be 
7B9E 全 Z 
7Ba9 39 
7BA2 8D 
78a4 32 
7ZBA5 1F 
7ZBA8 4 ど 
7BA9 31 
7BaB 2Z 
7ZBAD 1F 
7ZBAF 39 
7BB2 33 
78B5 29 
7BBZ 19aF 
7ZBBA 39 
7BBC 8p 
7ZBBE 32 
7ZBC@ 35 
7BC2 12 
7ZBC5 35 
7BCZ EE 
7ZBCB EF 
7BCF SE 
7ZBD2 198E 
2BD6 3D 
7BD8 81 
7BDA 2Z 
7BDC 81 
7ZBDE レッ 
7BE9 81 
7ZBE2 22 
2BE4 3F 
7ZBE6 193F 
7ZBE9 3D 
7ZBEB 2Z 
7BED 1Z 
7BFg RF 
72BF4 EZ 
7BF8 393 
7ZBF9 8D 
7ZBFB 1F 
7ZBFD 1F 
7ZBFF 3D 
7ZC91 29 
7C93 3D 
7ZC95 81 
7C9Z 22 
?2C99 198E 
7ZC9D 29 
7ZC ら F SD 
2C11 1F 
ZC13 3D 
ZC15 29 
7ZC1Z 3Dp 
ZC19 SF 
7C1a 4 人 
7ZC1B 2Z 
7ZC1D 4 
7ZC1E 2Z 
7ZC29 4 
7ZC2 1 4 
7ZC22 1926 
ZC26 Ce 
7ZC28 3Dp 
7ZC2a 4D 
7ZC2B 1926 
7ZC2F 5 
7ZC39 26 
7ZC32 DC 
2C34 39 
7ZC35 8D 
7ZC3Z 9C 
7ZC33 26 
7ZC3B 9C 
7ZC3D 5 
2C41 1E 
ZC43 33 
7ZC44 86 
ZC46 8C 


89 


ES 
84 
66 
52 
C4 
68 
62 
E4 
4B 
SB 
ES 
8CA2 
8C92 
DA 
29 
EC 
E819 


E812 


91E5 


9FFBFA 


BDFACZ 
g9g9 
FF9F 


FBA3 
g4 
D2 


FB ヨ 


F6 
に ココ 


9@ 
Da 
92 
D9 
3F99D9 
83 


ge 


SETBg 


PRAC1 


PRAC2 


PRAC3 


PRACE 
PRACCR 


TOBI OS 
攻 

* READ 
RANGE 


R@ 


R1 


RE 
R2 


R3 


R4 


R5 


RS4 
RSS 


RS52 
RS1 


RS3 


3 


LD 全 
STa 
DECB 
BNE 
LDB 
LEAX 
STX 
JNP 
LEAX 
STX 
LEAX 
BSR 
LDY 
LEAS 
LEAX 
LEAU 
BRA 
EXG 
STa 
STa 
STB 
STB 
EXG 
LDA 
STa 
LDa 
STa 
LEAX 
BSR 
LEAS 
TFR 
INCA 
CCNP 人 
BEG 
TFR 
LEAX 
LEAU 
BRA 
STY 
LEAX 
BSR 
LEAS 
PULS 
LBSR 
PULS 
JNP 


RANGE 


CLR 
LDX 
LDY 
JSR 
CMP 全 
BEG 
CMPA 
BEG 
CMPA 
BEG 
STX 
STY 
JSR 
BEG 
LBSR 
STX 
STB 
RTS 
BSR 
TFR 
TFR 
JSR 
BR 人 
JSR 
CHPA 
BEG 
LDY 
BRAa 
BSR 
TFR 
JSR 
BRA 
JSR 
CLRB 
DECA 
BEG 
DECA 
BEG 
DECA 
DECA 
LBNE 
LDB 
JSR 
TSTa 
LBNE 
DECB 
BNE 
LDD 
RTS 
BSR 
INC 
BNE 
INC 
LDA 
EXG 
RTS 


\ SET COLOR 


攻 
COL6 


LDa 
FCB 


バキ 
ぅ ーS 


SETB9 


DATA2 ,PCR 
く PRAC2,PCR 
SETB 

Y,D 

*C,S 

ゃ 19,S 

ま ES 

も 12.S 

DiY 

B,S 

ま 全 ,S 

col or 

9,S 

jS 

TOBI OS 

B,S 

Y,D 


width 
PRACCR 

D,Y 

DATA3 ,PCR 
<PRAC3,PCR 
SETB 

2,S 

,S 

ToBIOS 

B,S 
AB」X』Y)U」PC 
CR 


全 ,B,X,Y,U」PC 
【BIOS1 


strno,PCR 
り 

多 FFBF 
getinc 
寺 負 FE 

R2 

に た 121 

R3 

2 】 

R3 

start 

end 

get 

RE 

STRING 
stradd,PCR 
strnojPCR 


R5 
D,X 
X,Y 
getinc 
R@ 
getinc 
村 ま FE 
R4 

# ま F9FF 
R1 

RS 

D,Y 
getinc 
R1 
getinc 


RS1 


RS2 


ERR2 
に し) 
getinc 


ERR2 


RS5 
curent 


RS51 
get+2 
RS53 
get+1 
【get+1] 
AB 


6 
C ト や PX 
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BASIC _ ANALYZER アセ ンプ ブル ・ リ スト 
236 2C42 86 @Z COLZ 。 LDPA WWZ 846 ZD2A 17 F99E LBSR INPUT 
237 2C49 BZ gIE5 COL STA color 842 ZD2D 29 B1 BRA 。CLIST1 
7Z38 2C4C 6D 8DFA4F TST SM3,PCR 848 ZD2F 34 19 CLIS14 PSHS X 
7Z39 2ZC59 26 @1 BNE COLPRI 849 ZD31 17 FF13 LBSR COLZ 
7Z49 2C52 39 RTS 859 ZD34 DC a5 LDD curent 
241 レッ 851 2D36 17 F98g LBSR PRINTD 
242 * COLOR PRINTER 852 ZD39 12 F9Z1 LBSR SPACE 
Z43 853 ZD3C 8E @43D LDX 昔 buftop 
Z44 2C53 34 2Z6 COLPRI PSHS AaA,B,X,Y, け 854 ZD3F 12 F98F LBSR MIRITE 
245 2C55 Ce @1 LDB 1 855 2D42 17 F962 LBSR CR 
246 ZC5Z 8B1 95 CMPA 5 856 ZD45 35 19 PULS X 
247 2C59 。 22 11 BEQ  CPRI9 85Z 2D47 2@ 9Z BRA 。CLIST1 
248 ZC5B  C6 92 LDB 2 858 ニニ ラニ ニ 
249 ZC5D 81 94 CHPA 4 859 2D49  EF 8DF94C CLIST2 CLR flaq1,PCR 
259 ZC5F 27 9B BEQ  CPRIO 869 ZD4D 39 94 LEAX 4,X 
251 2ZC61  C6 @3 LDB 3 861 ZD4F 198E 943D LDY WWbuftop 
252 ZC63 81 92 CMPA 2 862 ZD53 Aa 89 CLIS21 LDA  ,X+ 
7Z53 2ZC65 22 95 BEQ  CPRI@ 863 ZD55 26 9@1 BNE 。CLIST3 
254 ZC6Z 81 @3 CMPA #3 864 2D5Z 39 RTS 
7Z55 2ZC69 22 gi BEQ  CPRI9 865 着 ニ ーーー ニ ー 
7256 ZC6B 5F CLRB 86E ZD58 6F 8DF33E CLIST3 CLR flag2,PCR 
Z52 2C5C 29 22 CPRI の BRA  CPRI1 867 ZD5C EE 8DF939 LDB flag1,PCR 
258 ?Ceb SM3P EQU  CPRIO+1 8E8 ZD 81 22 CMPA 半 /" 
259 ※ー = Be9 ZD62 2E 9@56 BNE 。CLIS31 
269 ZC6E 34 9@2 CPRI3 PSHS Aa 826 ZD64 CB 91 EORB 91 
7Z61 2ZCZ9 86 14 LDA 14 DC4 8Z1 ZD66 EZ 8DF92F STB flag1,PCR 
262 2ZCZ2 12 Fa59 LBSR PRIA 822 ZD6A 81 3 CLIS31 CMPA  #/』 
263 7CZ5 35 92 PULS a 8Z3 ZD6C 26 21 BNE 。CL1IS33 
264 2CZZ 81 @Z CMPA  # フ 8Z4 ZDeE  C5 @5 BITB 丘 ま 95 REMor^or" 
265 ZCZ9 25 91 BCS  CPRI31 8Z5 ZDZ@ 26 1D BNE 。 CLIS33 
266 2CZB 4F CLRA 8Z6 ZDZ2  C4 FD ANDB  ##$ ま FD DATAa 
7Z67 2CZC 8B 39@ CPRI31 ADDA #/@ 8ZZ ZDZ4 EZ 8DF921 STB flaog1,PCR 
268 ZCZE 1Z FA4D  CPRI32 LBSR PRIA 8Z8 ZDZ8 Aa5 84 LDA 
269 2C81 3SF6 CPRIE PULS arB,X,Y,U,PC 879 ZDZA 81 8F CMPA 村 多 BF ELSE 
22@ 共 ーーーーーー 889 ZDZC 22 D5 BEQ 。CLIS21 
ZZ21 2ZC83 34 94 CPRI2 PSHS B 881 2DZE 81 8D CHPA 持 ま BD 
2Z2 ZC85 86 1B LDA 22 882 ZD89 227 D1 BEQ 。CLIS21 
723 ZC8Z 17 FaA44 LBSR PRIA 8B83 ZD82 17 FEBF LBSR COLB 
224 ZC8A 35 92 PULS a 884 ZD85 86 3a LDA 。 革 /5 
ZZ25 ZC8C 8B 61 DDA 7a 885 ZD8Z 17 9199 LBSR  CLOUT 
226 ZC8E 2@ EE BRA 。CPRI32 886 2D8A 17 FEBA  CLIS32 LBSR COLZ 
ZZZ ーーーーーー 882 ZD8D 29C4 BRA 。CLIS21 
ZZ28 2ZC39  E1 8BDFAOC CPRI1I CMPB SM31,PCR 888 ZD8F 4D CLIS33 TSTA 
229 ZC94 272.EB BEQ  CPRIE 889 ZD9g 2a96 BPL  CLIS35 
7289 ZC96 34 94 PSHS B 8936 ZDp92 Sp TSTB 
2Z81 2ZC98 86 1D LDA 29 891 ZD93 2Z 98 BEQG  。CLIST4 
7Z82 ZC9A 12 FaA31 LBSR PRIA 892 ZD95 8C FCB CMPX 
283 ZC9D 35 94 PULS B 893 ZD96 86 21 CLIS34 LDA 7! 
784 ZC9F Aa 8DF9FD LDa SM31,PCR 894 ZD98 127 918B  CLIS35 LBSR CLOUT 
285 2ZCA3 4C INCA 895 2D9B 29 B6 BRA 。CLIS21 
286 2ZCA4 81 93 CMPA 3 896 
28Z ZCA6 23 91 BLS 。CPRI11 897 ZD9D 81 83 CLIST4 CMPA  #$83 DaT^a 
Z88 ZCA8 4F CLRA 898 ZD9F 26 92 BNE 。CLIS41 
783 2ZCA3 AZ_BDF9F3 CPRT11 STA SLM3I,PCR 899 ZDA1 Ca g2 ORB  #$92 
Z99 2CAD 29E1 BRA  CPRI1I 399 ZDA3 81 8D CLIS41 CMPA 8BD 
Z91 961 ZDA5 22 9@4 BEQ  CLIS42 
232 \ FIND 992 2DAZ 81 8C CMPA  # ま BC REM 
Z93 に 9963 2DA9 26 92 BNE 。CLIS43 
7Z94 2ZCAF 6C 8DF9EB FIND INC SM2,PCR 394 ZDAB CA の 4 CLIS42 ORB  $94 
Z35 人 995 2DAD EZ 8DF8E8 CLIS43 STB flag1,PCR 
796 * CLIST 396 ZDBI BI】FE CMPA 財 ま FE CONSTANT 
Z3Z を 967 ZDB3 26 @Z BNE SETC 
7Z98 2ZCB3 gE D9 CLIST LDX get+1 998 ZDB5 AE 8@ LDA 生 : 
7Z99 2ZCBS ae @1 LDA 。 1.X 969 ZDPBZ 12 99Eg LBSR VCONV 
899 2ZCBZ 81 4@ CHPA 7@ 919 ZDBA 29 92 BRA 。CLIS21 
891 ZCB9 26 6@Dp BNE  CLISTe 911 ザー ニーー ニ っ 
892 2ZCBB 12 FBIC LBSR LOPEN 912 ZDBC 34 46 SETC PSHS A,B,U 
893 2ZCBE ED 8DF3DC TST SM2,PCR 313 ZDBE 33 8DFCAC LEAU TABLE,PCR 
894 ZCC2 26 @4 BNE 。CLISTg 914 ZDC2 81FF CMPA 革 ま FF FUNCTI ON 
895 2ZCC4 6C 8DF9DZ INC SU3,PCR 915 ZDC4 26 @A BNE SETC9 
896 ZCC8 1Z FF9@ CLIST9 LBSR RANGE 916 ZDC6 33 8DFD18 LEAU TABLEF ,PCR 
892Z ZCCB SE 33 LDX text 91Z ZDCA 6 89 LDA ょ メト 
898 2ZCCD EC 84 LDD 318 ZDCC 81 B4 CMPA  $B4 
899 ZCCF 22 @E BEQ  CLISTE 919 ZDCE 22 29 BHT SETC2 
81@ ZCDi DC a2 LDD start 929 ZDD9 BIF3 SETC9 CNP 人 AA 革 ま F3 
811 ZCD3 19a3 92 CLIS91 CHPD 2,X 321 2002 22 25 BHI SETC2 
812 2CD6 23 1Z BLS  CLIS12 922 ZDD4 84 2F 人 QNDA 肝 多 ZF 
813 2CD8 AE 84 LDPX  ,X 923 ZDD6 Aa6 C6 LDPA 人 U 
814 2ZCDA 26 FZ BNE 。CLIS@1 924 2DD8 27 24 BEQ SETCE 
815 ZCDC 12 F9E6 LBSR CLOSE 925 ZDDA 81 19 CHPA  #$19 
816 2ZCDF 39 RTS 926 ZDDC 25 1D BCS SETC3 
812 922 ZDDE 8D 22 BSR TYPE 
818 2ZCE の ED 8DF9BA CLIST1 TST SLl2,PCR 928 ZDE9 34 9@2 PSHS Aa 
819 2CE4 26 9@3 BNE 。 CLIS1t 929 ZDE2 44 LSR^A 
829 ZCE6 17 F9BE LBSR CR 93@ ZDE3 44 LSRA 
821 ZCE9 12 FFS5B  CLIS11 LBSR COLZ 931 ZDE4 44 LSRA 
822 ZCEC 17 F9E8 LBSR BREAK 932 ZDES 44 LSRA 
823 ZCEF 9F aA2 CLIS12 STX start 933 ZDE6 33 8C6B LEAU <CJUMP- 1 ,PCR 
824 ZCF1 EC 84 LDPD 334 2DE9 AE C6 LDPA azU 
825 ZCF3 22 EA BEQ 。CLISTE 935 ZDEB 33 8CIE LEAU <SSCR,PCR 
B26 ZCFS EC @2 LpDD 2,X 336 ZDEE 33 C6 LEAU 人,U 
827 ZCFZ 1993 A4 CHPD end 337 ZDF9 35 92 PULS a 
828 ZCFA 22E3 BHI 。CLISTE 338 ZDF2 8B4 @F ANDA 生ま の F 
829 2CFC DD a6 STD curent 939 ZDF4 EE C4 JMP 。 」U 
839 2ZCFE 6F 8DF93A CLR flag4,PCR 349 ZDFg 8E 95 SETC1 LDA WS 
831 ZD92 ED 8DF998 TST SM2,PCR 941 ZDFB 8C FCB  *BC 
832 2D96 26 @E BNE 。 CLIS13 342 2DF3 86 96 SETC2 LDA  #5 
833 ZD98 12 FF39 LBSR COL6 YELLOM 343 ZDFB 17 FE4B SETC3 LBSR COL 
834 ZDeB DC AG5 LDD curent 344 ZDFE 35 46 SETCE PULS Aa,B,U 
835 ZD9D 17 F9a3 LBSR PRINTD 945 ZE99 29 5C BRA 。CLIST5 
836 ZD19 17 FF34 LBSR COLZ MHITE 946 ネーーーーーー 
83Z ZD13 12 F99Z LBSR SPACE 347 ZE92 34 19 TYPE PSHS X 
838 2DI6 9E a2 CLIS13 LDX start 348 2ZE94 EE 89g TYPE1 LDPB  ,X+ 
839 ZD18 8D 2F BSR  CLIST2 949 ZE95 Ci 29 CMPB  #/ 
849 2D1A 9E A2 LDX stsrt 359 2ZE98 2ZFaA BEQ TYPE1 
841 ZDIC AE 84 EP 光 区 951 ZE9A 35 99 PULS X,PC 
842 ZDIE ED 8DF9za TST flag4,PCR 952 ※ーーーーーー 
843 ZD22 22 BC BEQ  。CLISTi 953 ZE9C Cl 28 SSCR CMPB  #/( 
844 2D24 ED 8DF3Z6 TST SM2Z,PCR 354 2ZE@E 22 EB BEG SETC3 

全 845 Zp28 256 @5 BNE 。 CLIS14 955 2ZE19 86 9@4 LDA 4 

| 





72 
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BASIC_ ANALYZER ア セン ブル ・ リ スト 








356 
95Z 
3S8 
359 
369 
36 1 
362 
363 
384 
365 
366 
62 
368 
363 
329 
37 1 
372 
923 
324 
925 
328 
32Z 
378 
3293 
389 
381 
382 
383 
384 
85 
386 
987 
388 
389 
93 
391 
332 
333 
334 
335 
936 
392 
338 
999 
1999 
1991 
1992 
1993 
1994 
1995 
1996 
199Z 
1998 
1999 
1919 
1911 
1912 
1 の 13 
1914 
1915 
1916 
191Z 
1918 
1913 
1929 
192 1 
1922 
1923 
1924 
1925 
1926 
192Z 
1928 
1929 
1939 
1931 
1932 
1933 
1934 
1935 
1936 
1932Z 
1938 
1933 
1949 
1941 
1942 
1943 
1944 
1945 
1946 
194Z 
1948 
19493 
1959 
1951 
1952 
1953 
1954 
1955 
1956 
195Z 
1958 
1959 
1969 
1961 
1962 
1963 
1964 
1965 


7ZE12 
7ZE14 
ZE16 
7ZE18 
7ZE1a 
ZE1C 
ZE1E 
ZE21 
7ZE23 
ZE25 
7ZE2Z 
7ZE29 
7ZE2B 
7ZE2D 
7ZE2F 
7ZE31 
7ZE33 
7ZE35 
7ZE37 
7ZE39 
7ZE3B 
7ZE3D 
7ZE3F 
7ZE41 
7E43 
7ZE45 
7ZE43 
ZE4B 
7ZE4D 
7ZE4F 
ZES 1 
7ZE53 


7ZE55 
7ZESZ7 
7ZE59 
7ZESB 
ZES5D 


ZESE 
7ZE6 1 
7ZE63 
7ZE65 
7ZE6Z 
7ZE63 
7ZE6B 
ZED 
7ZE6F 
7ZEZ3 
ZEZ5 
7EZZ 
7ZEZ9 
7ZEZB 
7ZEZC 
7ZEZE 
ZE89 
7ZE82 
7ZE84 
7ZES86 
7ZE88 
7E8B 
7ZESD 
7E8F 
7ZE33 
7ZE92 


2E34 
ZE9C 
2E9E 
7EA9 
ZEA2 
7EA4 
7EA6 
7EA8 
7EAA 
ZEAC 
ZEAF 
2EB1 
ZEB3 
ZEB6 
2EB8 
2EBA 
2EBC 
ZEBE 
7EC9 
ZEC2 
ZEC4 
ZEC6 
7ZEC8 
7ECA 
ZECC 
2ECF 
ZED1 
ZED3 
ZED5 
ZEDZ 
ZEDB 
ZEDF 
2ZEE 1 
ZEE3 
2EE5 
2EEZ 
ZEE9 
7ZEEB 
2EEF 
2EF1 
2EF3 
プ ZEF5 
2EFZ 
7EF9 


CE 
81 


33 
84 
33 
ED 
1922 


2 


EE 
に 1 
2B 
ED 
2 
29 
6 
84 
12 
6D 
2A 
6D 
192Z 
16 


34 
81 
22 
81 
22 
81 
26 
EC 
34 
12 
29 
に LM 
1Z 
39 
29 
gF 
29 


3Z 
86 
32 


93Z 
34 
1Z 
35 
35 
35 
34 
6F 
EF 


81 
22 
8D 
81 
26 
EC 
29 
81 
22 
81 
26 
6C 


SFEN 


STIME 


SPUT 


SKEY 


SPRI 


SLIN 


STHEN 


SCOH 


g1E5 
FF 
@4 
1F 
45 
7F 
4 人 
C4 
FF23 
C4 
F4 
C4 
41 


CLISTS 


CLISS1 
CLI SS2 


CLIS53 
96 
C9 
FC 
FZ 
C4 
ZF 
938 
C9 
F5 
8DF89Z 
FEBC 
FEF@ 


CLIS54 


CLISSS 


92 
@1 
1 
@2 
1a 
F2 
@9 
81 
39 
F819 
1B 
12 
F89 
86 
19 
26 
@4 
8 の 
26 
@2 
1Z 
89 
2Z 
39 
FZED 
4@ 
29 
@4 
49 
BDFZBF 
BDFZBC 
89 
29 
FA 
3C 
2E 
@e 
8DFZ^B 
@C 
45 
@4 
44 
94 
BDFZ9E VCON24 


VCONV1 


VCON1 1 


VCON12 


VCON13 


VCON14 


VCONV2 


VCON2 1 


VCON22 


VCON23 


BR 
CNPB 
BEG 
BRAa 
CHPB 
BNE 
LDE 
CHPB 
BEG 
BR 


BEG 
BR 
CNMPB 


BR^a 
CI ト PB 
BNE 
BRA 
CFPB 
BNE 
LD 人 、 
BRAa 
CHPB 
BEG 
STA 
BR 
LDB 
CFPFB 
BNE 
LDAa 
BR 


FCB 


FCB 
FCB 
FCB 


LDU 
CMPA 


LDA 
LEAU 
人 aND 人 人 
LEAU 
TST 
LBEQ 
SUBEA 
BPL 
DDaA 
LDU 
DECA 
BNI 
TST 
BPL 
BR 
LDA 
aND 全 
LBSR 
TST 
BPL 
TST 
LBEQ 
LBR^Aa 


PSHS 
CMPA 
BEG 
CNPA 
BEGQ 
CMPA 
BNE 
LDD 
PSHS 
LBSR 
BRA 
STA 
LBSR 
LEAX 
BR 
CLR 
BRA 
LDA 
STA 
LDa 
STA 
LDa 
STA 
PSHS 
LBSR 
PULS 
PULS 
PULS 
PSHS 
CLR 
CLR 
LDR 
C ト PA 
BEG 
BSR 
CMPA 
BNE 
INC 
BRA 
CMPA 
BEG 
CMPAA 
BNE 
INC 


SETC3 
し 
SETC3 
SETC1 
桂 パ 
SETCE 
color 
SETCE 
SETC1 
寺 7@ 
SETC3 
SETC2 
遼 7( 
SETC3 
SETC1 
圭 / 拉 
SETC3 
SETC2 
電 多 FF 
SETC3 
1 
SETC3 
# ま FE 
SETC3 
f] ag2,PCR 
SETC3 
jX 
村人 2 
SETC3 
幸 11 
SETC3 


SSCR-SSCR , SPEN-SSCR 
STIIE-SSCR , SPUT-SSCR 
SKEY-SSCR , SPR1 -SSCR 
SLIN-SSCR ,STHEN-SSCR 
SCON-SSCR 


##table-19 
寺 和 ま FF 
CLIS51 
ーー X 
5,U 
村 和 ま ZF 
19,U 
jU 
CLIS34 
jU 
CLISS2 
U 

1U 


FUNCTI ON 


TABLE TOP 


CLISS5 
)U+ 
CLIS54 
CLIS53 
ぅ U 
坦 委 ZF 
CLOUT 
ょ U+ 
CLISS5S 
fl ag2,PCR 
CLIS21 
CLIS32 


合 

本 まり 1 
VCON1 1 
柏 委 の 2 
VCON12 
電 ま F2 ? 
VCONV1 4or8 BYTE 
キキ 
XY 
F2SET1 
VCONV2 
cst シ pe 
OV4SET 
全 X 
VCONI4 
csset 
VCON13 
ュ バキ 
Csset 
革 あ 92 
cstype 
)X+ 
csset+1 
X,Y 
CONV 

U 

し 4 

B 


1BYTE 


2BYTE 


(2b>t@〉 


U 

f] ag2,PCR 
fl ag3,PCR 
PS 

の 

VCON2 1 
CLOUT 

幸 /。 
VCON23 

fl ag2,PCR 
VCON25 

に 2 当 ゴ 
VCON24 

幕 7D 
VCON25 

fl ag3,PCR 

















1966 
196Z 
1968 
19693 
19Z9 
19Z 1 
1922 
19Z3 
19Z4 
1925 
19Z6 
19ZZ 
1928 
19Z9 
1989 
1981 
1982 
1983 
1984 
1985 
1986 
198Z 
1988 
19893 
19 コ 9 
1991 
1932 
1933 
1934 
1935 
1936 
1993Z 
1938 
1939 
1199 
1191 
1192 
1193 
1194 
1195 
1196 
119Z 
1198 
1193 
1119 
1111 
1112 
1113 
1114 
1115 
1116 
111Z 
1118 
11193 
112@ 
1121 
1122 
1123 
1124 
1125 
1126 
112Z 
1128 
1129 
1139@ 
1131 
1132 
1133 
1134 
1135 
1136 
113Z 
1138 
1133 
1149 
1141 
1142 
1143 
1144 
1145 
1146 
1142 
1148 
1143 
1159 
1151 
1152 


7ZEFD 
ZEFF 
7ZF91 
7ZF95 
7ZF9@Z 
7ZF の B 
7ZF9D 
ZF9F 
(の 
ZF 13 
ZF15 
7ZF 1Z 
ZF19 
7ZF1B 
ZF iD 
ZF1F 
ZF21 


ZF23 
フ F2Z 
ZF29 
ZF2B 
7ZF2D 
7ZF31 
7ZF33 
7ZF3Z 
ZF393 


ZF3a 
ZF3D 
7ZF41 
7ZF43 
ZF45 
ZF49 
ZF4D 
ZF4E 
7ZFS9 
7ZFS52 
ZF54 
?F55 
7ZF5Z 
7ZFSB 
ZFSD 


7ZFSF 
7ZF62 
7ZF64 
7ZF68 
7ZF6C 
7ZFEE 
ZFZ1 
7ZFZ2 
ZFZ4 
ZFZ6 
7F73 


7ZFZB 
7FZD 
7F89 
ZF83 
ZFS6 


7ZF88 
ZFec 
7FB9g 
7ZFB2 
7ZFC4 
7ZFD65 


ZFDS 
7ZFE9 
7ZFES 
7ZFF9 
7FF8 


8999 


34 
1Z 


1Z 
35 


2 各 
52 
9D 
29 
2C 
ga 


SDD1 
3C22 
Be15 
CE4B 
D3gF 


9999 


89 
E4 
8DFZ36 
1 全 
SDFZ8F 
gC 
F2 
19 
9g4 
94 
と 
6 
g8 
g4 
23 
2 
39 


gS3C 
19 

9 

人 4 
8DFZED 
141 
SDFZE6 
91 


8DFZ4^a 


82 


49 
FZ54 
SCg4 
FZ24 
C@ 


VCON25 


VCON26 


VCON2Z 


CONP 


BEEP 1 


* TITLE 


NaIE 


* FN-Z 


JTABLE 


※ 
| 


* 
し 


LDAa 
BNE 
TST 
BNE 
TST 
BNE 
CNPB 
BEG 
C ト PB 
BNE 
LDa 
BRA 
CMPB 
BNE 
LDA 
BSR 
PULS 


CMPY 
BCC 
STA 
CLR 
TST 
BNE 
TST 
BEG 
RTS 


LBSR 
TST 
BEG 
FPSHS 
LDE 
LDX 
人 BX 
LDA 
CMP 
BNE 
DECB 
BEG 
CMPY 
BHI 
PULS 


LDX 
LDa 


PSHS 
LBSR 
LEAX 
LBSR 
PULS 


FCC 
FCC 
FCE 
FCC 
FCC 
FCB 


JUNP 


FDB 
FDBE 
FDBE 
FDB 
FDB 


RIB 


メキ 

VCOUN22 
flag3,PCR 
VCON28 
flag2,PCR 
VCON26 

守 ま F2 ? 
VCON28 
寺 ま 94 
VCON26 
夫人 
VCON2Z 
守り 8 
VCON28 
草 7 拉 
CLOUT 
X,PC 


(4byte) 


(8byte) 


昔 bufend 
LCOUTE 
ュ Y+ 

jY 

SMI2 ,PCR 
SLI2A 


SM1 ,PCR 
SUI1 


PRAC 
strno,PCR 
LCOUTE 
AB,X,Y 
strno,PCR 
stradd,PCR 


Pi 

ューY 
CONPE 
BEEP 

革 bu 了 ftop 


COFP 
BK。Y,FC 


寺 ま 199 
ま B 1 

fl ag4,PCR 
SUI2 ,PCR 
COMPE 

BEL 


ー1,X 
BEEF 1 
BEL 

COMFE 


U 

CLS 

く NAME1-1,FCR 
MRITE2 

U,PC 


ノノ BS1IC ANALYZE/ 
ノ R VersiOon 2 共著 共著 の 
13,19 

ノ Expanded => CLIST/ 

ノ ,VLIST,FIND ,SYSTENM/ 
19,99 


TABLE 


ま を BDD 1 , も 38F 1 , ま 3BS5G , も 3BDB 
ま 9C22 , ま 人 C37 , ま C3D , ま B30 1 
ま BE 15 , ま B629 , ま 3Z4D , ま BD 13 
ま CE4B , ま CEDF , ま D922 , ま DOBE 
ま D ヨ 9F , ま DAB9 , まあ DBS , 和 ま DEZ8 


9 


ーーーーーー 


CHECK SUN1 PROGRAN 
* | P=9:FOR 1!=&HZ599 TO &HZFFF:P= ニ 


1 
「 
\| P+PEEK(1) :NEXT Ii:? P [RETURN〕 | 
1 


CHECK SU ト H => 242621 


= ニニ ーーー=) 





END 







































































\SIG 
ュ マ ン 






































『F-BASIC EXPANDER』 を 使っ て みて , その 便利 さ に 感 
黄 じ で ませ まじ た 
そこ で , 私 も プロ ッ ト 関 係 の 拡張 命令 を 作っ た の て , 発 


天 : し ます 
目 的 


いま まで に も FM-8 用 と し て , グラ フ 作 成 関係 の プロ グ 
ラム が 発表 され て いま す が , 機能 は な か な か 便利 な の に , 
BASIC で 書か れ て いる た めい ろ い ろ と 不便 な 面 が あり 
まし た . そこ で , それ ら の 一 部 で す が , 拡張 命令 と し て 実 
現し て み ま し た . 

まず , 拡張 され る 命令 の 考え 方 と し て は , 図 1 の よう に , 
任意 の 仮想 画面 (VXmin、VYmin) 一 (VXmax 。 VYmax ) 
を 定義 し , その 座標 を FM-8 の 実 画面 で も る , 640X200 ド 
ッ ト の 内 (RXmin, RYmin) 一 (RXmax, RYmax) に 変換 
し て や ろう と いう も の で す . つま り , FM-8 の 画面 に 任意 
の 座標 が 定義 で き , その 座標 で プロ ッ ト な ど が で きる と い 
う 訳 で す . こ れ ら に つい て は , 参考 文献 2) に わか りや すく < く 書 
か れ て いる の で , も っ と 詳し く 知 り た い 方 は そちら の 方 を 
参考 に し て くだ さい . 


仕様 


拡張 され る 命令 は 座標 の 定義 , プロ ッ ト の ステ ー ト メン 
ト が 6 個 , 座標 の 読み 取り , フォ ー マ ッ ト 付 六 字 変換 の 関 
写真 1 テス ト ・ プ ログ ラム 実行 例 


RSCALE min,Ymin,Xmax , Vmax 
4 少 329 


7 生 


























較 ROB⑨@⑨ 


数 が 3 個 で す . 


以下 , これ ら の 使い 方 な どき を 説明 し ます . 








VSCALE Xmin, Ymin, max。Ymax ] 





引数 :F ド -BASIC の 整数 , 単 精度 数 式 の 範囲 . 倍 精度 数 

式 で も か まい ませ ん が , 内 部 で 単 精度 に 変換 され て し まい 

ます 

説明 : 仮想 画面 の 座標 を 定義 する 命令 で , Xmin な ど は 図 1 

00 まあ っ > なお, リス トト 1 の プロ グラ ム 
を ロー ド し た 直後 は , VSCALE 0, 0, 639, 199 に 設定 さ 

れ て て いま す . 





RSCALE mi Ymin,。Xmax。Ymax 





引数 : 正 の 整数 の 範囲 、 し か し , FM-8 の 画面 が 640X200 
ドッ ト で すか ら , 側が 639 を , Y 側 が 199 を 吉 え る と 意 
味 を 持ち ませ ん . 
説明 : 実 画面 の 使用 範囲 な ど を 定義 する 命令 で ,Xmin な ど 
は 図 1 の RXmin な ど に 対応 し ます . な お , この 命令 は FM 
-8 が 640X200 ドッ ト の 分 解 能 で ある た め , あま り 機 能 が 
発揮 で き な い よう で す . 

リス ト 1 の プロ グラ ム を ロー ド し た 直後 は , RSCALE 
0, 199, 639, 0 に 設定 され て いま す . 

つま り , 画面 の 左下 が 原点 (0, 0) に な り ま す . 





MOVA 区 ,Y 








引数 :F-BASTIC の 整数 , 単 精度 数 式 で , VSCALE で 定 

義 し た 範囲 内 . 

説明 : 現在 の 位置 (以前 に 移動 、 ま た は 描画 し た 後 の 位置 ) 
写真 2 応用 例 


F-BRS 1C 





か ら (X, Y) の 位置 まで 線 を 描か な いで 移動 し ます . 
DRWA 文 , Y[[, 機能 ] [, カラ ー]] 


引数 : X メ と Y は MOVA と 同じ で , 機能 は PSET,PRESET , 
AND, OR, OR の いずれ か で す . カラ ー は 0 一 7 の コー 
ド で す . 

説明 : 現在 の 位置 か ら (X, Y) の 位置 まで , 指定 し た 機 
珍 お よび , カラ ー で 線 を 描き ます . な お , 機能 また は , カ 
ラー を 省略 し た 場合 は 以前 に 指定 し た 機能 , カラ ー が 使わ 
= op 











| MOVR 区 ,Y 


』O 


1 仮想 画面 と 実 画面 
VXmax, VYmax 


RXmax, RYmax ーー 






RXmin。 


VXmin, VYmin 
図 2 FSTR$ の 実行 例 











引数 :F-BAS TIC の 整数 , 単 精度 数 式 で , 加 えた 結果 が , 
VSCALE で 定義 し た 男 囲 内 . 

説明 : 現在 の 位置 に (X, Y) を 加え た 位置 まで 移動 . 

| DRWR 文 、Y[ [, 機能 ] [, カラ ー」] ] 

引数 : 双 と Y は MOVR と 同じ で , 機能 お よび カラ ー は DR 
WA と 同じ で す . 

説明 : 現在 の 位置 か ら , 現在 の 位置 (X, Y) を 加え た 位 
置 ま で , 指定 し た 機能 , カラ ー で 線 を 描き ます . 














| RPOSX( [XX] ) 





引数 :F-BAS 1IC の 整数 , 単 精度 数 式 で , VSCALE で 
定義 し た 範囲 内 . 

説明 : 仮想 座標 の X を 与え る と , その と き の 実 座標 で の 値 
を 返し て きま す . X を 省略 する と 現在 の 位置 で の 実 座標 の 
値 を 返し て きま す . 


RPOSY([Y]) 








説明 : XX が Y に 変わ る だ け で ERPOS 双 と 同じ です . 
| FSTR$( フォ ー マ ッ ト 交 字 例 数 式 ) 


引数 : フォ ー マ ッ ト 凛 字 列 は パ 提 ドイ アキ ペー クタ 
*<? な ど を 使っ て , 数 値 の フォ ー マ ッ ト を 指定 し ます . 
な お , “ く ? は 1 個 の み で よく ,F-BASTIC の よう に 4 
個 を 並べ る 必要 は あり ませ ん . 数 式 は F-BASIC の 整数 , 
単 精度 , 倍 精度 数 式 が 使え ます . 
説明 : 数 式 の 値 を フォ ー マ ッ ト 廊 字 列 の 書式 指定 に 従い , 
廊 字 列 に 変換 する 関数 で , F-BASIC の PRINT USING 
の よう な も の で す . た だ , 数 値 の フォ ー マ ッ ト の み で , 文 
字 ,。 空白 な どの フォ ー マ ッ ト は で きま せん . 

また ,。 フォ ー マ ツ トド 区 字 列 年 ネネ 7 。 パ 7 。 さる 
な ども ゃ 一 応 使え を ます が , ^*? を 除き , それ 自身 の 桁 領域 
が 確保 されない の で , ~#? で 桁 領域 を 確保 する 必要 が あ 
り ま す . 

実行 例 を 図 2 に 示し ます の で , 参考 に し て くだ さい . 











Ps=icassaisssassgssssssild リス ト 1 





入力 数 値 


フォ ー マ ッ ト 文 字 出力 文字 
12.3456 革 韻 半 后 . 韻 装 12.35 
1234 十 半 寺井. 半 圭 +1234.00 
ー12345 ー 革 時 革 革 革 填 12345 一 
123456 填 韻 半 . 斗 韻 壮 ぐ 12.346E 二 04 
12345 \、 ※ 斗 革 半 半 革 圭 壮 斗 壮 ※※ ゃ \12.345 











プロ グラ ム の 起動 


リス ト 1 の プロ グラ ム を アセ ンプ ブラ また は モニ タ を 使っ 
se 放し て くだ さい この デブ ログ 逐 婦 は イ スク ・ シ ステ 
ム で 使う こと を 想定 し て いる の で , ROM ベ ー ス で 使う 場 
合 は 次 の 変更 を し て くだ さい . 





5A19: 02 一 01 
5 A41 : EE…E8 


5A1A:03 一 F9 
5A63 : 67 一 56 











な お , この プロ グラ ム は リロ ケー タブ ル な の で 適当 な 番 
地 に お いて , その 先頭 番地 を EXEC で 実行 し て くだ さい . 


リス ト 2 に 簡単 な テス ト ・ プ ログ ラム を 示し ます . 
写真 1 が その 実行 結果 で , RSCALE で 定義 し た と き の 細 
囲 を 表わし て いま す . また , 写 真 2 は 応用 例 で RSCALE に よ 
っ て 画面 の 1/4 を 設定 し, グラ フ , 文字 , 絵 な ど を 描い て み 
まし た . グラ フ な ど は お も に ,DRWA を , 文字 , 絵 な ど は 
RPOS 関 数 で 位置 を 求め て 描き まし た . 
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OO0O に を を も る る るる る る る も る る る する る る る すす る るる る も る する る する も る る る する 《1 

OOO1 * F-BASTIC Expander SFLUT _ Ver ※ 

O0002 3 の 日 2。 ユラ は * ネ 

0 ポポ ポポ ポポ ポポ ポポ 水 水 水 素 水 水 氷 水 ポ 水 水 水 氷水 氷 氷 水素 氷 氷水 水玉 

OO0QO 3 

OOQO5 5aQQO RG ま 王 OO 

0O06 ※ 

OOQ0 フ 7 5QOO 3Q BC FE EEGTIN LEAX で BEGIN, PCR 

OOQOB 5QO3 9C 45 CMFX 評 各 4 ChaFaC も er モモ Op 
OO09 5a05 2S4 11 ECC SETCOD kywOrd = も 
90010 5RQ07 DC 4 LDD 全品 

001 1 50O9 9 うさ F ド SUED で まさ F 5 モト Fin ロロ モモ om 
OO1S 55OB ミオ 4 06 FSHS  E。a 1 

OO01 ミ 5a0D 9F 45 STX に to] と ha に a こ モ 上 er 上 Op 
OO14 5QOF 1F 10 TFKR X.D 

0015 5 人 R11 合計 E1 SUED 。。』 ら 5++ : 

0016 1 DD 3F STD て 名 さ ビ trin ロ _ bottom 
09017 5 人 15 BED 9414 JSR も 414 81 1 Ya1uG C1 Ga 








1O 

















リス ト 1 F-BASIC PLOT アセ ンプ ブル ・ リ スト 
9018 Ba18 CE OSQOS SETCHD  LDU 井 ま ロ 弓 Et ド @ Word 
0019 5 人 1E 6 Q6 LD 人 n 菩 ら 6 イカ ー メ イレ ゴー 衣 ウ 
OOEO 5a1D 7 CO STA ェ U+ 日 
5a1F 3O BC 5D LEAX CHDE 。FCR et CODE 
コ SS RF 1 STX ぇ キキ 日 
5 人 4 さ O BC 19 LERX 衣 人 NLYG。 FCR et aaNaLY5 
台 F 1 GTX 。 キキ 
6 Q ミ LDa 4 萌 ゴ カカ に 法 ウ 
全 7 ECO GT ム a ュ U+ 日 
30 BC 6C LEARX FCEHDE 。 FCR 5e モ 上 FCHDE 
RF 1 STX EE 日 
0O 日 ぢ か LERX FARNLYS, FCR 5e モ 上 FaQNLYS 
人 F 4 GTX U 
さ Q BC 71 LERX MSBB-1 。FCR et MSG 
ED 9FDF JSR 名 ワ FDF 11n ら 与 Qut 
7E 948D JINMF も 948D EASTC hot 
BBQ EE 人 NaLYG BUER 持 和 ま EE EXーcode min 
10S ア ーQ008O LEBEG VSCALE 
介 谷 DECA 
10S7 OOaD LEEG RSCaLE 
合 合 DECA 
10S フ 7 QO103 LEEG MV 人 
介 合 DECA 
102S フ ーー010S LEBEG DRMa 
和合 DEC 人 、 
10S7 0Q117 LEEG MVR 
人 4 全 DECa 
10S7_ 0116 LEEG DRMR 
7E 9740 1 JMF' 第 9740 紀 Y ロ ta 呈 ビ ビ ロ ビ 
CO 6 アプ FANLYG SUHBE 音律 6 ア COd@ min 
C 人 2 F タ BC SERR ミ yaX ビビ ロ ビ 
9051 4 SRH 
005 台 C1 OO ミ CHFEH に 1 COd@ マウ ー1 
005 紀 計 ご 4 F 人 4 ECC SERR さ ロモ 上 a 己 ビ ビ ロ ビ 
0054 さ 4 0 人 4 FSHS  E 
005 BD 972F JSR 中 り 7SF * ("上 5 も 
0056 き Q4 FULS BB 
9007 5D TSTE 
0058 さ 102 フ O1D ミ LBEGQ RFPOSX 
0059 紀 Q77 5a DECE 
0060 5 人 7B 102 フ Q1D1 LBEQ RFOSY 
2 587C 16 Q21O LHRQ _ FSTR FSTR$ 
006 史 ※ 
006 さ 3 5 全 フ F 呈 6 CODE FCE /VSCaL ナ / VSCaLE 
0064 5aB5 らら FCG /RSCaL ナ / RSCALE 
0065 5aBE 4D FC /MHV チ / MV 人 
0066 5aBF 44 FCC /DRMM チ / DRMRa 
0067 5 4D FCC /MUV メ / MOVR 
0068 5a97 44 FCC /DRM メ / DRMR 
0069 5a9E OO FCE 06) 
0070 ※ 
9071 5A9C 2 FCODE FCC /RFHS リ / RFOSX ( ) 
007 人 GS 1 5 る EECE /RPOUS ル / RFPOSY ( ) 
0073 5aQ6 46 FCC /FSTR、/ FSTR$() 
0074 5aaE OO FCE ま も O 
0075 ※ 
0076 5QaC 46 MSG F6G /F-BaS1C ビ / 
0077 5QE さ SO FCC / Ex ロ anded/ 
007B 5QEC 2O FCC / PEBT  !!/ 
0079 5aAC5 OO FCE 9) 
QO8O ※ 
90 昌 1 5aC6 9D D2 VSCALE  JSR さ 吊 D ロモ ne モ も 
QOBS 5aEB C6 04 LDE 菩 
O083 5ACA さ 4 Q4 FSHS 呈 モ C ロ unt ら 
0084 5QCC さ O BD 029E LEAX 。 VXMIN。FCR = 上 VXMIN 
00855 5QDO D 6Z INPUTV BSR FRMTCMN formura 』ChC ド 
QO8B6 5QDS_ BD 7C BSR FACUL 1 呈 &V 与 1 ロロ Ut 明 a モ &a 
0087 5QD4 3 さ O 0O4 LEAX 44X POinter も 上 O ne も 
QOBB 5aD6 6 E4 DEC る COunt doOwrn 
OOB9 5QDB 26 F6 BNE INFUTV 
OQ90 5aDQ BD 6F BSR CHEEND nd Chec ド 
9091 5aDC C6 QOS LDE の 
009 人 8 5QDE EZ E4 STBE に ) 品 己 モ COunt@F 
0093 BaEO 3 さ O 14 LEAX  -12。X 品 モ VYMIN 
0094 SQE2S さ 1 QO8 VRANGBE LEAY 8,X 呈 t VMRQX 
0095 AE4 17 QOFE LESR  LDFAC 1oad V※MaX 
0096 5QE7 17 QO1OF LBSR CSUE VXMaX 一 V※MIN 
0097 5aEA _BD 64 BSR FaEUL 1 そ O vV※L 
0098 5aEC 6D 4 WE メ ” QO 
0099 QAEE 7 4 さ BE ERR1 
O100 5aFO 3 さ QO 14 LEAX 一 12。4X = も モ VXHIN 
0101 5aFS 6 E4 DEC s と Ount ddOwn 
010S 5QF4 S6 EC BNE VRANGBE 
90103 5RF6 SO 3 王 ERA SCALE1 
0O104 * 
9105 BaFB 9D D2Z RSCQALE  JSR 全 生 DD で et nex モ 
0106 5QFR ささ BD 0Q2B9 LERU  RXMIN,FCR 呈 G モ RXMIN 
0107 5aFE 6 O4 LDE 井 
0O108 5BOO ミ 4 Q4 FSHS BE 紀 己 キモ COunt@ 
0109 BOSS さき 4 40 INFUTR FPSHS U 
0110 SR まま 9EBF formuFa モロ INT 
0111 LDE に 学 
01 1 DECE ChGC ド K COunteF 
11 さ EEG FaS1 
911 人 4 JSR 生 ワ 7 さる て Omma 上 呈 ら も 
09115 FAS1 FULS HU 
0116 LDX そ 生 7 ら 6 1oad FaC1 
0117 5B13 人 F ビ 1 GTX ュ U+ 呈 &V 呈 1nDUt at モ a 
0118 5B15 6a E4 DEC ) COurnit doOwn 
ひ 119 Bf プ SG@ 所 9 ENE INFIUTR 
O12SO 5B19 BD さ O ESR CHEEND end Chec ド 
01 全 1 5B1E 6 OS LDE 菩 
Q01S2 5B1D EZ E4 STE \ 避 呈 己 キモ CGun モ 上 
01 で さき 5BH1F EC 選 ミ RRANGE  LDD * 完 記 肝 1oad R※MAX 
01 全 4 SEES1 人 a さ 5C SUBD  -4。U け KR*※MQX 一 RXMIN 
O129 呈 B2 さ 29 11 EVS ERR1 GOVeF 陸 11 ロ W 
O126 5ESG ED 58 STD ー8。U to_R*L 
0187 ES7 2 フ 7 QAa EEG TERR1 E ら ) 
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リス ト 1 F-BASIC PLOT アセ ンプ ブル ・ リ スト 
DEC 。 ら counter down - 
コ BNE RRANGEE 
Q8D EEE よ LERQ SCALE CaLGL SCa1 
9740 SERR は TMP 生 ワ フ 740 呈 Yhta: ビビ ロビ 
9BO さ 1ERR1 JMF ま 9EBO ミ 1 1 1 iqa1 
B3BB MERRS JMF も 3B 日 Q ロ yeF 11 ロ w 
FRMTCM _ FBHS ※ 
975F JSR 抽 ワ 75F fOrrmUuIFa 上 曲 呈 も 
CO4 人 人 JGR 捉 EQ4 谷 to ging1e 
LDE 4。 1oad COun も te 
DECE 錠 " 3 
BEG > に が 4 
JSR まり フミ や COmma 上 呈 モ 
に に 選 ES( 和 あ RG 
CHEEND  JSR ミ 征 D 日 et now 
BNE SERR 1 yt も ax※X 己 ビ に ロビ 
の RT 
ER6a に BI に は JP 第 B6aC FC _un1 Gadd 
MOVAa ELR FEN Den ロ ff 
2 BR 人 TINF 谷 も ロ inDut XY 
DRMa 
Den on 
TNF 谷 et ne も 
人 4 呈 己 モ CoOun モ er 
01FE 弓 モ VPX 
O162 BB65 BD D2 INFA1 fOFmu1a 。 七 所 5 上 
0163 BB67 BD EZ AV 1nDUu モ ata 
O164 紀 B69 30O 04 POinter 上 Oo ne 
0165 BB6B 6 E4 に ロ un モ er doOwn 
0166 5B6D 26 F6 
0167 5B6F 2O 2O Ya1ua モ ロ f ロ FT 
0O16 昌 * 
0169 5BZ1 OF C4 NOVR PE ロ ff 
Q170 5B73 20 04 tO input RX。』RY 
9171 * 
0172 BZ75 6 01 DRMR 
0173 5B77 97 ビ 4 Den Q ロ n 
0174 BZ79 9D DE INFR Et ne 
0175 BZ7E に 6 0 
0Q0176 BZD 34 Q4 呈 呈 モ COun モ @F 
0177 BBZ7F さ O BD O1EO も VFPX 
Q17B 5BB ミ さ BD BE4 INFR1 ロレ muFa 』 モ らら モ 
O179 5 BD 64 1 ロ ad VF ネ 
018O 呈 BB7 BD 77 VFK + R※ 
01 日 1 BB9 BD C5 呈 &V 己 1nDUut ロ a キ a 
0182 BBBE 3 さ QO 0O4 DOinter も モ O nt 
01 ヨ 3 BBD 6 E4 に OuntF down 
Q184 BBF 26 F タ 2 
01 ヨ 5 BB91 32 61 EVF ロ FT 
Q1 ヨ 6 5B9 さ 9D DB et now 
O1 日 7 BB 27| 1E ロ Fa1 
O18 ヨ 8 5B97 BD 97 さ 2 CO は 世 上 
O19 BA 6 0 品 刀 モ numー- モ yp 
OQ190 5B9C BD EQOD ミ 1in ら 上 yh 
0191 5B9F. 25 09 eva1uat HPTS 
Q0192 5BR1 D7 CS Ge 1ine tyPG 
0193 BRA3 9D DS ロモ ne モ 
194 BB 27 CE to real 
0195 BA7 BD 97322 COmma 上 も 
O196 呈 BQR BD 9E49 FT2 formura to 日 
0197 弓 BaD BD 9C nd Chec ド 
Q19 5BaF C1 QB 
0199 曲 BB1 2 人 4 07 11 1 1 ロ a1 
・O2OO 紀 BB3 さ D7 FH 呈 弓 モ ヒロ 10OF 
0201 BE BD 5E T ロ REAL モロ と a1 ロ u1 ョ キモ 
0202 旨 BB7 16 0162 内 to FLO 
9 CAS 1 
OSO4 BEHQ 7E HO ミヌ IERR 1111 ロ a1 
QOSO 呈 ※ 
OO6 BBD 3 61 CALE He1 モエ ほ B COunt@F 
QOSO7 EEBF 4F 
DO20 BCO 上 F D = 0 
QOS2O9 5BE1 DD C9 C1ear nd X 
O210 紀 BC3 DD CBH clear end Y 
OS11 BC5 3O BD QO1EA st RXL 
の 1 多 旦 BE な 9 き 1 10 呈 己 モ VXL 
OS1 さ 5BCB BD Q4 VXL/RXL=*BRTX 
0214 BED 30 0 5 も RYL 
Q21 ョ BEE 31 12 et VYL 
DS16 SCaLES TITNT yalue et 
01 1oad R*L 
ご 1 日 
愛人 9 も モロ 55in ロ 1e 
1oad V※L 
V*L / R※L 
et BAT ネ 
PREU に 人 FaAC un1gad 
LDFAC 呈 己 モ inq1G 
1oad FRAC1 
LDFACS tind1@ 
Clearr 提 1aq 
ネ 1gad FaCS 
LDFaC1 呈 己 モ 上 yh 
と DE 1 ad FRE1 
CSUE 
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F-BASIC PLOT アセ ンプ ブル ・ リ スト 


ら BFH ED COR 
5EFE 35 90 


















* 
19 CaDD 
COE7 
5CO5 35 90 
5CO フ 7 さき 4 10 CD 


5CO9 BD 971 
SCOC 35 90 


*※ 
COE さき 4 10 CINT 
5C1O BD EFDD 


SC1 さ 3 35 90 


* 
CaLGLT 
O14E 
CALG1 
18 
FAS さ 
14 
* 
RFPDSX 
* 
RFOSY 


D O110 RFOS 








0 る OO 10 
0301 972C RFOS1 
0302 9 
030 70 
93Q04 AB 2C 
03055 フ ム 6 
0306 02 
Q さ OZ yp4 
O308 C4 
Q309 84 
0310 4 
0Q31 1 02 
0 さ 312 
0 さ 1 さ 1 
0314 FSTR 
0Q さ 15 
0316 
0 さ 317 
031 日 
0 さ 19 
FSTRL 
の 1 
ed 
ら 
4 
に 1 
4 
O 
1 
4 
※ 
SHARF 





CMFA 


CMFA 


CMFA 
EEG 
CHF 合 
BEG 
CMF 合 
EEG 
CMF 谷 


EMF 
BEG 
JIF 


TST 
BNE 


X 
ま BFDD 
X。FC 


#2 

E 
VXMIN。FCR 
ー 日 。X 
LDFAC 
CSUE 

324 。X 


X 
HB6F 


9EBO ミ 


市 日 
SHARF 1 


FACS - FaAC1 
FRC2 + FAC1 
FAC2 / FAC+ 
FAC1 to INT 


呈 呈 モ COu ロ nt 
set VXMIN 
上 VF※ 


VF* 一 V※MIN 
G ト BRT ポ 


FAC1 = FACSR 


1oad BAT ネ 

/ ERTI※ 

上 O inteqer 
1oad に COunt@r 


Ed 

1gad FaC1 
RMIN 

上 O HG ポ ※ 


set VYMIN 
COunteF down 


弓 モ VFX 
5et SFAC 


REGK poOint 
6 上 VP※ 

1oad _VF※ high 
to SFAC 

1oad _VFP ポ 1 ロ w 
to SFAC 


get ロロ い 


選 キ マウ カ 
子 OFmUF& 
CSNG 


to VF※ 


* ) ? 上 も 
COvV。 人 HG 


10ad QBG ポ 
to FAC 
et INT 


1oad SFAC 
モ o eu 
1oad SF 人 

to _VFK1Ow 


か の 


ショ ウリ ャ ワ 
formura STR 


c1ear USING 


chec ド CHR 
1 ロ ad ff1a ロ 
DE 

DL 

TL 

UI 

1 1 1 1 ロ a1 
USING 1ow 
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10O 


F-BASIC PLOT アセ ンプ ブル ・ リ スト 








0 の NIC やら 村 は 








3 は 


EREHGHEERCHCHO ECICH 





TO ON お の 


ロワ ロロ ロビ ロワ ロロ 


ロビ ヒビ ー ビビ ニー ビビ ロビ 


SDSE 


5D5E 


ら DSF 
5D6 ミ 
5D67 
5D6E 
ら SD6F ビ 
5D7 ミ 
ら D77 
5D7E 


5D7F 


0449 
0455Q 





5D8 ミ 
5D85 
5D フ 
DB 
5 ら DBE 
5D8D 
5DBF 
コ D91 


OOCE4 
5D9 ミ 


0OC: 日 


OS 


BE 
BO 


04 
CE4 
SO 
EO 
0 
コ ヨ 
90 
EE 


98 
12Z4 


4 
ES 


1 
DF 


E 晶 


02 


D7 


97 ミ 3 
ワ 75 ビ 
972 ピ 
B97 





Q27F 
QOC ア 


※ 
SHGRF 1 
SHARF 
FSTR1 


NEXT 
* 
COMIMA 


※ 
ST 
YEN 

※ 
FLUS 
※ 
MINUS 
*※ 

EXP 
TEN 


ME 
NEXT1 


COUNT 


ポ 
CNTEND 


FLQT 


PLOT1 


FLOT3 


4 
CHEMAX 


SETFOT 


RET1 
※ 


SFAC 
UPX 
は 
VXHMI 
VYHr 
VXL 
VYL 
ERATX 
ERIY 
RXL 
RYL 
RXMIN 
RYMIN 
RXRaX 
RYMAX 
人 BSX 
SV 


FEN 
END 


ネン 


TNC 
ERA 


TNC 
RE 
STE 
FULS 
DECE 
ENE 
ERA 


RB 
BR 


RE 
ERA 


RE 
ER 人 


RE 
ERA 


RE 
ERA 


RE 
BRR 


TH 
ENE 
TNC 
ER 


JSR 
JSR 
JSR 
JSR 
STX 
CLRB 
TST 
EEG 
INCE 
ER 


STE 
JMPF' 


LDD 
STD 
LDD 
STD 
LERU 
EN96 
LDE 
FSHS 
LDD 
LDX 
EFL 
EXG 
LDX 
CMF'X 
HGE 
LDX 
ERRa 


CMFX 
ELE 
LDX 
STX 
LEAU 
LEAY 
DEC 
BNE 
LEAS 
TST 
EEG 
CLR 
JIMF' 


RTS 


RME 
RME 
RE 
RIME 
RMB 
RINE 
RMB 
RIE 
FINE 
FDE 
FDE 
RE 
RIME 
RIIE 
RIB 
RME 
RMB 


EGU 
EQGU 





生日 
5HARFS 


日 日 
韻 ま 0 
に 121 
E 


FSTRL 
NEXT1 


革 ま CO 
FSTR1 


井 全 OQ 
FSTR1 


韻 和 0 
FSTR1 


半日 
FSTR1 


半日 人 
FSTR1 


菩 ま 日 1 
FSTR1 


全 征 日 日 
TEN1 
ミ 和 日 
FSTR1 


生 ワ フタ 
まま 975F 
生 ワ 72 ビ 
生 EB ワ 7 人 n 
ぐ 征 フ F 


ぇ お 
CNTEND 
COUNT 





ミ 人 BSX 、PCR 
韻 季 0OC9 

韻 

E 

菩 ま FCFB 
ー12。 け 
PLGT ら 


地下 や ドド ト トト お お 


| 
ロ 


第 0OC ア 
2 


OOISIATGIZ 


類 世 
ロロ 
F-] 


USTNG high 


USING 1ow 
f 箇 も 5 
品 呈 モ 1aq 


* ュ " 呈 刀 モ 
"※ ポ "55 
* 溝 " 5 
1 ニュ コ 
テー" 呈 @ モ 
EXF = 


USTNG 1ow 


"上 曲 モ 
キロ FmUITA 
* ) ” 上 呈 5 も 
モ to SCII 
STR 


STR 
STR se@ も 


nd 上 = 上 ar モ 


end モ O 5 上 ar モ 


呈 刀 上 t RBSX 
5 上 noint end 


呈 己 モ COunteF 
呈 己 モ ロモ 
1oad R#L 


RMINS RMRX 
1oad 人 ES ポ 
人 RSK 』 RKMIN 


et R*MIN 





人 REG 』 KR*NMRN 


品 刀 も RMRX 
呈 DOint 
号 @ モ 人 QBSY 
5e も t end Y 


de1 上 wOFE 


check FEN 
MV 
LINE 
FAC 55av@ 


ツマ 1F モ い a&1 DOin モ 
ViFt い ua1 DOint 
ViFrtua1l mi X 
virtua1 min Y 
Yi 上 ua1 ran ※ 
Y ュ 1 レビ モ い a1 月 Nd 
F 己 き 1 / ツ ミエ モ い a1 X 
F 刀 き 1/ ツ 1 ヒモ ua1 Y 
T 己 き ] Fanq@ X 
81 ran ロ 己 Y 
Ta1 min X 
Fe@a1 min Y 

所 き 1 ma X 
F@a1 maX Y 
81 DOint X 
Fa1 point Y 


て ※ 








79 


1O 





人 人 2 


テス ト ・ プ ログ ラム 











10 MIDTH 40.SO 


2O_ FRINT "RSCRLE Xmin。Ymin』 Xmas 』Ymas " 


30 VSEALE 0。O。10。1O 
介 0 X= ニ 0 Y=Q 

50 FOR 1=1 T ロ 4 

60 X=X+64』 Y= ニ Y+SO 


フ 70 XL= ニ さや 0ーX 』 XH= さ 19+X』 YL=100ーYi YH=99+Y 


BO RSCALE XL。YL。XH。YH 
90 X1=RPDSX(O) : Y1=RFDSY (QO) 


100 人 Q 呈 =FBTR 呈 (" 提 装 持 リ 。XL) す リリ + キ FSTR 和 も (。YL) すり リキ FGTR 生 (。XH) リリ +FSTR$(。 YH) 


110 SYMBOUL(X1+4。Y1+ 己 ) 。 内 。1 。1 


120 MOVA O。O:DRMA 10。0。FBET 。 1 
13 さ 0 DRMR 10。10:DRMA O』10: DRMa 


140 NEXTiLUCATEO』 17 








SO 


FM- 晶 
REM オプ ショ ン AUTO 


圏 井戸 隆明 

FM-8 は , K コ ン バ ペイ ラ や アセ ンプ ラ の ソー ス の 作成 に, 
BASIC の エディ タ で , REM 廊 の 形 で 作成 し ます . その と き 
に 使う AUTO コマ ンド は FM-8 の 特長 で ある 複数 行 の スク リ 
ー ン シン ・ エ エディット が で きま せん し , 1 度 り スト を 出 き を な いと: 
直す こと も で きま せん . 今回 は この 点 を 改善 し , 冒頭 に 述べ 
だ た も の の 作成 が 容易 に な る よう に FM-11 の よう な REM オ プ 
ショ ン を つけ 加え だ た AUTO を 作っ て み ま し た . 

F-BASIC の AUTO コ マン ド は , コマ ンド 待ち ルー プ と 同じ 
と ころ を 回 っ て いて , AUTO FLAG( $ 9D) が 立っ て いる か 
いな いか で その 動作 の 切り 換え を 行なっ て いま す . そこ で , 
キー 入力 部 、 中 間 言 語 の 変換 部 , リス ト 挿 入部 を そっ くり そ 
の まま 取り 出し て 手 を 加え た も の が , 今回 の プロ グラ ム で す . 
逆 ア セ モン ブル し た も の を 参考 に し て 1 晩 で 作り あげ た の で 
か な り リム ダ が 多い と 思い ます . 

ROM 内 ルー チン を 多用 し て いる の で FM-8 し か 走り ませ 
ん (Ver.1.05 ). 

この プロ グラ ム は リロ ケー タプ ブル で す が , ワー ク ・ エ リア 
を 含め て 1K 強 ($ 5000 一 $5450) の エリ ア が 必要 で す . スタ ー 
ト 番 地 は $ 5000 で す . また , ALL RAM BASIC の よう な も 
の に 組み 込む の で し た ら , $5053ー$51D 5 だ け を 了 到 り 出し 
て $8FEE,$ 8FEF 番 地 に それ ぞ れ ロー ド し た 番地 を 入れ た 
後 、 BASIC を SAVE す れ ば いい と 思い ます 

EXEC&H5000 と する と “New AUTO ON ノ " と メッ セー 
ジ が 出 て , 使え る 状態 に な り ま す . 使用 形式 は AUTO( 6 〕〔, ヵ ] 
(LR] で を 、 み は 本 来 の も の と 同じ で す . R オ プシ ョ ン を 付け 加 
そる こと に よっ て , REM 廊 の ^ が 自動 的 に 出 ま す . また , 
動作 中 に すでに 存在 し て いる 行 が あっ た 場合 パ */ が 出 て , 
そこ を パス し た いと き は eturn] を 押せ ば 次 に 進み ます . 

複数 行 の スク リー ン ・ エ ディ ッ ト は で きま す が , 廊 番号 な 
し の 部 分 が ある と そこ だ け 和 無 梓 し ます . コマ ンド 待ち に 大 る 
に は [sToPl [CTRLl| + [c|、 [CTRL| + IX]I の いずれ か で り ま す 

な お , アセ ンプ ラ な どの オプ ジェ クト を お と す の に この プ 
ログ ラム が 邪 麻 に なり まし た ら 、 EXEC(&H5000〕 と 入力 し 

















て くだ さい . する と “New AUTO OFF′ と メッ セー ジ が か が 出 
て , そこ の 領域 が 開放 さき され ます (これ を し な いと 茜 走 する ). 

F M-8 は 安価 な コン パイ ラ が 数 種類 あり ます が , これ ら は 
BASIC の 下 で 動く も の ば か り で, 本格 的 な 0 S で 動く も の と 
比べ る と 扱い に くい と 思い ます . 特に エディ タ は 特筆 も の で 
お * 
常々 、 フ ルス クリ ー ン ・ エ ディ タ (BASIC 形 式 の も の ) を 
作ろ うと 思っ て いま し た が , 今回 は その 第 1 弾 の つも り で 作 
り ま し だ た 。 


これ を 使っ て 、 ど ん どん プロ グラ ム を 作り まし ょ う . 


mm M| オプ ション AUTO デ プロ グラ /、 EE 





+9 + 仙 TB +C 
BD Q1 
0 FF Q1 
DF 39 
20 41 55 
55 54 
gE 1 
BE OO Q 
27 CE 
9D .D2 
0 7 巨 
3 E2 B6 
日 6 27 
5OCO C2 O り 22 00 Aa9 
SODO 27 1 っ FR 5 


6F 2C 56 











回 
全 
ー 
NN 


リン ンプ リ / ン ン 


」 ー 用 用 ククリ ククリ 狂 | 用 ククリ ククリ ククリ ク ク ) 用 ク ンク クタ ク ク ) 少 タ ク ク グ 少 

の 22 の 2 ククル クウ 22 ルル 2 ル 2222 ルル 22222 ル 2 ブル ルル ルル ルク ルル クル 2 ルル ルル ルル ルル レレ 
レル の BN し いい いい 
イル PIMMI ィ プイ イル イイ イイ イイ イル ルル ルル ルル ルル ルレ ルル レレ レレ レン ァァァ レル 
及 始 駿 久 久 努 駿 双 久 久 久 久 久 久 久 久 久 久 久 久 久 久 久 久 久 攻 双 久 蜂 螺 駿 駿 久 双 双 久 時 駿 駿 太 





この プロ グラ ム は F-BASIC の PUT 文 で は 不可 能 だ っ た いた よう に な り ま す 。 デ モ ・ プ ログ ラム の バス 程度 の 大 き 
画面 家 示 を 可能 に する も の て で , 背景 や 表示 色 を 乱 き ず に ドッ さき が 適当 で し ょ う . 
ト ・ パ ター ン を 表示 し , 移動 さき せる こと が で きま す . 表示 し た パタ ー ン を 消す に は EXEC 層 還 4C08 で , 元 の 
な お , プロ グラ ム は すべ て マシ ン 語 で 。 ポジ ショ ン ・ イ 背景 が 表示 され ます . な お , デー タ の アド レス を 変更 し た 


場合 は 4C25, 26 番 地 の 値 も 変更 し て くだ さい . 
パパ ターン の 表示 位置 は 4FFC 番 地 に X, 4FFD 番 地 に Y の 


値 を POKE し て くだ さい . た だ し , 方 向 に は 1 ドッ ト 単 

中 ゴ し 1 方 位 で は な く , 8 ドッ ト 単 位 に し か 移動 し ませ ん . その た め 
X メ は 0 一 79 の 値 し か と れ ま せん (Y は 0 一 199). 

な お , デモ ・ プ ログ ラム を RUN し て 途中 で スト ッ プ し 

RUN1000 と する と テン ・ キ ー で バス を 上 下 左右 に 動か せ 

ます . た だ し , 画面 の 範囲 外 に は 移動 きせ な いで くだ さい . 


ン デ ペン を AR に が なら で いま す . 








ま 95。、 URIPE2 3 の 人 人 力 し て R UNIC で の SC で 7 に 
きい. この プロ グラ ム が どう いう 機能 を 持つ か 理解 で きる 
と 思い ます . 背景 を 壊さ ず に , 背景 の 『 こ ちら 側 』 と 「『 向 

















こう 側 』 に パタ ー ン (ここ で は バス ) を 表示 し て いる の が 
わか る と 思い ます . この プロ グラ ム を 使っ て 3 次 元 的 な ゲ に 
ー ム な ど に 応用 すれ ば , 面倒 な 陰線 処理 を 意識 する 必要 は am 
が く な る ぐう 
実際 の 使い 方 は リス ト 3 の デモ ・ プ ログ ラム を 見 れ ば わ アセ モン ブラ に よる 初め て の 本 格 的 な プロ グラ ム な の で , 
か る と 思い ます が , EXEC 多 H4C00 で 背景 の 『 こ ちら 側 』 無駄 な 点 や 非 能 率 な と ころ も あり ます が , FM-8 を 手 に し 
に 表示 され , EXREC&H4C04 で 背景 の 『 向 こう 側 』 に 表示 て 10 箇 月 目 に し て ここ まで で きた の だ か ら , まあ 滴 足 し て い 
され ます , その 際 , 背景 の アー タ は VRAM の フリ ー エ リ ます . 
ア に スト ア さ れる よう に な っ て いる の で , $180 ヾ イト ま で きれ ば 上 間 コ ー ド を 定義 し て BASIC の 命令 を 拡張 し た 
で の デー タ を 表示 する こと が で きま す . し か し , あま り 大 か っ た の で す が , まだ どう すれ ば 良い か わか ら ず , 今回 の 
きい と 表示 に 時間 が か か っ て し まう の で , パタ バタ は た め よう に POKE と EXEC で 行なわ ざる を えま せん で し た . 
1 拡張 ピ UT アセ ンプ ブル ・ リス ト EE 
4EOO DRG 4COO OO25 4C3 さ 9 2004 BRQ NM14 
4COO_C601 LDBE  #1 OO026 4CSB 308DO11D M9s LEAX TABLE1 ,FC 
4CO2 2OQO55 ERQ NM1 OO02 フ 7 4CSF C67B M14s LDB 尊 争 7B 
4CO4 C6FF LDH 音 第 FF OO2B 4C41 68O M3s LDR  。X+ 
4CO6 SOO1 ER MM1 QQO29 4C4 さ 7aO STA  。』Y+ 
4CO 5F CLRB OO3O _ 4C45 Sa DECB 
4CO9 BEB6FDQ5 M1s LDQ まま FDO5 QOS1 4C46 26F BNE  M さ 
QQOG 4COC 2BFB EMI  M1 OO32 4C48 7FFDO5 CLR  *FDO5 
OOQO9 。 4COE 1a5O RCC 音 多 5O QOS ささ 。 4C4B ECBE LDD_ =2。U 
OO1O _ 4C10 68O LDR 音 外 0 O0 さ 4 。 4C4D 1FO2 TFR.。。 D。Y 
QQO11 4F12 BZ7FDQ5 STQ まま FDO5 QOS 4C4F さ 422 FSHS a』Y 
OO12S 4C15 BEB6FDQO5 M2s LDQ も FDOS QQO さ 6 4CS1 E65D LDB。 - さ 3U 
0O01 さ 。 4C18 2AaFE BEBFL ME Q0 さ 7 4C5 さ 65O LDR 昔 邊 5O 
QO14 4C1A BEOOOO LDX  #O OO38 4CS5 3D MUL 
QQO155 4C1D EFFCFE STX ま FCFE OO さ 39 4C56 EB5C ADDE -4』U 
OO16 。 4CSO_1O0BEFCBO LDY 拉 ま FCBO GO04O 4C5B 89O00 DC 葵 O 
QO17 4C24 CE5OOO LDU 間 箇 5OOQ QO41 4C5RQ 1FO1 TFR  D,X 
OO1B 4C2Z E75H B 且 。 ご 8 上 OO42 4C5SC F6FDO5S M4s LDB  $FDOS 
0019 4C2S9 SEBOA EMI  M1 ス OO04 さ 4C5F 2BFB BMI NM4 
OO2O _ 4C2SBH 26OE BNE MM oO044 4C61 C68 ヨ O LDB 音 中 0 
QOS1 4C2D さ OBDOQOC8 LEAX TaBLE 。FC QO4 弓 4C6 さ F7FDO5 STE  $FDO5 
OOSGS 4C31 C669 LDHE 箇 69 O046 4C66 F6FDO5 MSs LDB  *$FDO5 
OO2S ス 4C33 2O0C BR _ MM ほ QQO47 4C69 2AFB EL 。 95 
OO24 4C35G 3 さ OBDQO19E M1 さ s LEAX TABLE2 。FC QQO4 ロ 4C6B 10BFFCFE STY 利 FCFE 














注 ) 左上 の 写真 で は バス が 二 台 と も “こちら 側 ” に ある が 右上 の も の は 右 の 一 台 が 本 に か くれ て いる 。. 
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リス ト 1 


拡張 PUT アセ ン ブ ル ・ リ スト 





QQ49 
005O 
QQ51 


QOS2 
QQO5 さ 
OO0S4 
Q055 
OOQS6 
QQ57 
QOS 
QOS59 
OO6O 
O061 
0062 
QO6 さ 
0064 
Q065 
0066 
QQ67 
0068 
QO69 
0070 
QQ71 
0QO72 
QQ7 さ 
Q074 
QQ75 
QO76 
Q077 
Q0078 
QO79 
QO8QO 
QQB1 
0O82 
QQOB さ 
OO8B4 
OOQ85 
OO086 
Q087 
OO88 
QOB9 
QO090 
QQ91 
0092 
QQ09 さ 
0094 
Q095 
0096 
0097 
QO9 
Q099 


Q100 
Q101 


9102 
010 さ 
9104 
QO105 
0106 
9107 
O1GB 
0109 
O110 
Q111 
9112 
O1 1 
9114 


o115 
O116 
O117 
Oo118 
o119 
oO120 
Q121 
O122 
O12 さ 
O124 
ot25 
Q126 
O127 
O128 
O129 
Q13O 





4C6F 
4C72 
4C74 
4C76 
4C78 
4C7BE 
4C7D 
4C7ZE 
4CBO 
4CB2 
4CB4 
4C86 
4CB8 
4CBA 
4CBC 
4CBD 
4CBF 
4C91 
4C94 
4C96 
4C98 
4C9B 
4CE 
4CAO 
4CA さ 
4CA5 
4CQ フ 7 
4CAA 
4CAC 
4CAE 
4CBO 
4CB2 
4CB5 
4CB フ 7 
4CBA 
4CBD 
4CCO 
4CC2 
4CC4 
4CC6 
4CCB 
4CCA 
4CCC 
4CCE 
4CD1 
4CD さ 
4CD5 
4CD5 
4CD9 
4CDB 
4CDF 


4CE 1 
4CE さ 


4CE4 
4CE6 
4CE 
4CEH 
4CED 
4CF 1 
4CF 
4CF6 
4CF 
4CF 
4CF9 
4CF 
4CFC 


4DO4 
4DQ5 
4DO フ 7 
4DOB8 
4DOa 
4DQOD 
4D1O 
4D1 ミ 
4D16 
4D19 
4D1B 
4D1E 
4D21 
4D24 
4D26 
4D28 


BFFCFC 
6DSB 
2BSF 
272F 
7FFDO5 
1F2O 
3D 
3OCB 

さ 18B 
ae8o 
E6a4 

さ 406 
AAAO 
AaC4 

4 さ 
E6CO 

さ 404 
FeFDO5 
2BFB 
Ce8o 
F7FDQ5 
F6FDO5 
2AFB 
F6FCFF 
27OB 
2B27 
7FFDO5 
3476 

さ 576 
20E1 

さ 504 
FDFCFB 
さ 506 
FDFCFD 
7CFCFF 
7FFDOS 
6^E4 
26BE 
6A62 
2709 
A661 
a7E4 
2oR4 
7FFDo5 
1CAF 
35C2 


OBDOO12 
C6QE 
1OBEFCBO 
A6Bo 
a7AO 

5a 

26F9 
10AES5E 
2oBD 
A6B4 
AaB9400O 
AAB9BOOO 
43 

97FF 


さ 9 


OOQQO3F 
59414D4155 
4 さ 449 
93 
DBF 
90 
QAO8 
BE6D408 
E6D409 
CE さ EBO 
E6D40a 
B6D3FE 
= フ 7F 晶 
F7D4O0A 
F6D さ FF 
BED さ FC 
DDFD 
7FC 

さ 410 


M16s 


N6s 


M7s 


M8s 


NM18s 


M10s 


M12s 
M11s 


日 
NM1s 


M17* 


MDTs 


日 


日 
TAELE: 


S0s 


STX 
TST 
BI 
BEG 
CLR 
TFR 
MUL 
LEAX 
LEAY 
LDA 
LDB 
PBHS 
DRA 
DRA 
COMA 
LDB 
PSHS 
LDB 
BNI 
LDB 
STB 
LDE 
BPL 
LDB 
BEG 
BN 
CLR 
PSHS 
PULS 
BRA 
PULS 
STD 
FULS 
STD 
INC 
CLR 
DEC 
BNE 
DEC 
BEG 
LDA 
STA 
BRA 
CLR 
ANDC 
PULS 


LEAX 
LDE 
LDY 
LDA 


STA 
DECE 


BNE 
LDY 
BRA 
LDA 
RA 
URA 
CONMA 
STa 
RTS 


FCE 
FCC 


FCBE 
FDE 
FCE 
DEC 
LDAa 
LDRa 
LDU 
LD^a 
LDA 
EEG 
STB 
LDH 
LDX 
STD 
STa 
PSHS 


M6 

名 FDO5 
生 AF 
AU,PC 


MDT,FC 
#14 
第 FCBO 
5 X+ 
5Y+ 


4000』X 
BOOQO 。X 


く FF 


も OO 」 OO 。 まさ F 
/YaMAUCHT/ 


生 9 さ 
まま D さ 8F 
生 90 
08 
も D40 
征 D409 
韻 ま さ EBO 
ま D40 谷 
本 D さ FE 
2 

争 D408 
D さ FF 
征 D さ FC 
くま FD 
く 征 F じ 
X 








0131 
O132 
91 る 3 る 
Q134 
01 る 5 


- Q1 さ 6 


013Z 
O13 
Q1 さ 9 
0140 
O141 
Q142 
O143 
0144 
0145 
O146 
0147 
0148 
O149 
015O 
0151 
Q152 
015 さ 


O154 
Q155 
O156 
Q157 
0158 
0159 
0160 
QO161 
0162 
Q16 さ 
Q0164 
Q165 
0166 
Q16Z 
Q0168 
Q169 
O17O 
O171 
0172 
017 ミ る 
9174 
0175 
O176 
0177 
O178 
0179 
O18O 
0181 
O0182 
O18 さ 
9184 
Q185 
0186 
01 ビ ロフ Z 
0188 
0189 
019O 
O191 
0192 
019 ミ 
O0194 
01955 
0196 
O197 
0198 
O199 
O2O0O 
OS2O1 
O202 
OS2O さ 
O0204 
OSO5 
OSO6 
OSQOZ 


OS2O 
QOS2O 
Q210 
QOSi1 


4D2A 
4D2E 
4D さ 2 
4D さ 6 
4D3 さ 人 
4D3C 
4D3E 
4D4O 
4D42 
4D44 
4D47 
4D49 
4D4B 
4D4D 
4D4F 
4D51 
4D5 さ 
4D56 
4D59 
4DS5E 
4DSC 
4D5C 
4DSF 


4D67 
4D68 
4D6a 
4D6B 
4D6D 
4D71 
4D74 
4D76 
4D78 
4D7a 
4D7C 
4D7E 
4D8o 
4D82 
4D84 
4D86 
4D88 
4DBa 
4DBC 
4DBE 
4D9oO 
4D92 
4D94 
4D96 
4D98 
4D9a 
4D9C 
4DE 
4DAO 
4DA2 
4DAa4 
4DA6 
4Daa 
4DAE 
4DB1 
4DB ミ 
4DB5 
4DBEZ 
4DBB 
4DBF 
4DC1 
4DC さ 
4DC5 
4DC8 
4DCA 
4DCC 
4DCE 
4DDO 
4DD2 
4DD4 
4DD6 
4DDZ 
4DD7 
4DDA 


4DE2 
4DE さ 
4DE5 
4DE6 


6C98O00 
全 7898000 
6C94000 
谷 7894000 
6CO 

全 7BQ 
QaFC 
26E 
351O 

さ 0885O 
OaFE 
2706 
96FD 
97FC 
20D7 
C6FF 
F7D ミ FF 
F6D40A 
QFO8 

さ 9 


OOOO3F 
59414D4155 
4 さ 4 日 49 
9 さ 

D さ 8F 

90 

QAO 
10BED40O 
CE さ EBO 
QA62 

人 Q629 
62a 
ECSE 
27FA 
E72a 
AE3C 
DDFD 
97FC 

さ 410 
6F3| 

人 62 人 
6 さ F 
27FA 

人 72a 
EC3 さ D 

さき 406 
EC3BE 
97FF 
n684 
7C4 
94FF 
E784 
AaB4 

人 7 ヨ 4 

さ 3089400O0 
ささ 3C94000 
BCBFFF 
2QO4 

さき 5oO4 
20E さ 

さ 0894001 
さ 3C94001 
OFC 

ご 6 ビ 5 
351QO 

さ 30885O 
OnFE 
2706 
96FD 
97FC 
20B 和 4 
62 人 an 
OFC 

2 


OQ0OO3F 
59414D4155 
434849 

9 さ 

D38F 

90 

OCOB 


3』 LDA 
STA 
LDA 
STA 
LDR 
STa 
DEC 
ENE 
FULS 
LEAX 
DEC 
EE 
LDA 
STA 
BRA 
LDB 
STBE 
LDBE 
CLR 
RTS 
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TABLE1』FCBE 
FCC 


FCB 
FDE 
FCB 
DEC 
LDY 
LDU 
LDR 
LDA 
LDAa 
LDD 
BEQ 
STBE 
LDX 
STD 
STAa 
FSHS 
CLR 
LDA 
LDa 
EEG 
STA 
LDD 
FSHS 
LDD 
STA 
LDa 
STA 
RNDAa 
STE 
RA 
STA 
LEAX 
LEAU 
CMFX 
BPL 
FULS 
BR 
LEAX 
LERAU 
DEC 
BNE 
FULS 
LEAX 
DEC 
BEGQ 
LDa 
STA 
BRA 
LDa 
CLR 
RT8 
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S10s 
S11s 
87s 


58 


9s 


TAELE2』FCBE 
FCC 


FCE 
FDE 
FC 
TNC 


BO0O0』U 
症 BOO0 』X 
和伸 4000』U 
4000』X 
ぅ U+ 

ュ X エ 

る 第 F ビ 

さ 

X 

くま BOX 
く 症 FE 

S4 

< く 第 FD 

く F ビ 

SQ 

甘 叶 FF 
まま D さ FF 
$D40a 

く $08 


まま OO 。 事 OO 。 まさ F 
/YaMAUCHT/ 


な た 】 

まま D さ BF 
9 ひ 
さ 釧 0 日 

間 和 D400 
# あ 3EBO 
8,Y 
9,Y 

出 O。 Y 


生 4000 。 X 
生 4000』U 
井 和 BFFF 
S2O 

BE 

S8 

第 4001 』X 
4001 。U 
く 征 F ビ 
S11 

X 

ミ さ 串 司 O 』 X 
ミ 和 FE ピ 

S9 

ミ 呈 FD 

ミ 征 F ビ 
81Q 
19』Y 

ミ 和 OB 


も 00 。 も OO 。 負 さ 
/YaMaUCHT / 


第 
まま D3BF 
まま 90 
ミ 08 
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リス ト 1 拡張 PUT アセ ンプ ブル ・ リ スト 
O21 全 4DEB 10BED40O LDY 拉 昌 D400 
OS213 4DEC CE さ SEBQ LDU 拉 ま さ EBO 
QOSE14 4DEF 62 LDaA 8,Y 
021 4DF1 629 LDA 9,Y 
OS216 4DF ス 62 人 Aa 812s LDA 。 10。Y 
Q0217 4DFS _ ECSE LDD  -24Y 
QOS1 昌 4DF7 S7FA BEQ 812 
OS19 4DF9 E72Aa STB 10。Y 
O2SO 4DFE AE さ ビ LDX 4』Y 
OSE1 4DFD DDFD STD 還 FD 
O22 4DFF 97FC STA < く FC 
0O22 そ 4EO1 さ 410 13s FPSHS X 
QOS2E4 4EOS 6FSF 5814: CLR  -14Y 
O2SG 4EQ5G BDDSBO JSR ま DSBO 
022 4EQB 6S2 人 15s LDA 10。Y 
0227 4EQOR 63F LDA  -1。Y 
QOS22B 4EOC 27FA BED 815 
OS 。 4EOE 72 人 a STa 19,Y 
Q2 さ 0 4E10 EC3D BDD 湖 こ YY 
OS さ 1 4E12 3 さ 406 FPSHS Aa,E 
02 さ 2 4E14 E63C ピ LDE  -4。Y 
023 る 3 。 4E16 D4FF 16= RaNDB まま FF 
QO2 さ 4 4E18 a684 LDR  。X 
02 さ 5 4E1a 7C4 STA  。U 
QOS さ 6 4E1C EAB4 DRE  ,X 
0237 4E1E E74 STB  。X 
QO23B 4E20 さ OB940QQO LEAX も 4000』X 
0239 4E24 3 ささ C94000 LEAU ま 4000』U 
QOS240 4E28 BCEFFF CMF'X 六 第 日 FFF 
0241 4E2B 204 EFL  S17 
Q242 4E2D さ 5O4 FULS E 
O24 さ 4E2F 2O0E5 BRQA 816 
Q244 4E さ 1 さ OB94Q001 17s LEAX ま 4001 。X 
Q245 4E35 さ 3C94001 LEAU *4001 。U 
OS46 4E さ 9 OFC DEC <$FC 
OS247 4E3B 人 26C6 BNE  S14 
Q24 4E3D 351QO FULS X 
0249 4E3F 3O08 ヨ 5O LEAX 名 5O0。X 
0250 4E42 QAFE DEC くま FE 
OSG1 4E44 2706 BEG 8S1 昌 
0252 4E46 96FD LDQ くま $FD 
025 さ 4E48 97FC STA < 征 FC 
QOS254 4E4Q 2OB5 BRA 81 さ 
0255 。 4E4C QA62a S1 昌 』 LDA 10,Y 
O256 4E4E QFO CLR くも 08 
0257 4E5O さ 9 RTS 








[5 ュ eryssshseWPE73PEimys ま Eyegss 枯 |) スト 3 





OO 


さけ 
さ 5 
40 
59 


6 


8BQ 
9 


1O0009 
1010 
102O 
103O 
1040 
105Q 
1060 
107O 
108O 
109O 
110O 
1116 
112O 
11 さ O 





FOR 
TF X ニ 6 ム 6 誤 
IF X=10 
TF X く 15 
70 IF X6QO 
DY=QO 
X=X+DXsY=Y+DY 

100O_ EXEC AD+g BHTUO 
110 DaTQ 16,144421。14 コ 。 さ 0』146。60 。 14 さ 5 さ 。148 50 。 145 

IN コ コ MK. エメ エエ エエ エエ エエ テテ エエ テテ エエ テテ エエ エエ テ エエ テテ エエ エエ テ エエ テテ メ エネ エエ エエ テテ エメ テテ エエ テテ エエ テテ エ エエ テテ エコ 


[=0 





』O 


デモ 用 デー タ ダン プ ・ リ スト 還 還 還 還 昌 












add 





505Q 
Soeo 
5o7O 
5o ヨ o 
509O 
5oAQo 
5oEO 
5oCO 
5oDo 
SOEO 
5QFO 


Sums 


O EQO QC FF 
O 1F FE FF 





5O4Q_QO 


+C +D +E +F Sum 
OO_ OO _ QOO_ OO 
さ 2 91 Q 

















DO OO OO OO 






0 年 す キク 
oo oo 
OO OO 














OO_ OO OO 
QO_OQ_Q 
QOO_QO QO 
7F 8O 
OO_ OO 











QO OO 


OO OO OO 日 
Q さ FF FF FF FE FF si4D 
E ビ に 7( ビ に E7 FF _FF 』CO 
后 に に E グ CO _QOO_ OO i 日 さ 
OO QOS 07 OO OO QO ksS56 
QO OO _QO OOG QO_ OO_ OO gOO 
QO OO _QO OO 7 98 Q7 i5Z 
87 7 BZ 98 OO QO_ gi95 
QO_ OO_ OO_QO 90 0O 0O gi OO 
QO_ OO OO_QO QO_QQ QO_gOQO 
OO_QQO_QQO_Q 00 OO 00 gk0O 
OO OO OO OO 0QO_ OO OO iQO 








Q1 BoO 6F 67 さ C aC 15 F ミ C9 77 OBE C4 QB C2 4F 1F 








デモ 用 BASIC プ ログ ラム ・ リス ト EE 








10 CELBECIRCLE( さ OO 。1BO) 。101 。1 。。99」.5。1,FECIRCLE ( さ 50 160) SO』G。。7 ュ 5。1。Fs CIRCLE (35 
03120)3Z7 05 28513F 
X=10: Y=15O: AD=8H4COO RD1=QD: DX=1 
25 FDREE AD+&HS2。&H4FEFUR 1 エ =O TO 5iREAD TX』TYiFOEE &H4FOO-4』TX:POEE &H4FOO- さ 。TYIE 
XEC ADNEXT』PUEE AD+&H25 」 多 H5O 

FUDEE &H5OOO-4』X』FURE %H5OOO- さ 』YiEXECD AD+2ー2xDX 

TO 100』NEXT 
THEN DX=-1』 BDT ロ 9O 
THEN DX=1:BDTD9O 

THEN DY=1: BDT09O 

THEN DY=ー-1: BODT ロ 9O 


X= さ Os Y=100: AD=H4EOOI AD1=ADi BHTO 1110 


第 =TNEEY ま ョ TTF は 


UN E GOTO 
IF 人 生 モ リ キリ 
BOTOU 10SEO 
X=Xー1 』 BHT ロ 
Y=Y+ コ 』 BHTD 
X=X+1』 GOUT ロ 
Y=Yー さ 

EXEC AD1+8 


110O 
11QOO 
110QO 


THEN EE=VRQL ( 外 ) 
1060』1070』1080。1050 。1090 
THEN AD=AD1 ELSE LTF 第 = リー リ " 


FOUREE &H5SOOO0-4。XgFOUEE HBOOOー さ 。YiEXEC PRD 


FOUR 1=Q 
BOTO 1QSGO 


TU _ 10OgNEXT 


THEN AD=AD1+4 
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FM- 8 は , FLEX, CP/M な どい ろ い ろ な DOS を 走ら せ 
る こと が で きる , すぐ れ た マイ コン だ と 思い ます . し か し 
DISK BASIC と 他 の DOS を 使う 場合 , モー ド の 切り 換え を 
後面 の ディ ッ プ ・ ス イッ チ に より 行なわ な けれ ば な り ま せ 
ん . この 煽 わ し さ を 解 消す る た め に , DOS モ ー ド で DISK 
BASIC を 走ら せる こと が で き な い か を 見 当 し て み ま し た . 

CP/M な どの DOS は , DOS そ の も の を ディ スケ ッ ト に 書 
き 込 ん で あり , BOOT プ ログ ラム で RAM に 読み 込ん で , シ 
ステ ム を 起動 し て いま す . そこ で DISK BASIC で も , 同じ 
よう に イン ター プリ タ を ディ スケ ッ ト に 書き 込ん で , BOOT 
プロ グラ ム を 作り , DOS モ ー ド で 起動 で きる よう に な り ま 
た 

これ に より , DOS の 違い に より ディ ッ プ ・ ス イッ チ を 変 
更 す る こと な く , 起動 で きる よう に な り ま し た . な お ALL 
RAM の た め イ ンタ ー プ リタ の バー ジョ ン ・ ア ッ プ する こと 
も 簡単 に で きる よう に な り ま し た ., 








まず , 普通 に DISK BASIC を 起動 し ます . シス テム ・ デ 
ィ ス ケッ ト に つい て いる “SYSDSK" を RUN し , プラ ンク 
*・ ディ スケ ッ ト あ フォー マッ ト し , シス テム を コピ ー し ま 
9 

この 後に リス ト 1 の BOO エプロ グラ ム を 入力 し ます . 
入力 が 終わ っ た ら DISK に セー ブ プ し て お きま す . この プ 
ログ ラム で は , マシ ン 語 を DATA 文 に し て ある の で , ミス 
の 2 ポ の 村人 人 妨 し で くだ さい 、 

RUN し て , も し DATA 娘 の と ころ で ミス が あれ ば , プログ 
ラム は ミス の あっ た 行 番号 を 表示 し て スト ッ プ する の で , 
も うい ち ど リ スト を 見 て , 確認 し て くだ さい . 

ス が な けれ ば , し ば らく し て “Program End'" と 表示 し 
て DOS モ ー ド の シス テム ・ デ ィ ス ケッ ト が で き あ が り ま す . 


で === で 、 

















7 











DOS モ ー ド ・ デ ィ ス ケッ ト を ドラ イブ 0 に 入れ , 後面 の 
ディ ッ プ ・ ス イッ チ を DOS モー ド に 設定 し て リセ ッ ト ・ ボ 
タン を 押し ます . する と し ば らく し て 。, 従来 通り の DISK 
BASIC が 走り だ し ます . 


84 








の と きす で に RAM 上 で BASIC が 動い て いる の で , モ 
な ど に より ,。 パッ チ を 行ない ます , 
炎 、SAVEM"FBAS. SYS"。&H8000, &HTFBFE, 


SN 


タ 
その 


6809 | CR | と する と , バー ジョ ン ・ ア ッ プ され た DISK BA 
SIC が , で き あ が り ま す . 

F-BASIC の 場合 ,8000 番 地 か ら 87FF 番 地 あ た り ま で 空い 
て いる の で , そこ に プロ グラ ム を 追加 で きま す 。 私 の 場合 
は モニ タダ も バー ジョ ン ・ ア デップ し て この エリ ア に 追加 し で 
いま す . 





オリ ジ ナ ル の シス テム ・ デ ィ ス ケッ ト の "VOLCOPY" プ 
ログ ラム を 使っ て 全 ト ラッ ク ・ コ ピー し て 後 で 不要 の ファ 
イル を 消す 方 法 が あり ます が , 面倒 で す . 

そこ で "SYSGEN" な る プ ブログ ラム に "SYSDSK" プ ログ 
ラム を 変更 し まし た . リス ト 2 に 示す と ころ を な お し て く 
だ さい この プロ グラ ム は オリ ジ ナ ル の シス テム ・ デ ィ ス 
ケッ ト の マシ ン 語 プロ グラ ム “DFMCD" を 使う の で , SYSGEN 
プロ グラ ム を RUN す る 前 に , LOADM"DEMCD" を 実行 し , 
あら か じ め RAM に 読み 込ん で お きま す . 

その 後 RUN す る と プラ ンク ・ デ ィ ス ケッ ト を フォ ー マ ッ 
ト し , DOS モ ー ド BASIC, SYSG で EN お よび DFEMCD を 作り 
まま 














リセ モット 後 DOS モ ー ド で 起動 し た あと は ,、 いま まで の デ 
ィ ス ケッ ト で も 自由 に 読み 書き で きま す . DOS モ ー ド BASIC 
の ディ スケ ッ ト , “FBAS. SYS" の ファ イル は , FAT の 最初 
の 連続 し た クラ スタ に な いと 起動 し な い の で ,。 バー ジョ ン 
・ ア ッ プ の と き は ファ イル が 最初 に ある こと を 確認 し て か 
ら 行 な っ て くだ さい . 普通 BOOT プ ログ ラム か SYSGEN プ 
ログ ラム で 作っ た も の は ファ イル の 最初 に 作ら れ て いま す . 
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K3 参考 文献 
1 ) I/O FM- 8 に 関す る 号 
2 ) FM-8 活用 研究 

この プロ グラ ム が F-BASIC の バー ジョ ン ・ ア ッ プ に 役 に 3 ) "富士 通 FM-8 マ ニュ アル " 
立て ば 幸い に 思い ます . 








図 1 操作 手順 
DISK BASIC で シス テム 起動 W | 


DISE VERGTON 73 
に 1 R 

※ is 1 
RSSSH 滞 Dp 9P2V 唱 (トー) * DOS Mode (人 11 RaM) Disk BASIC BOT Frogram ポポ ※ 


How many disk fi1es(Qー15) ? 
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Mhat Drive No ( Q / 1 ) 全 1 ドラ イブ 番号 を 指定 
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ディ イマ ヌケ リト ミド ュ ン ビ " ロ HK 便 N Drive 村 1 ( Y/ZN )? や Y 
poke hfdQO。&h4O FBAG .SYG る 日 16 (ファ イル 表示 ) 
RUN "SYSDSE" 1 さら 6 C1ugter= Fre 


Froqram End 
%※% FLUFFY DISEK FURFMATTING *※※*※ 
3. ここ で 、 ド ライ ブ プ 1 に DOS モ ー ド DISK BASIC が で き て いま す 。 





DISRE FORMTTING ? Y それ を ドラ イブ 0 に 移し 、 後 面 の ディ ッ プ ・ ス イッ チ を DOS モ ー ド 
MHAT DISE DRIVE 宮 1 に 設定 し て リセ ッ ト ・ ボ タン を 押し ます 。 

SET THE FORMATTING DISRK UN DRIVE 1 DISRK _ VERSION 

READY “YY How many di5E drive(1- 人 1) 人 ? 

DISE FORMRTTING CHMFLETED !! Haw many disE files(Q-155) ? 


ポポ DISE BASTC SYSBTEM CUFY *※※※ 
FUJITSU MICRU BB BASIC Version 1.0 











1 。 DRIVE ローー* 1 Cgpyriqht (C) 1981 Ey FUJTTSU/MICRDS ロ FT 

2 DRUVEEO の = = コテ (0 で 60 さ 3 Byt モ 5 Free 

まい っ 4. タイ トル が 表示 され 、DOS モ ー ド で シス テム が 
READY ? Y READY 起動 し まし た 。 

SYSTEM CODE COFY COMFLETED !! poke &hfdQQ。 Sh40 

2. この 時 点 で リス ト 1 の BOOT プ ログ ラム を 入力 し 、 デ ィ ス ケッ ト Ready 





に セー プ ブ し ます 。 HaRDC 


EE 是 スト] D| ら に 巳 A ハ SIC 巳 OOT プロ グラ ム ・ リ スト EE 














10 CLEARSGOO。 HEFFF 

2 の "Date 198Sー9ー24 

0 1 も = リ ※※ DOB Mode (11 RaM) Dissk BASIC EHHT Froqram ※※ り 

40 MS まま =" Copyriqht 19BS (C) By Hashiguchi Soft。" 

0 MIDTHBO。 人 で:FRTINTM1 ま :FRINT IFRINTIHS ま FRTNT 

69 FRTINTCHR ま (7)』 kTNFPUT "Mhat Drivye No ( 97 1 ) "4D 

70 IF DO OR D テ 1 THEN FRINTCHR も (7) 』 GOTO 59 

BO_ FRINTiFOR IT=O TO 16gFRINT リ + キ リュ 

9 GMORERD DT$:iFUR J=O_ TO 1 DT=VaL ("計り +(MTD ま (DT ま 。(J※G+1 ) 。 爺 ) ) ) 

100 PFOEE HOFO+TX16+J。DT』 SM=SM+TDTsNEXT J 

110_ READ _ CSIF_ CSS SM THEN 人 50 

120 NEXT TI 

139 FRINTIFHEE 計 H3GOFF .D 

1490 FRINT:FRINTCHR ま (7) リティ ラマ ケ リト た ュ ョ ン ヒ ” ロ E で ロ N Drive 拉 "4Da"( YZN ) "4 

15O INFUT 谷 員 

169 IF WEUYI THEN 149 

179 DSEINI D 

18O DeU0gTF D1 THEN D= リ "1:" 

19 り F ま =D ま + リ FBAG。 SYS" : GaVUEM F ま 。 HBOOO。 &HFEFF 。 6809 

200 EXEC HOFO 

219 FRTINTCHR ま (プア ) : ITF FEEE (HH3QF9) 

2SO FILES DD 

FRTINTVFrrogFram End" 

CLEARGOGO。 HBFFF END 

FRINTgFRINTgiFRINT "DAT ブ ュ 

り DaTaA BE3OFBEBDFSDB39O0090QS 

ロ DAT 32BCFDB6FD1FBE960485G 

) DaTa 18B08097FFBOSEO10000080000( 

DaTn OOQOROQO7QOQOQGOO01010Q08B67DC6QA3OBCE 1 。 10Q04 

1040 DaTA 40SERDFEOB3BOSSSSD4 人 で 74D さ 40S10E 1076 

1059 DTI OSCCO1OQON1RE1ORFOSSGOSE60SSCE 7 コロ 。 1 全日 

DTC111SED7C691E ビ 705E604EERO6E704E6Q6。 1849 

DaT 全 1810CE70EB10D。 1S 全 

DaT 人 a sOFE30BC9aBD 。 1472 

DRT FE OSGRSGR6SEOED3OBCBDEDFEQOS 昌 6。 1 7 人 S 

DaT 合 BCBE340SRDFEOB35OSSG1 人 24 合 。 1 で 人 40 

DaTan 1 Q 2EDOS6COG3GOSSG。 1021 

DaTa E 70B 昌 10DS764B10FS6。 100O 

DRT ER HDFF4EDFEOSSGOSGRS6C6B6S9H プ 。 1 日 9 計 

DaTa FD F1FBB6E9FFEBFE4F1FBEBE7QQOQGB6 。 1916 

) DRT FFGEPFFEFE436F プ ロフ ワウ 7S69676 日 742 品 6 
DDT 393BSSSOSB43 で 9SD4 人 SS フワ ウロ 42SE4DSE5 さ 。 ワウ 1 























) THEN FRINT"Disk Mrite Error"sBUTOU S4Q 





/ ニュ ウリ ョ 2 ERRHR in 韻 り s1000+ エ ※1Q4CHR 和 も (7) : BHTU S49 
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リス ト 2 SYSDSK 次 更 点 EE 
SSO DSEENT DRUVS 
らら 60 ITF DRVUEO_ THEN DR も = リ "OOgV ELSE DR ま =" 15" 
70 F1 も DR ます" リ FBHR 人 RG 。 BYG"』FS ま =DR 皇 TGBYSGBEN" ェ F コ ま =DR ま + す "DFMCD" 
SO GRVEM ド 1 征 。 放 HBOOO。 衝 HFEFF 。 HB9O 谷 
70 SRVE FSS ま 。 FIBAMEM F コ さま 。 色 HESOOO。 負 HB1SEF 』。 生 HSOGOO 
6Q00_ COULOUR 6』iFRTINT "BYGBTEM CHDE COFY CHMFLETED VICHR ま (7) 
610 FILES DR ま 』CHLOHR ZEND 
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Display Sub System の 使い 方 


ディ スプ レイ ・ サ プシ ステ ム は 128 バ イト の 共有 RAM を 使 
っ て や り 取 り を し ます . この と き 必 ず , サブ CPU が READY 


に な っ て いる と き に サブ CPU を HALT し な けれ ば な り ま せん . 


この と き 割 り 込 み は 禁 止 し ます . そし て コマ ンド ・ コ ー ド な 
ど を 共有 RAM に 書い て , サブ CPU の HALT を 解除 し ます 

この 繰り 返し で どん どん サブ CPU へ ヘコ マン ド な ど を 送り ま 
す . この と き 続 け て サブ CPU に コマ ンド な ど を 送る 場合 は , 
タイ マ を 入れ て くだ さい . そう し な いと 動作 が お か し く な り 
ます . 


コン ソー ル ・ 


まだ た , コマ ンド , パラ メー タ の 間違い で も 動作 が お か し く 
な り ま す . 特に グラ フィ ッ ク ・ コ マン ド の と き は デー タ 量 が 
多い の で 気 を 付け て くだ さい . 

それ で は コジ ン ツ ー ル コマ ジン ド と グラ ラ ィ ッ ク ゃ ラマ ン ボ ポ 
の 例 を 載せ て お きま す の で , 実験 し て みて くだ さい . 

コン ソー ル ・ コ マン ド は INIT コ マン ド で す . DATA は 80 メ 
25 文 字 ファ ンク ショ ン ・ キ ー 表 示 , 画面 消去 , 単色 表示 で 
す . また , グラ フィ ッ ク の ほう は 例 1 の DATA に 置き 換え る 
も の で す . この デー タ に する と “ASDCB? が 縦 , 横 5 倍 の 大 
き さ で 表示 され ます . つま り SYMBOL 文 と 同じ で す . 

みな さん も FM-8 活 用 研究 や FM-7 の シス テム 仕様 書 を 見 
な が らい ろ い ろ 試 し て みて くだ さい . 


コマ ンド 実行 人] = で ==p===m=s=nzmaszerzisssarm=nmm=aresー ニ ニコ 





09001 
0002 


$FDQ5 
$FCB2 


DRG 


LDA 
BI 
ORCC 
LDAa 
STA 
LEAX 
LEAY 
LDD 
CHFA 
REG 
STD 
BRA 
CLR 
RTS 
FCE 1 
FEB 


QoQ8 
0Q009 
0010 
OO1 1 
0Q012 
OO01 さ 
oO14 
QO15 
QO16 
QO1 フ 
0018 
0019 
002Q 
Q021 


EC8O 
B1FF 
2704 
EDAQ 
2oF6 
7FFDO5 


ま ら 6000 


HLT 
START 
od】 

間 き BB 
HLT 
DATA.FC 
EUF 。FC 
sX+ 
井 委 FF 
END 

る \ ギ 
LOOF' 
HLT 


s っ SubCFU Busy? 
ュ コ 


* ュ 
: ISubCFU Ha1t % IRC Mask 
ュ コ 


:Xreq=DQATA Addres 
: Yreq=*FCB2 コマ ント * 
Drea=DATA 

ミュ Tf DaTa=* ま FF THEN GUTOU END 
ai 


う カフ アト "ルス 


ェ BUF ニニ DATA テッ ツウ 

: BHTO LOQOF 
sSubCFU Halt カイ ミト ョ 
s モト ノ ルー チン ニニ カエル 

ュ コ マッ ト ^ コー ト ~ 

NT ウ の カラ ー 





FCE 8Q 
FCB 25 
FCE Q 


* ケ スウ 

: キョ ウス ウ 

ミス フロ ー ル カイ Ez キョ ウ 

FCB 2 ミ さ s ス フ ロ ー ル スル キョ ウ スウ 

FCB 1 ュ ファ ン フ ショ ン ・ キ ー ヒョウ シド 

FCE Q ミカ "メー ショ ウキ ョ (カサ ナイ 二 や セ ゅ テイ ) 
FCB 1 フ " リー- テ " ヒョウ = (ズル) 


QQ02 昌 日 
FCBE :END Code 


0029 ま FF 





PP 公 | 2 = グラ フイ ッ ツク ・ コ マン ド 実 行人 RE 








D 全 T 全 * FCE 
FCE 
FCE 
FCE 


O 
1 ロ nn 

ラ 
SDCB/ 


串 ト ド jEND Codg 














FM の ディ スク ・ モ ー ド で は ROM モ ー ド に 比べ て 大 幅 に 
フリ ー エ リア が 減少 し ます . その た め ROM モ ー ド で は 動 
いて いた プロ グラ ム が , ディ スク ・ モ ー ド で は out of 
Memory と な り , 実行 どこ ろか テー プ か ら ロ ー ド する こと 
さえ で き な く な る も の が あり ます . し た が っ て ディ スク へ 
の セー プ ブ も で きま せん . その た め , この よう な プロ グラ ム 
を 使う と き は , 毎回 ROM モ ー ド で テー プ か ら ロ ー ド する 


必要 が あり , ディ スク の 恩恵 に あず か る こと が で きま せん . 


そこ で , その わずらわし さか ら 解 放さ れる た め に この プロ 
グラ ム を 作り まし た . 


O o や mem 
プロ グラ ム の 内 容 

F-BASIC は , その IT/O が BIOS と いう 非常 に 使い や すい 
構造 に な っ て いる の で , 1/O 関係 の ルー チン を マク ロ 命 令 
的 に 使え を ます . また , 当然 の こと か も し れ ま せん が ディ ス 
ク ・ ア クセ ス の サブ ルー チン が , ROM モ ー ド で も 存在 し 
て いる の で マシ ン 語 レベ ル で は , ROM モ ー ド で あっ て も 
ディ スク を 自由 に 使え ます . 

さて その 方 法 で す が , ROM モ ー ド と ディ スク ・ モ ー ド 
の 違い が RAM 上 に ディ スク ・ コ ー ド お よび ディ スク 用 の 
バッ ファ が ある か な いか と いう 点 を 利用 し て いま す . 実際 
に 行なっ て いる こと は 湊 の と お り で す . まず , ROM モ ー 
ド で RAM($0000ー$7FFF) の 内 容 (も ちろ ん ディ ス 
ク ・ コ ー ド は な く プ ログ ラム が 詰まっ て いる ) を ディ スク 
に セー ブ し て お きま す . 次 に , 必要 に 応じ し て それ を RAM 





ト に ロー ド す れ ば , セー ブ プ し た と き と 同 じ 状 態 に な り ま す . 


も ちる ん ワウ ワーク エア も セー ジブ 、* ロー ド す る を わ 分 で すか 
ら , 完全 に 元 と 同じ 状態 で す ( 図 1). 

プロ グラ バ に つい で で すか が アデ ギ ダク に 対す る 内 出 力 は 
BIOS に まかせ っ きり な の で 簡単 で す が , その 前 に FAT, 
ディ レク トリ を 調べ て 入出 力 の 対象 と な る クラ スタ を 見 つ 
ける 必要 が あり ます . モー ブ の 場合 は まず FAT を 読ん で 
フリ ー ク ラス タ ($FF) を 調べ , 16 ク ラス タ 分 ($0000 一 
$7FFF を セー ブ す る の に 必要 な クラ スタ 数 ) を 確保 し ま 
す .FAT を 書き 直し た 後 ,。 ディ レク トリ を 読ん で き て , フ 
リー エリ ア ( 先 頭 が $00 か $FF) に ファ イル 名 を 記入 し ま 
す . こ の と き プ ログ ラム を 256 バ イト に 収め る た め に , 正式 
の 名 称 は NAME で 付け 換え る こと に し て , 仮 の 名 前 と し 
て ASCII コ ー ド の $FE, すなわち " 較 " を 付け て いま す . 
この 廊 字 を 使っ た 理由 は この キャ ラク タ が キー ボー ド か ら 





入力 で き な い か ら で す . と いう の は , この プロ グラ ム で 作 
られ た ファ イル は 機械 語 フ ァイル に 近い も の で す が ,。 ファ 
イル の 属性 を 単純 に BASIC ファ イル の 形 に し て いる た め , 
誤っ て LOAD な どの 命令 で 誤動作 し な いた め の 用 心 で す 

(も し キャ ラク タ を 変更 し た いな ら , リス ト 1 の 方 は 1080 
行 め の 6 番 め , リス ト 2 の 方 は 1020 行 め の 5 番 め の FE を 
他 の も の に 変え て くだ さい ). 最後 に 確保 し た フリ ー ク ラス 
タ に $0000 一 $7FFF の RAM の 内 容 を セー ブ し ます . 

ロー ド の 場合 も 基本 的 に は 同じ で す . まず ディ レク トリ 
を 読ん で き て ファ イル を 探し ます (この 場合 も ファ イル 名 
の 先頭 が “ 較 " の も の だ け 調 べ る よう に し て いま す ). 次 に 
FAT を 調べ て ファ イル の 使っ て いる クラ スタ を 見 つけ て 
ワー ク ・ エ リア に 記入 し て お きま す . そし て 最後 に 目的 の 
クラ スタ か ら $0000 一 $7DFF の 分 の 内 容 を R AM 上 に ロ 
ー ド し , その 後 BASIC の ホッ ト ・ ス ター ト へ ジャ ンプ し 
まず ボ 。 ここ で $7DFE ま で し が か が ロ デ ド じじ で いな が い の は ご 
れ 以 後に ある 本 体 を 壊さ な いた めで す . 

前 に も 述べ た よう に , この プロ グラ ム は セー ブ , ロー ド 
と も 本 体 キ ワー ク ・ エ リア を 256 バ イト 以内 , ディ スク , 
I/O バッ ファ と し て 256 バ イト , 計 512 バ イト を $7E00 一 
$ 7FFEF に 置い て いま す . し た が っ て $7DFEF を 越え な い 
プロ グラ ム に つい て は 完全 に 使 を ます . も ちろ ん , ボ ジ シ 
ョ ン ・ イ ン デ ペン デン ト な の で どこ に 置い て も 使え ます が 。 
あま り 意 味 は な いと 思い ます . 

ロー ド 用 の プロ グラ ム で す が $7E00- $7FF 了 を 使 テ ー 
の で 。 ディ スク “モー ド で 使う ど デ ィ ズ ク “コード を 天 e 
て し まい ます 。 う まや ロー ド で きた 場合 は ROWM モ ド 
に な る の で か まわ な い の で す が , エラ ー を 生じ し だ た とき, そ 
の まま に し て お く と その 後 , ディ スク 関係 の 命令 が うま く 
働か な く な る (実際 は エラ ー メ ッ セ ー ジ を 出す 段階 で 病 走 
する こと が 多い ) の で 次 の よう に し て いま す . 初め に 本 体 
を $7000 一 $70FEF に 置い て $7E00 一 $7FFEFE の ディ ス 
ク ・ コ ー ド を $6E00 一 $6FFEF に 移し ます . 次 に 本 体 を 
$7E00 以 後に 移し , メイ ン ・ プ ログ ラム に ジャ ンプ し ます . 
デラ ー を 生じ だ と き は 。' 贅 の ゲロ グラ スム に 移っ で ディ ズ スズ と を と 
・ コ ー ド を 元 に 戻し 。 BASIC の エラ ー メ ッ セ ー ジ ・ ル ー チ 
ン へ ジャ ンプ し ます . 以上 の 操作 に より ディ スク ・ コ ー ド 
の 破壊 を 防い で いま す . 

まだ た エラー メッ セー ジ に つい て の 注意 で す が , プロ グラ 
ム を 256 バ イト 以内 に まとめ た か っ た た だ た め , BIOS エ ラー を 
判定 し て いま せん . BIOS エ ラー に つい て は すべ て , エラ 
ー コ ー ド 21(Unprintable error) で 出す よう に し て いま す . 
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1 メモ リ ・ マ ッ プ に よる 状態 の 変化 





ROM モ ー ド 





の 重い 


0000 nnn0 0000 
状態 A $0000- $7DFF を 状態 A 


の 20 
7E00 遇 クニ コー ド 7E00 0 
財 介 SAVER 」 人 ' 





ROM モ ー ド に な る 











注 ) ディ スク が not Ready な どの と き は , BITOS 中 か ら 直 接 エ ラー メ 
ッ セ ー ジ ・ ル ー チ ン へ 和 飛ぶ 場合 が あり ます . この と き は も ちろ ん , デ 
ィ ス ク ・ コ ー ド が 復帰 され な い の で 横 走 し ます . この 場合 は リモ セット 
する し か あり ませ ん . また , モー プ の と き は ディ レク トリ FAT を 直 
接 変 更 する の で , 慣れ な いう ち は 壊 し て も よい ディ スケ ッ ト て で 練習 し 
て みて くだ さい 。 





まず ROM モ ー ド で (この プロ グラ ム は ディ スク ・ モ ー 
ド で 使っ て も 意味 が あり ませ ん ), モー ブ 用 の プロ グラ ム , 
(リス ト 2 ) を 入力 し て 実行 し ます . も ちろ ん その 前 に テ 
ー プ は セー プ し て お く の は 当然 で す . , そ うす る と 。4Drive 
No 王 ?” と 尋ね て くる の で , セー ブ プ す る ディ スケ ッ ト の 入 
っ て いる ドラ イブ 番号 を 入力 し ます (0 また は 1 : 4 ドラ 
イプ の 方 は 140 行 め を 修正 し て くだ さい ). 

その 後 , 本 体 を $7E00 以 後に 設定 し (マシ ン 語 の デー タ 
が 誤 ま っ て いる と き は , その 行 を 表示 し て 終わ り ま す ) , 
Ready と な る の で 目的 の プロ グラ ム を テー プ か ら ロ ー ド し 
ます . この と き Out of Memory に な っ た 場合 は , 文字 領 
域 を で きる だ け 小 さく し て みて くだ さい . それ で も だ め な 
場合 は , プロ グラ ム 自 身 が $ 7 E00 以 上 に な る 場合 な の で , 
セー ブ は 不可 能 で す . 

ロー ド が 終わ っ た 後 は EXEC&H7E00 を 実行 する と , 
ディ スク に RAM 上 の 内 容 (ROM モ ー ド の プロ グラ ム ) 
が セー プ ブ さ れ ま す ( 約 10 秒 ). も ちろ ん この と き ド ライ ブ に 
は , 16 ク ラス タ 以 上 の フリ ー ク ラス タ を も つ デ ィ ス ケッ ト 
を 入れ て お いて くだ さい . 

次 に ディ スク ・ モ ー ド に 移り (リセ モ セット また は EXEC 
&HFEE0O),FILES に よっ て ディ スケ ッ ト の ファ イル 
を 調べ ます .“ 田 "と いう 名 の ファ イル が ある は ず で すか ら , 
NAM 選 文 に よっ て ファ イル 名 を “" 圏 ベ ベベ メメ ※ メ メメ" の 
形 に 変え た て お きま す . この 処理 は ロー ド 用 の プロ グラ ム に 
と っ て は 必要 あり ませ ん が , ユー ザー の 識別 の た め に 行 な 
いま す . 

セー プ の プロ グラ ム で の 注意 で す が , RCB の 初期 設定 
を プロ グラ ム 中 で 行なっ て いま せん (マシ ン 語 の デー タ 中 
で 既に セ モット し て いる ). その た め エ ラー が で て リト ライ す 
る 場合 は 、 も う 一 度 始め か ら 行 な うか , も し く は RCB の 
部 分 , $7EE7 以 後 を 08。 00、 7 F, 00, 01, 01, 00, 0? 
(ドラ イブ No) と 書き 換え て , EXEC 錠 H 7 E00 を 実行 
し で くだ きい 





ディ スク ・ モ ー ド で ロー ド 用 の プロ グラ ム (リス ト 1) を 
内 包 じ 記 (70 スウ の に セー デン 10 お きま 8 突 和 か 3232DE 
ive No. 三 ?,File No 三 ?" と 聞い て くる の で , それ ぞ れ 
入力 し て くだ さい .( マ シン 語 デ ー タ に エラ ー が あっ た 場合 
は セー プ の 場合 と 同様 に . その 行 を 表示 し て 終了 し ます ). 
File No. は , 先頭 が “ 較 " と な っ て いる ファ イル の 初め か 
ら 何 番 め か と いう 番号 で す . 

ファ イル が 存在 し な い 場 合 に は ,“File not Found" を 
表示 し て コマ ンド ・ レ ベル に 戻る の で , ディ スケ ッ ト 内 の 
ファ イル を 確認 し て くだ さい . うま くい っ た 場合 は 10 数 秒 
で Break/Ready と な り , ROM モ ー ド に な っ て いま す . 

その 後 は CLEAR,&H7FFEE の 後 , 普通 どおり 実行 で き 
ます . も ちろ ん この 場合 は ROM モ ー ド に な っ て いる わけ 
な の で ,。 アディ スク ・ コ マン ド は 使え ませ ん 。, 





この プロ グラ ム で は BIOS エ ント リ ・ ア ドレ ス 。 BASIC 
ホッ ト ・ ス ター ト ・ ア ドレ ス を エク ステ ンド ・ イ ンダ イレ 
クト で 呼ん で いる ($FBFA 以 後に BIOS エ ント リ , BA 
SIC ホ ッ ト ・ ス ター ト , BASIC コ ー ル ド ・ ス ター ト の ア 
ドレ ス が 入っ て いる ) の で , エラ ー メ ッ セ ー ジ ・ ル ー チ ン 
の アド レス を $8DD1 に 変更 する だ け で , FM-7 で も そ 
の まま 使う こと が で きま す . 

まな た ディ スク ・ モ ー ド か ら ROM モ ー ド へ の 転換 を する 
場合 、EXEC&H890A, も し く は モニ タ か ら G890A 
(BASIC コ ー ル ド ・ ス ター ト ) を 行なう と あっ さり と 変わ 
っ て くれ ます . この 場合 リ り セ ッ ト さ れ な い の で , TIME$ 
な ど は その まま 継続 きれ ます . ご 存じ な い 方 は や っ て みて 
くだ さい . 意外 と 便利 で す . 

な に ぶん 文章 が 下手 な の で , わか り に くい と ころ も 多い 
と 思い ます が , 試行 錯誤 で や っ て みて くだ さい . 
最後 に F M-7 を 気楽 に 使わ せ て いた だ いた 人 久留米 み ホ バ パ 
ー ツ の 皆さま に 誌上 を 借り て お 礼 申 し あげ ます . 
避 参 考 文献 
1) F-BASIC 文法 書 , 富士 通 
2) FM-8 活 用 研究 , 工学 社 
3) イン ター フェ イス 2?82 年 6 月 号 、CQ 出 版 
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100 CLEAR 。%&H7DFF 
110 DEFINT 人 台 ーZ 
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リス ト 1 


0 


SAVER 





120 
13O 
140 
15Q 
160 
170 
180 
190 
23200 
=10 
20 
さき 0 
240 
25O 
60 
270 
SB0 
1000 
1010 
1020 
103O 
1040 
105O 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
115O 


ER=O 

FRINT: INFUT "Drive No.="』DRV 

IF DRVSO_UR DRV1 THEN 130 

FOR AD=&HZEQO_TU &HZEFO_STEF 16 
TTAL=QO 

FOUR 1I=O TO 15 

: READ DT ま :DT=VaL ("&H"+D 丁 ま ) 
FURE RaD+I。DT 

s  TTRL=TTAL+DT 

NEXT 1 

RERD LIN まま 。 SUM も 

ョ IF VAL("H リ +BUM ま も ) >: く TTAL THEN BEEP』ER=ー-1 :PRINT "Error Lin = "リュ LIN も 
NEXT AD 

IF _ ER=-1 THEN END 

PURE &HZEEE , DRV 

END 


ee 


DATA さ 4。7F。 さ 0,BD、00.E1 AD,FF 。FB。FA。10。25。OO,D さ 。B6.OA。 10QQ、7BA 
DATA 7,B4。AD。FF 。FH。FA。 10。25。00。C7。10、AE。02。 さ 1 、255。 さ 0。 1010。7OE 
DaTA 0 昌 。1F、1 さ 。C6、FF。4F。55C、C1 、9 日 。10。24。00。B4。A6。 人 QB。 昌 1 。 1020。6BD 
DQTA FF。26。F2。4F。EZ。CO。E7,B4 。 さ OB 。 6 人 Q。BD 。 OO 。 AB 。26。E5。 103O。BFD 
DaTA C6』C7、E7。B4。 さ 0。BD OO.9F 。6Q。B4 。AD 。FF 。FB。FA。10。25。 1040。91 昌 
DATA OO0』BF,B6。04,6C, 昌 47。05。 RD 。、FF 。FH。F 仙 。 10。2 ロ 。QO。B1 。 1Q50。70 ビ 
DATA 6。B0。EE。02。 さ さ 。 9。00。0。E6。C6。27。16。C1 。FF。S7。12。 1060。754 
DATA BB,』2O。2B。F4。A6」055。 4C。 晶 1 。 1 1 255。DB。 ED、O1 01 。E7。06。 1070。6OB 
DATA 20.D4, さ さ 、C6。CC。FE。20、ED,C1 。B6。 20。ED、C1 。ED、C1 ED。 10BO。a74 
DATA C1.B6,1 昌 。6F,CO,4。26。FH。A6。 OB。 人 7。CB。EE。 6。B4 。QD。 1090。 日 9F 
DATA FF、FBE。FA。25。 さ じ 。10。BE。0O。00。 さ さ 。0B。A6。CO。1F、B9。C4。 1100。700 
DATA O1.5 昌 5B。58。5 じ 。E7 。 0 。44。1F。B9。C4。01 。E7。06。44、BB。 1110。5BEE 
DATA 02。Q7。04』C6。 0 日 。10、QF 、 02。AD 。FF 。 FB 。FA。 25。 1 さ 。 さ 1 9。 1120。6EF 
DATA 01.00。10。BC。BO。 OO。24。07。6C。05。 5 。26。EB。 2O。CC。 さ 5。 1130。442 
DATA FF。C6。15。7E。92。AB。 10。 0 日 。0O0。7F、00』01、01 00。OO。O0。 1140。42E 
DATA 00、0O。00。00。0O。00。00。00。00。00。00。00。00。 OO。OO。0O。 1150。000 
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』fD ビ 


4 
10Q 
110 
120 
13QO 
140 
150 
160 
170 
180 
190 
2O0O 
210 
220 
30 
240 
25Q 
26O 
270 
28Q 
290 
さ Q0 
さ 10 
さ 20 
100Q 
1010 
1020 
1030 
1040 
1050 
106Q0 
1070 
100 
1090 
1100 
1110 
1120 
113O 
1140 
1150 
1160 
1170 
11O 
1190 





Loader of the Frogram under RONM-mode Ver 1. さ ロ Date 83/01/ ミ 1 


CLEAR 、。&H6DFF 
DEFINT -Z 

ER=O 

FOR AD=&H7OOQ TO &HZ1 さ O STEF 16 

: TTAaL=O 

FOR 1I=O TO 15 

: 。 READ DT*:DT=VAL("&H"+DT*) 

PURE AD+1、DT 

: TTAL=TTAL+DT 

NEXT 1 

READ LIN$、BUM$ 

: 。 IF VAL("H"+BUM ま ) > く TTAL THEN BEEP:ER=-1:PRINT "Error Line = "iLIN* 
NEXT AD 

IF ER=-1 THEN END 


FRINT 

INPUT "Drive No.="』DRV 

IF DRVYO_ DR DRV>1 THEN 260 

INFUT "Fi1le No.="』FIL 

FDRE &H7OC7, DRV 

FORE _&H7OCB,F IL 

EXEC &H7100 

DATA 10。EF。BD。Q04。BZ。10。CE。FC。7F 。 さ 0 。BD 。 00。 BE さ , 6。O4.Q7。 1000。』73D 
DATA QB。AD。FF 。FB。FR。 10。2 ロ 、0O。9C。 6。BO0、EE。 OS 3 うさ 。 9、00。 1010。769 
DATA ヨ O。E6。C6。C1 。、FE。26。06。6。BD。 OO0.9D.。 27, 18.6。BD, OO。 1020.6E1 
DATA BD。27。7E。 BE。 20。 2 日 。 ER。 6.05, 4C。 日 1 11.25,D1。CC」O1。 1030』63B 
DATA 01 EZ7。06.20。CA。 ささ 。C6。E6。 4E。 さ 1 。BD。O00。7C、E7。 AO,6。 1040。74C 
DaTA OF』R7,BC、6B。4F。CE。 91.00。EF 。05。 AD。FF。FE。 FR 25 55。 1050。 7DA 
DATA EE。02 。 さ さ 。 45。E6。 CB.。C1 .98.24。4BH。E フ 7 AO. 6 BC。50」S6。 1060。7D4 
DaTA F さ 』。 10。BE。O0。0O。 さ さ 。BD,00。50。 6。 CO。 1F。B ヨ 9 。C4。O1.5 昌 。 1070、5CC 
DATA_ 58.5,。5C。E7。0Q5。44。1F.。 ヨ 9。C4。O1 EZ。0O6。44.BB。 OS 7。 1080。60E 
DaTQA 04。C6。 0 日 。 10。QF 。 02 。QD 。FF ,FB。 FR。 25。 19。 さ 1 . 901.0O。 1090。64D 
DATA 10。 ヨ C。7E。00。24.07。 6C。 0O5。 5 。 26。EB。2O。 CC, 6E。FF,FB。 11004672 
DATA FC。C6。 さ F 。 20。02。C6。 15。 10。EE BC。 01 。 さ 9。00。00。 7, 00。 1110.55A 
DATA OR。0O、7F。00。91.04。004』00。01.00。O0.。0O。 OO0。QO。 OO。QO。 1120。 OF 
DATA OO0。00』。00。00。00。00。0O。00。00。004004。00。00』。00。00』00。 1130』Q00 
DATA_ QO』。QO0。00.0040O。O0。00』。00。00。 00。 00。004。00。00。Q0O.。O0。 1140。00O 
DATA 00。00。00。00。0O。00。 00。 00。00。00。00。00。00。00O。 0O。00。 1150。000 
DATA BE。6E。QO。CE。 プ E。00。EC。C1 ED 、B1 。 1 1 8 ミ 。 ヨ 0。QO。26,F6。 1 160。79 ミ 
DATA CE。7E。 OO。EC。 日 1 。ED。 ビ 1 。B じ 。71 0O。26。F7。 BED, 7 プ E。 OO,。 さ 4。 1170。7FO 
DATA QO4。BE。6E。 00。CE。 7E。 0O。EC。 晶 1 。ED。C1 。 1 1 。 ヨ 3。 ヨ 0。 OO 26。 1180。6a1 
DATA F6, さ 5。 04。7E。92. QBE。 OO0。00。00.00。QO。00。 OO0』。00O』 OO0』。0O。 1190。 SER 
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リス ト 3 LOADER ア セン ブル ・ リス ト 還 還 昌 還 間 昌 EE 


RAM-data write on F1opy 
Ver 1 . 1 [dat ヨ さ /01/707] 
Debug [date さ /01/301 





OO0O1 OOQQO 
OOQS OOQQ 
OO0O さ 。 QQOQQO 
QQQ4 。 QQOQQ 














QOQO5 。 7EQ0Q DRB ま も 7EQOQO 
QQQ6 7EQO さ 47F FPSHS U。Y。X.DF。E. CC 
0007 。 7E02 さ QBDOOE 1 LERX RCE。F ビ ュ Seek TaC ド ー0 
QQQB 7EQ06 DFFFEF 人 Rn JSR 上 も FEF 人 1 | 
OO09 。 7E0R 1025OQOD ミ LBCS ERR 
QQQOR 7EQE 60 谷 LDR 埋 呈 QO 人 ュ 。 FaT Read 
QOOBE 7E10 7B4 ST  』X 
OQQOC 7E12 DFFFEF 人 人 JSR 上 FEF 人 ] 
OOQOD 7E16 1025OQ ビ 7 LBCS ERR 
QQOOE 7E1 10aEOS EDY レバ 日 Fr C1u5ter G 司 a ビ Ch 
QQQOF 7E1D さ 1255 LEAY 5,Y 
QQO1O 7E1F さ QQ8 LEAX 日 。X ロ [ こ 1u=ter buf げす addF 己 らら ] 
OO ドア E ジ 31341TSS TFR  X。U 
QQ12 7E23 C6FF LDE 提 争 FF 
001 さ 。 7E25 4F LODOF1 iCLRA 
QQ14 7E26 5C INCE 
QQO155 7E27 C198 CIMFE 提 邊 9 日 
QQ16 。 7E2 の 10240Q0E4 LBCC ERR 
QO17 7E2D AA6AE LDA  D,Y 
QQ1 ヨ 7E2F 1FF CMF 間 和 ま FF 
OO19 。 7E く る 1 26F BNE LOOP1 
| QQ1 7E さ さ 4F CLRA 
OO1B 7E34 EZ7CO TB 才 ま 上 
QOQO1C 7E36 EZ784 GBR きま X 
QO1D 7E3 さ QAE LEAX D,Y 
QOQO1E 7E3A 6a8DQOA8 DEC CNTER, PC 
QO1F 7E3E 26E55 ENE LO ロ P1 
QOSOQ 7E4Q C6C フ 7 LDE 提 和 まじ 7 
QOS1 7E4S EZ784 HB 請 同 X 
QOS2 。 7E44 さ QBDOQ9F LEAX RCE。 FC ュ FaT Mirite 
OO2 さ 。 7E48 6a84 DEC 。 。X 
QOS24 7E4Q ADFFFEFA JSR 上 まま FEF 人 Q] 
OO02 7E4E 1025OQBF LBCS ERR 
QO26 7E52_ B604 LDR 提 ま O4 s Dir ヒモ OFy Rad 
QOS フー 7E54 6C8B4 INC  』X 
QOS2B 7E56 705 LODF さ :STA 5。X 
OOSE ワ 9 。 7ESB ADFFFEF 人 人 JSR 上 中 FEF] 
QO2A 。 7E5C 1025OQB1 LBCS ERR 
QOSE 7E60 8B68O LDR 井 外 BO 
QQO2C 7E62 EEQ2 LDU 人 24X 
QOS2D 7E64 ささ C9OOBO LEAU まま 0。U 
QQO2E 7E68 E6C6 LOUOP2 giLDE 人 4U 
QOSF 7E6 2716 BE NEXT 
QOSQ 7E6C C1FF CIMPE 揚 争 F 
00 さ 1 7E6E 2712 BED NEXT 
QOS2 。 7E7Q BEB2O DDR 韻 ま 2O 
00 さ さ 。 7E72 2BF4 BEVC LOOP2 
| QOS さ 4 7E74 6Q5 LDA 54X 
00355。 7E76 4C INC 人 Aa 
QQ36 7E77 8111 CMFR 韻 委 11 
0037 7EZ79 25DE BCS LUOF ミ 
QOS3B 7E7BE CCO1Q1 LDD 募 $Q1Q01 
QO39 7EZE E7Q6 STE 6。』X 
QOQ さ 人 7EBQO SBQD4 ER LOUOF ミ 
00 さ 7EB2 ささ C6 NEXT _ iLEAU 谷 4U ミ 。 Dir ヒモ OFy Ge 
QOSC 7EB4 CCFE2O LDD 持 和 ま FE2O 
QOSD 7E87 EDC1 ら 省 り 当 大 みり キ 
QOSE 7E89 862Q0 LDR 乾 ま 2O 
QOSF 7EBE EDC1 STD 」。』U++ 
QQ40 7EBD EDC1 STD 。。』U+ キ 
OO41 7EBF EDC1 53D 3.U キ す 
QQO42 7E91 8618 LDQ 提 も 18 
004 さ 。 7E9 さ 6FCO LUOP4 :CELR  。 昌 U+ 
QOQ44 7E9 品 4a DECA 
QQO45 7E96 26FE BNE LOOPF4 
QQO46 7E5 6Q8 LDQ 8.X s 。 [fisrt C1uster 51] 
OO047 7E9 7CBEE STA  -18。』U 
OQ4 7E9D 6284 DE | さ X ュ s Directory Mrite 
0049 7EF RDFFFEFR JSR 上 も FEF 人 1 
OO04 谷 7ER ス SBSSC BCS ERR 
OO4BH 。 7E5 _ 108BEOQOO LDY 革 OOOQO ェ FRQM-data Stor 
QO4C 7EA9 ささ Q LEAU 。X 
OO04D 。 7ERE 6CO LOOF6 :LD  。』U+ 
QQ4E 7EaD 1F8 TFR RE 
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[ OO4F 7EAF C401 = 人 NDE 提 叶 O1 ピー 
| QQ5Q 7EE1 5 LSLE 
| GO も 1ZEHB 全 2 日 LSLE 
OOQ5S 。 7EES 5 LSLE 
005 さ 。 7EE4 5 ビ INCE 
O054 7EE5 EZ705 ら B' 5。X 日 に 1 もり =) 
OO0555 。 7EB7 44 LSRR 人 
QQO56 7EEB 1F85 TFR 人 。E 
0057 。 7EB CE401 NDE 提 和 01 | 
QQOBB 7ERC E7Q6 に 1- 1 ぇ Side 
OO の 9 。 7EEBE 44 LSRA 
QQO5A 7EBF BEBOS DD 人 提 ま OS 
QOS5E 7EE1 7O4 ST 44X ュ 。 TracC ド 
QOSC 7EC さ C608 LDH 提 $08 
OOSD 7EC5G 10aFOS EEBEP5 GEY 2 ミ 交 F モエ OF 
QOSE 7ECB ADFFFEF 谷 JSR [まま FEFA] 
QO5F 7ZEEE ビ 251 さ BCS ERR 
QO6Q0 。 7ECE 31 人 PO1Q0QO LEAY まま 1004Y 
QO61 7EDS 10BCBQOQOO CMFY # ま BOOQO 
QQO62 7ED6 2407 ECC END 
OO6 さ 。 7EDB 6CQO5 NE 王 X 
QQO64 7ED 5Ra DECE 
OO655 7EDE 26EB ENE LOOF5 
OO66 7EDD SQCC ER 。 LOOF ら 6 
0067 7EDF SFF END 5FULS CE,。Q。B。DP。X。Y。U。FC 』 return 
QQ68 7EE1 CG6155 ERR sLDE  #21 
QO69 7EE さ 7E9SAE JMF 92 人 EE 
QO6a 。 7EE6 10 CNTER :FCE ま 10 
QO6E 7EE7 QBOQO RCE sFDE も OBOO 
QQ6C 7EE9 7FOO FDE ま 7FOO 
QO6D 7EEE Q101 FDE ま $Q101 
QQO6E 7EED QQOQ FDE  $QOQQ 
| QO6F 7EEF CELEUF :RME 16 
4 つら へ ソ ビ ヒド アセ ンプ ブル ・ リ リス ト 
| QQQ1  QQQQ : RaM-data read on F1opy 
OOOS 。 QQO0QO H Ver1.2 [date 3/01/12] 
| QQOQ さ  QQQOO H Debug [date さ /Q1/ さ 0Q1 | 
QO04 。 QOQ0O | 
QQOQO5 。 QQQQ け Di=k Code She1ter Froqgram | 
QOQO6 。 7100 DRG  $71Q0Q 
| OOQ プ アプ 。 7100 BE6EQO LDX 提 ま 6EQQ ュ 。 Disk Code Sh1ter 
| QQOB 710 さ 3 EE7EQOO LDU 提 相 7EOO 
QQQ9 。 7106 ECC1 LEBOP'_3.gEDD' 。 。 四 お 
OOQO 。 7108B EDB1 FID。 メキ 
QQQH 71Q0 1183BQOQO CHMFU 提 ま BOQO 
OOOC 710E SB6F6 ENE LODP_1 
QOQQD 7110 CEZ7EQQ LDU 提 和 $7EQQ ぇ 。 Main Program Se 
QOOE 7113 ECB1 LODOF_2LDD 。 』 メ キキ 
oOQQOF 71155 EDC1 SD。 「。U キ や 
QQO1O 7117 C7100 CMPX 拉 7100 
| QQ11 711 26F ア ENE LOOF_S 
QO12 711C BD7EOQO JSR  $7EQOO 
0OQ1 さ 。 711F さ 404 FSHS 呈 
QQ14 71281 BE6EOQO LDX 拉 6EOO : 。 Disk Code Return | 
QQ15 7124 CE7EQQ LDU  # 和 ま 7EQQ | 
OOUG。。 ブロ タス EEB1 LUDP_ さ :LDD 。 』X+ キ 
QQO17 7129 EDC1 ら ド D!。 UMHE 
QO1B 712E 1183BQ0QQ CMFU ま BOOQO 
OOQ19 712F 26F6 ENE LUOP_ さ 
QO1 71 さ 1 さ 5o04 FULS 
OO1R 713 さ 7ESaE JIMF' 92ABE H Jum ロ EE レロ SuDFOut ュ ロ 
QO1C 7136 * 
QQO1D 71 さら 6 日 Main PrO ロ Fa 
OO1E 。 7000 URGB ま $Z7Q000 
QQ1F 7QQ0 1QEFBDOQE7 STS STACK。』 FC 
OO2O 。 7005 1QCEFC7F LDS 提 和 FC ビ 7F 
QO21 7009 さ QBDQOQE さ LEAX RCE。 FC 
QOS2 。 700D 604 LDR 提 邊 O4 ェ Dir ヒモ ロレ ッ y ad 
QOS2S さ 。 700F 人 705 LUUP さ :STA 54X 
OO24 。 7011 DFFFEFR JSR 上 中 FEBFA1 
QOQO25 。 7015 1Q25Q0Q9C LBCS ERR 
OO2S6 。 7019 68QO LDR 韻 ま BQO 
QQ2 フ 7 。 701B EEQ2 DU ジュ 
OO2B 701D ささ C9OQOBQ LEAU ま B0Q。U 
QQ29 7021 E6C6 LUDFS :LDE 4U ュ 。 Fi1 SaFch 
OO2A 702 さ C1FE CMPB 井 和 FE 
OOQ2BE 7025 26Q6 ENE JUNMF 
OOSC 7027 6aBDOO9D DEC FILE,FC 
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,&O 


リス ト 4 SAVER ア セン ブル ・ リ スト 





QQSD 
OOSE 
QQ2F 
003Q 
QQ さ 1 
00 ミ 人 
QQO さ さ 
0OS4 
QQS 
003 ら 6 
QOQ さ プア 
QOS38 
QOS 
| 003 谷 
QOSBH 
003 ビ 
QOQSD 
00S3E 
QOSF 
0040 
0041 
0045 
0Q04 さ 
0044 
Q04 誤 
0046 
| 0Q047 
| QO48 
Q049 
QQ4a 
QQ4BE 
QO4C 
904D 
QQO4E 
QQ4F 
005Q 
QQ51 
O05S 
005 さ 
00554 
Q0555 
00556 
0057 
QQOS8 
| QQ59 
QQ5a 
QQSE 
Q05C 
QQSD 
QQSBE 
QQSF 
006Q 
QQ61 
Q0062 
QQ6 さ 
QO64 
Q0655 
Q066 
0067 
QQO68 
0069 
006 谷 
QOG6BH 
0Q6C 
QQ6D 
006E 
QQ06F 
QO7Q 
| QQ71 
| 0073 
QQ7 ミ 
0074 
00755 
QQ フ 7 プ 6 





7Q2E 
7Q0SD 
7031 
703 ミ 
7035 
プア 0 さ アプ 
70 さ 9 
703 谷 
7Q03C 
703E 
7041 
704 ミ 
プ 045 
7047 
7049 
704D 
704F 
70551 
7054 
7055 
705 
705a 
70SE 
706Q 
706? 
7064 
706 ら 6 
7068 
706 人 
706 ビ 
706F 
707 1 
7075 
7079 
707E 
707D 
707F 
7080Q 
7081 
7082 
708 さ 
7085 
7Q086 
7088 
708a 
708C 
7Q08D 
708F 
7Q91 
709 さ 
7096 
709 谷 
709C 
7Q0A8Q 
704 
70A6 
7Q0a88 
70 人 9 
7QAaB 
708D 
7QE1 
70E ミ 
70E5 
70E ア 
20BE 
70EC 
7QEE 
70EF 
7Q0CQO 
70CS 
70C4 
7Q0C6 
7QC8 
70C9 


71 

6 全 BDQQBD 
に 474 
BBSO 

BE 人 
605 

人 4 

111 
25D 1 
CEO101 
E7Q ら 
SOC 人 n 

ささ C6 
E64E 

さ 18DQQ7C 
E7AQ 
6QF 
7BC6E 

人 4F 
CEQ10Q 
EFQ5 
DFFFBFA 
S555 
EEQS 

ささ 45 
E6CE 
C198 
244H 
E7AQ 
6Q8BC5Q 
6F さ 
10BEOQQO 
ささ 8DQOQSQ 
仙 6CO 
1FB9 
E401 

58 

58 

58 

9 は 

E7Q5 

し の 9 

1F89 
C401 
E7Q6 

人 44 

BBOS 
704 
C6Q8 
10nFOS 

人 DFFFEF 人 
2 ら 519 

さ 1a9Q1QQ 
108C7EQQ 
ご 407 

6 じ CO 

2) 

ご 6EB 
20CC 
6EFFFEFC 
C6 さ F 
200S 
C6155 
10EEBCQ1 
さ 9 

0000 

98 

QO 

QaOO 
7FQQ 
Q0104 
0Q00Q 

Q1 


EEG 
JUMF  :DEC 
BEG 
ADDa 
EVC 
LDa 
INCA 
CMFA 
ECS 
LDD 
STE 
BRA 
NEXT  :LEAU 
LDE 
LEAY 
STB 
LDa 
STA 
CLRA 
LDU 
STU 
JSR 
BCS 
LDU 
LEAU 
LDDP1 :LDE 
CMFE 
ECC 
STBR 
DEC 
ENE 
LDY 
LEAU 
LDOF6 :LDA 
TFR 
ANDE 
LSLE 
LSLB 
LSLH 
INCE 
STR 
LSRA 
TFR 
ANDE 
STBE 
LSRA 
aDDA 
STa 
LDE 
LDOF5 :STY 
JSR 
BCS 
LEAY 
CMFY 
ECC 
INC 
DECE 
BNE 
ERA 
END  :JMF 
NoFILE:LDE 
ERA 
ERR  :LDE 
RET  :LDS 
RTS 
STACK :FDE 
DIRC  :FCE 
CENTER :FCBR 
REER  :FDE 
FDE 
FDE 
FDE 
FILE  :FCB 
ELEUF :RMBE 


NEXT 
DIRC。FC 
NoF ILE 
に: た: が 9】 
LUFS 


9』X 


韻 利 11 
LOF さ 

革 ま 0101 
6。X 

LDP さ 

a。U 

14。U 
ELEBUF ,PC 
*Y+ 

#15 
CNTER。PC 


提 ま 010Q0 
5 X 

[ ま FEF] 
ERR 

だ 

らら 。U 

D.U 
韻 和 9 日 

ERR 

ょ \ で 
SENTER。 FC 
LOF 1 

間 ま OOOQO 
CLEUF ,FCG 
ぅ U+ 

谷 。B 

韻 叶 01 


E: た た 19 が 

人 4 X 
草 ま OB 

2 メ 

[まま FEFA] 
ERR 

も 1004Y 
電 ま 7E0Q 
END 


5』 X 


LOOF5 
LUUF ら 6 
[FEFC] 
幕 ら 6 さ 

RET 

韻 1 
SBTACK』 FC 


和 ま 00Q0Q 
9 
0Q 
OAQOQO 
も 7FQOO 
第 Q104 
101979】9) 
争 01 
16 


F ュ F= ト 上 じ 1u5teF Sarch 


FAT Read 


TaFr ロ et Clusters Search 


FT 


RAM-data Load 


どど 


Be@C 上 @F 


Si d 


Tr ack 


1oad 


FT 


ュ BASIC hot =tar キ 
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FILE 


ラム ・ フ ァイル 








この プロ グラ ム は FM-8 の 裏 RAM31K バ イト を RAM 
FI LE と し て 活用 する た め の も の で す . 裏 RAM の RE 
AD, WRITE に バブ ルフ ァイル ・ コ ント ロー ル ・ ル ー 
チン を 借用 し た の で , バブ ル と ほとん ど と 同じ 使い 方 が で き 
ます (詳し く は 仕様 を 参照 ) 

ディ スク の な い 方 は 高速 ファ イル を 実感 し て みて くだ さ 
い . ディ スク の ある 方 も カセ ッ ト 版 で し か 走ら な い 大 き な 
ゲー ム も , ディ スク か ら 裏 RAM に 転送 し て お け ば ロー ド 
で きる の で す . 

F M-8 に も 強力 な 後 輩 た ち が で て きま し た . FM-8 も が 
ん ば ら ね ば / 























































































































































































品 LLHI LFFFFF ロ 
- 生 三 コ 監 2 較 | 
9 る) こい の 
LIIIIITI 
図 1 回 路 図 
は ] 
A/D コ ン バ ー タ 
M22 M11 
DATABUS 
0 
NN 2 。 5V 
$FD0C 二川 い | 
1 ー レ テー 2 + ょ プー ト ROM 
4 023arrccN6 1 


~7407 SW2Y (テー ト ・ モ ー ド swW) 








Ei 





。 二 SS02 
Eva に ws 
74LS174 











回 路 図 に ある よう に , A/D コ ン バ パー タ で は 使っ て な い ビ 
ッ ト 6 を オー プン ・ コ レク タ の バッ ファ を 通し て ブー ト ・ モ 
ー ド ・ ス イッ チ 10 番 に 接続 し ます . この 配線 に よっ て $FD 
0C に $40 を 書き 込め ば 裏 RAM に , $00 を 書き 込め ば BASIC 
ROM に ソフ ト 切 り 替 え が で きる よう に な り ま す . 












































TRW 


まず ブート ・ モ ー ド SW10 の OFF を 確か め ま す . リス 
ト 1 を 適当 な アド レス に ロー ド し て 、EX 巨 C ロ ー ド 先頭 
アド レス [ RET | の 入力 で Ready” が 表示 され れ ば イン 
ター フェ イス は OK で す . な お , BUBINIO| RET |[YIFILES 
*BUBO :| RET | と 入力 し て “1028Pages Free′ と 表示 
され れ ば , 裏 RAM に 対す る 読み 書き テス ト も OK に な り ま 
す . ここ まで くれ ば バブ プル に 関す る すべ て の コマ ンド , ス 
テー トメ ント が 使え る よう に な り ま す . 後述 の 仕様 と 文法 
書 な ど を 参考 に 使っ て みて くだ さい (バブ ル は 初め て 使う 


版 H 


と 3 
き イ ニシ ャ ライ ズ が 必要 で す ). 


る 
ーーーー 



































































































































































































































































































































実用 性 を 考え て ROM 版 も 作っ て み ま し た . リス ト 2 が 
それ で す . アセ モン プラ の 都合 で アド レス が ずれ て いま す が 
これ を $F511 一 SF5C7 に 書き 込ん で 使い ます . この 
他 に アド レス $ 8A2B, C の $2725 を $2008 に 書き 換え 
る 必要 が あり , 結局 2 個 の ROM を 焼き 直す こと と な り ま す . 

この プロ グラ ム は ユー ザー エリ ア を 使っ て いま せん 。 シ 
ステ ム ・ エ リア に 数 十 バ イト の テー ブル が 登録 され る の で 
その 分 だ け ユ ー ザ ー エ リア が 減少 する こと に な り ま す . R 
OM 版 は イン ター フェ ー ス ・ プ ログ ラム の イニ シャ ライ ズ ダ 
の 必要 は な く , 電源 ON で すぐ 使え ます . 


リセ ウト 


ユー ザー プロ グラ ム が 革 走 し て 。 リ セッ ト ・ ス イッ チ を 押 
し て も BAS TIC モ ー ド に 戻れ な い 場 合 , 電源 の OFF 
ON まだ は プ ブート ・ モ ー ド ・ ス イッ チ 10 を ON に し て りや 
ッ ト を 押せ ば BASTIC モ ー ド に 復帰 で きま す 。, 

な お , ブー ト ・ モ ー ド ・ ス イッ チ 10 を OFEF に し て 電源 
を 投入 し て も BAS 1IC は 起動 する は ず で す が , も し 起動 
し な い 場 合 に は スイ ッ チ を ON に し て 電源 を 投入 する よう 
に し て くだ さい . 
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RAM FILE 仕様 図 3 ファ イル 処理 概要 













源 QFTF で 消 表 され る が 。 リセット で は 消 赤き され な い . 


間 ・ 約 8ms/ ペ ー ジ 

デバ イス 名 は BUB0, BUB1 使 用 可 .。 た だ し , BUB1 は B 
UB 0 内 に 二 重 定 義 し た も の で あり , 両 デ バイ ス の 使用 に 当たっ て 
は 注意 が 必要 . これ は 2 つの フ ァイル を 同時 に OPEN 可能 と す 
る た め . 

@ 生 バブ ル の 割り 当て アド レス と ペー ジ 数 .、 BUB0O $8000-$B 
BFF, 992 ペ ー ジ . BUB1 SC000-SFBFF, 480 ペ ー ジ 

⑱ エ ラー 表示 . ペー ジ ・ ア ドレ ス が BUB0 は 991. BUB1 は 479 
を 越え た 場合 、 に I/O Error が 表示 され る . 

@ プ プロテクト , ブー ト ・ モ ー ド ・ ス イッ チ 10 を ON と すれ ば , 左 R 
2 デー タ が 保護 され る 

フリ ー ペ ー ジ 数 、FILES コ マン ド で 表示 され る フリ ー ペ ー ジ 


数 が 、31K バ イト の デバ イス と な る た め に 以下 の よう に な る . (サブ CPU カセット 
BUB 0 : 実 際 の 値 三 表示 値 -32 ペ ー ジ RS-292C… 













(《KYBD, SCRN 
CAS0, LPT0, COM0 …) 


































































































































































































プリ ンタ , RS-232C…。) 
BUB1 : 実 際 の 値 三 表示 値 二 544 ペ ー ジ | 放牧 
@⑯ROM 版 お まけ . BUB1 を BUB 0 上 に 重定 状 し て いる 
SFFF0 番 地 を S$00 以 外 の 値 と する に ザー エリ ア 中 
も 定義 する こと が で きる . SFFF 0 の 値 が アド レス 上 位 バ イト , 表 1 ファ イル 処理 エン トリ ・ テ ー プ ブル 
tue 生生 る eo 
LEAR 交 で この アド レス 以下 に し て お く こ と . 開明 且 227 の 5 ZZ7PEEP7ISIYYI3 , | 8 
1 ] オー プン | クロ ー ズ | 入 力 | 出 』 カ 
[ ] [ [[ | | 較 | 圏 | 圏 | 圏 | 圏 CAS0 | CD06 | CDA6 | CDD9| CDF4 | CE23 CCFA | CD02 
還 四 と , 人 人 ウ 回 四 
「 充 ELJHH 1 バイ ト 入 出力 ルー チン は BASIC 側 か ら の デー タ を 。, 
回 | 較 1 男 | L」 バッ ファ 上 に 各 デ バイ ス に 決め られ た サイ ズ に プ ブロッ キン 
ハー ド 的 に は ブー ト ・ モ ー ド ・ ス イッ チ 10 を ON に し て グ , デブ ロッ キン グ を 行ない ます 。 その うえ で BIOS を コ 
お け ば BASIC モ ー ド で の コン パチ ビリ ティ は 保 た れ ま ー ル し て 1I/O 装 置 に 送受 し ます . 
す . ソフ ト 的 に は RAM 版 に お いて は , イン ター フェ イス この デバ イス 処理 (私 が か が っ て に 命名 ) は CP/M の BD 
*・ プ ログ ラム が ユー ザー エリ ア に 置か れ 。 お も OS に 相当 する も の で , これ の 使い 方 が わか る と CP/M の 
を は iA に テー ブル が 登録 さき れる だ け な シス テム ・ コ ー ル (まだ は BDOS コ ー ル ) と 同じ こと が 
般 的 な 使用 法 で は 問題 は 起き な いと 思い ます . で き , マシ ン 語 レベ ル か ら 直 接 フ ァイル を 扱え る よう に な 
な お , この 改造 に より , バブル ・ モ ー ド と 予備 モー ド が り ま す . この こと は E-BASIC の O S と し て の 機能 を 高め 
DIP ス イッ チ に よっ て 選択 する こと が で き な く な り ま す . る も の で あり , 実用 的 ソフ ト を 作る に は 必要 な も の で す . 
L] HHHIHHHHHHHHHHI メー カー に は 是非 この BDOS の 詳し い 使 い 方 を 一 般 に 公 























































































































LIL 賠 HHHHL 開 し て いた だ きた いも の で す . BASIC も 見 方 を 変え て , ジ 
LILILILLI HHHH ョ ブ ・ コ ント ロー ル ・ ラ ン ゲ ー ジ と し て 見 れ ば , CP/M の 
回 因 ] ] LELLII 田 | 男 | 画 > 


ー SUBMIT な ど 問 題 に な ら な い ほ ど 強 力 な も の に な る の で 





FM-8 の ファ イル 処理 概要 と この プロ グラ ム に つい て 人 和 すか ら 
単に ふれ て お きま す . 最後 に この RAM FILE プ ログ ラム は , BIOS の 中 の バブ 
ファ イル 処理 概要 は 図 3 の よう な 構成 と な っ て いま す . ル ・ ハ ンド ラ を 裏 RAM ア クセ ス ・ プ ログ ラム に 置き 替え 
ァイル 処理 の BASIC 側 入出 力 単 位 は 。 1 ファ イル 名 だ た も の で す . これ が 何 か の お 役に立て ば 幸い で す . 
で 処理 され る プロ グラ ム ま た は デー タ で 、 デ バイ ス 処 理 側 参考 盗 料 
は バイ ト 単 位 と し な っ て いま す . この 処理 の 内 部 で ファ イル ・ 1) “FM-8 活 用 研究 ” (回 路 図 。 BIOS リ スト ) 
ディ スク リプ ブタ, パラ メー タ の 解析 を 行ない 、 フ ァイル の 2) PA フェ ー ス ?82 年 2 月 
オー ジン シ ョ クロ ー ズ 1 に で イ トッ テー デア の 火 205 出 2E 寺 3) FM-8 廊 法 書 ,。 マニ ュ ア ル 
ン が など を G.ANMPWI53LSGUY 寺 は 4) ^MC6809/E マイ クロ プロ セッ サ プロ グラ ミン グマ ニュ 
デバ イス 処理 に は 各 デ バイ ス そ れ ぞ れ に 7 つの エン トリ アル "。 CQ 出 版 


・ ポ イン ト を 持つ エン トリ ・ テ ー ブ ル が あり ます . その テ 
4 ンタ ・ テ ー ブ ル が $06F9 以降 に 置か れ ま す . 
デン ドリ テー ブフ 2 ば 表 :1 の よう に な つて いま 約 


5 リスト | に A VI SE 





QOO1 OOOQO ュ Ra FILE (RAN) 

OO02 。 Q00O ュー コミ.1.2O BY M.MQTANaBE 

QO03 。 0000 日 

OO04 1800 RG ま も 180O 

QO0 10OQO さき QBDOO1a8 INIT  :LEAX BIOUST.FC sSET BIHS TRaF 
OOO6 1804 9FDF STX まま DF 

QO07 106 BEQO703 LDX 拉 ま 070 ミ sSET ENTURY TaABLE 
OOOB 1 ヨ 09 ECB1 STBL ssEDDI テキ 
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リス ト 1 








0009 
OOO 
00QH 
OOOC 
QQ00D 
OO00E 
OO0F 
0010 
001 1 
001 
001 
0014 
0015 
001 6 
001 ア 
0018 
0019 
OO1 人 n 
001 昌 
001C 
9001D 
001E 
0O01F 
00SQO 
OO0S1 
002G 
002S う 
00S 人 4 
OO25 
OO0S ら 6 
0027 
002 昌 
OO029 
OO02R 
OO02B 
002 ビ 
OO2D 
QO2E 
002F 
0030 
O0 さ 1 
0032 
OO ささ 
003 人 4 
0035 
0036 
003 ア 
90038 
0039 
00 さ 谷 
003 量 
003C 
003D 
O003E 
00 さ F 
O040 
0041 
0042 
004 さ 
00444 
004 
O046 
004 ア 
O04 昌 
Q049 
004 全 
004B 
O04C 
004D 
OO04E 
OO4F 
-O05O 
0051 
O052 
005 さ 
0054 
0055 
O056 
005 ア 
0058 
0059 
O05a 
O05H 
O05 ビ 
005D 
O05E 
005F 


18OH 
1 ヨ OD 
1 ヨ 0OF 
1813 
116 
181a 
1 ヨ 1D 
181E 
181E 
181E 
181E 
12O 
122 
1824 
1 ヨ 26 
128 
1 ヨ 2A 
182C 
1 ヨ 2E 
183O 
1 ささ 
1833 
1 ヨ 33 
1 ささ 
1835 
13 
183 人 Q 
183D 
13F 
142 


1844" 


1844 
1844 
144 
1846 
184 
184 ビ 
1850 
1852 
1852 
1854 
185 
185Q 
185E 
18S5E 
1860 
1862 
1864 
166 
1869 
186 月 
186D 
186F 
1871 
1873 
1 ヨ 76 
17 
1879 
187Aa 
187B 
187C 
1 ヨ 7D 
187E 
187F 
18 ヨ QO 
1881 
1 
1885 
1887 
1889 
188C 
1 ヨ 8E 
1890 
1893 
195 ロ 
1897 
1 ヨ 99 
189 代 
1 ヨ 9 ビ 
189E 
188a0 
182 
1 ヨ a4 
1 ヨ ^55 
18a7 
18a 人 an 
18aC 


26F ビ 

さき 01E 

さ 1DOQOBF 
1OaAF81 

さ 18DOQODF 
1OaFB4 

さ 9 


さ 47F 
E684 
C104 
27OD 
C107 
271a 
106 
る 2724 
さ 57F 
7EF2D8 


C640 
F7FDOC 
6FBO 
BCFCOO 
ぞ ご 6F9 
7FFDOC 
さ 5FF 


C6 ヨ 0 
E78DOO4C 
C6CO 
E78DOO48 
200 ビ 


C6CO 
E7BDOOS3E 
C6 ヨ 0 
E78DOO さ 3A 


EEO2 
ECO6 
BD4^a 
ECO4 

C さ 0001 
8D43 
ECO4 
E306 
BD3D 
ECO4 
1QOAEQ6 
3412 
5 

4 

58 

49 

5 

49 

58 

4 

に に 】 

人 4 
CSBOOO 
68EO 
40 さ 
CE34000 
1FO1 
C640 
F7FDOC 
C6SO 
「21 ご I に 19) 
7CO 
5a 
26F 

さ 13F 
6F ユ 

さ 3510 
さき 5O1 
4F 

人 701 
EZFDOC 
1 ひ ビ FE 
35EE 


ENE STBL 
LEAX -@。X 
LEAY BUBO。PC 
BTY 。。X++ 
LEAY BUB1 、PC 
STY .、X 
RTS 

BIDS TRAP 


H 
BIHST :PBHS CC。A,B。DP。X。Y。U 


LDB  』X jiBET REG NOD. 
CHPB #4 iCELEAR BUBR 
BE  CLRB 
CMPH #7 :READ BUBR 
BED REGDE 
CHF 昌 提 6 iMRITE BUBR 
BEG MRITBE 
PULS CC』。A。B。DP。X。Y。U 
JIMIP  $FSD j BIOS 

: CLEAR BUBR 

CLRE  :LDH 拉 ゆ 40 : Ra 
STB  $FDOC 


LUOPC :CLR  』X+ 
CMPX #$FCOO 
BNE LOOPFC 
CLR  *FDOC : RON 
PULB CC、A、B。DP、X。Y、U。PC 


READ MRITE BUBR 


ーー 


EQDB :LDB  #$B0 :iSET READ MODE 
STB LOP1+1 FC 
LDB 提 ま CO 


STB VSTAa+1 。 FC 
ER  TRRaNSF 

5 

MRITB :LDB 揚 和 $CO 
STB LOOP1+1 PC 
LDB  #$ ヨ 0 
STB VSTa+1 。PC 


sSET MRITE MODE 


TRANSF:LDU 2 
LDD 6 
BSR 
LDD 4。X 
DDD # ま OOO1 
BSR ERCHE 
LDD 4。X 
ADDD 6,X 
BSR ERCHE 
LDD 4,。X :FAGE ADDRESS 
LDY 6,X :FABE CDUNTS 
FSHS AX 
LSLE : D* さ っ 
ROLAa 
LSLB 
ROLA 
LSLB 
ROLA 
LBLE 
ROLA 
LSLB 
ROLA 
ADDD # ま BOO0O 
LSL 8+ 
ECC NEXT 
ADDD #$400O : UNIT1= ま COOOーー$FEFF 
NEXT  :TFR D.X 
LDB 40 : RA 
STE  *FDOC 
LOOPO :LDB  # ミ 2 :1 FaBE 
LOOP1 :LDA  .X+ ュ (、U+) 
VSTA  :STA  。』U+ :(、X+) 
-DECB 
BNE LOOF1 
LEAY -1.Y 
ENE LOOFO 
FUL X 
FULS CC 
CLRA 
BTA 1、X : CLEAR ERR 
STA  *$FDOC : RDH 
ANDC ##$FE : CLEAR ERRDR FLAG 
FULS 。B、DF。X。Y。U。FC 


X : BUFFER aDDRESS 
X iCUUNTS 
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リス ト 1 





0060 
Q061 
006 
006 さ 
O064 
QO6 品 
O066 
006 ア 7 
0068 
Q065 
0069 
Q0G6H 
O06 ビ 
OO6D 
O06E 
OO06F 
007O 
Q071 
0072 
007 ミ 
0074 
007 ロ 
OO76 
0077 
QO078 
0079 
Q07 人 a 
007H 
007C 
007D 
O007E 
007F 
O08B0 
00 日 1 
0082 
00 日 さ 
O04 
00855 
OO8 ヨ 6 
00 昌 7 
0088 
00 ヨ 9 
OOBA 
008H 
008C 


18QE 
1 ヨ E 
18RE 
18E 
18BO 
18HS 
18B4 
1 ヨ H ら 6 
18EB 
18BC 
1EE 
1BF 
18 ビ 3 
1 ビ 5 
1C6 
1C8 
18C 人 a 
1 ヨ CC 
18CE 
1 ヨ DO 
18D2 
1 ヨ D2 
18D2 
18D 
1 ヨ D6 
1 ヨ D 
1D ム Q 
1 ヨ DC 
18DE 
1EO 
18E2 
1 ヨ E4 
1E5 
1 ヨ E フ 
1 ヨ F 
18FD 
1 ヨ FF 
1901 
1903 
190 
1907 
1909 
190H 
190C 
190E 


47F 
1FO2 
604 
58O 
2707 
108CO1EO 
2208 

さ 9 
108BCO3EQ 
2201 

3 ヶ 

35540 
3501 
B62 さ 
7O01 

1 人 AO1 
355F ビ 


2542 き 0 
ECEE 
EDBO 
EE ミ 4 
EEC 
EEFF 
EFOB 
EF3Z 
00 
FCOO 


42554231 
ECBE 
EDBO 
EE3 人 4 
EEAC 

区 EEF 
EFOB 
EF37 

00 

FC2O 


ERRHR CHECE 
RCHR' : AND 半生 7F 
TFR  D.Y 
LDQA 4。X sTEST DEV。 NO. 
BITR # 邊 BO 
EE CEUBGO 
CMPY 持 $O1EO i 4 ヨ 0 
EHT ERR 
RT5 
CBUBO :CMPY 韻 ま 03EO zz アス 
~ BHI ERR 
RT 
ERR sFULS U 
PULS CC 
LDR 音 3 紀 sFQAGE ERROR CDE 
BTA 1。X 
RCC 半 $O1 iSET ERROR FLAG 
FULG A。B。DP』X。Y。U,PC 


mr 


ENTHRY TaBLE 


ji 

5 

EUBO _ 』iFEE  /BUEO/ 
FDE  $ECEE 
FDB  $EDEO 
FDE  $ ぉ EE34 
FDE  $EEAC 
FDH も EEFF 
FDE  $EFOH 
FDE  $EF37 
FCE も 00 
FDE  $FCOO 
RMB 1 昌 

BUB1  :FCC  /BUB1/ 
FDB  $ECBE 
FDB も EDEO 
FDE EE さ 4 
FDE  * ま EEAC 
FDE 中 EEFF 
FDB  $EFOB 
FDE 中 EF コ ア 
FCB  $00 
FDB FC2O 
RMB 19 





IL ビタ" ンプ (参考 ) EE 





10 DINM aZ(15) 


20 。 FR 1=O TO 991 


さ 3O BUBRO。 1 。 AX : BUBRO。 1 。 人 
40 RD=C+T※ さ 2 :PRTNT HEX$(AD)"  " ュ 


5O FOR J=O TO 15 


60 
70 
0 N 


FRINT _ RIGHT$("Q0O"+HEX 生 (人 Z (J) ) 。4) " 1 
TF =7 THEN PRINT iFPRINT " 1 


EXT J 


590 FOUR =1 TO 32 
F ま =MTD も ( 介 ま 。。 1 ) 


100 
110 
120 _N 
13O P 
140 NE 


IF _D:32 AND DX127 THEN FRINT F ま 』 ELSE PRINT "。"』 


EXT J 
RINT 
IL【 


:C=&HBO0O 





* 


: D=ABC (F$*) 





リス ト 2 ROM 版 $F511--$F5C7 に 書き 込 す 











OOO1 OO00O : RAM FILE (RM) 

QOOS OOoO ュ 。 ' 日 き .1.22 BY NM.MATANREE 

Ooo さ Oooo 1 

OOO4 1811 DRB  *111 

OOO5 1811 さ 1BC22 LEAY <CLEARP 。 FC LOAD CLEAR FROG. 
OOO6 114 60 LDA 

OOO7 116 EEQ3 LOOPTC:LDU  、--Y 

OOQ 昌 11 さ 440 FSH U 

OO09 181A 4a DECA 

OOO 11B 26F9 BNE LUOFTC 

OOOB 1B1D BEBOOO LDX 半 和 BOOO 

OOOC 12O aDE4 JSBR  , : CLEAR BUBR 
OOOD 1822 32EB1O0 LEAB 16.8 RESTURE STACE 
OOOE 12 さり RTS 

OOOF 1826 1 

OO10 1So Ce40 LDE 部 40 : Ra 

OO11 12B D70C BTB < 還 OC 

0O12 12 6FBO LOOFC :CLR  』X+ 

OO13 182C BCFCOO PMPX 半 FDOO 

OO14 12F 26F9 ENE LO ロ FC 
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リス ト 2 
0015 1831 4F CLRA 
9016 さ < STR 還 0 : RDN 
O017 1834 RT5 
O01 昌 1 ヨ 35 OO9 FCB OO 
OO19 1836 CLEARF:RMB 1 
OO1Q 13 ア 日 
OO1E 137 : DDRESS CHECK 
O01C 13 フ 日 
O01D 1836 DRB も 183 ら 6 
OO1E 16 47F DCHE : 人 ND 人 Q 韻 ま 7F 
OO1F 13 1FOS TYPRe 記 DSV 
QOS2O 13 604 LDA 4。X sTEST DEV. NH. 
O0S1 183C 858O BITQ #$ ヨ 0 
O022 13E 2707 EE CEUBEO 
O0S う 3 1840 108CO1EO CMPY 拉 ま 01EO i 480 
OO024 144 22O 昌 EHT ERR 
O025 1846 3 RTS 
OOS6 147 108BCOSEO CBUBO :CMPY 拉 凶 Q03EO 992 
O027 184B 2201 BHI ERR 
OO2B 1 ヨ 4D 3 RTS 
OO29 184E さ 2EB1 ERR :LEAS 24,.5 
QOS 181 62 さ LDR  #35 紀 
OOSB 13 39 RTS 
OO2C 154 H 
OOSD 1854 ェ R/M BUBR 
OOSE 1854 日 
OO2SF 1857 RG も 1857 
0030 157 さ 18C6D LEAY ミ TRANP 。 FC sLOaD TRANS. FROG・- 
O031 15Q 60B LDR  #11 
0032 1 ヨ 5C EEA3 も 人 BEP 和 TsEDU デーY 
0033 1B5E さ 440 PSHS U 
0034 160 4a DECA 
O035 161 26F9 BNE LOOPT 
1 ヨ 63 E68 ヨ 4 LDB  。X sTEST R/M 
1 ヨ 65 C10Z CMPB #7 
167 270 BE LDR s REQD 
1869 C6CO LDB  # ま CO sMRITE 
16H EZ6 ア に 1: 還 之 件 に ) 
186D C68O LDH  #$BO 
1 ヨ 6F EZ6 に に 二 語 2 に ) 
1871 ECO4 LDR sLDD 4.X sTEST ADDRESS 
1 ロ 73 C30001 DDD 柱 可 O0O1 
1876 8BDBE BSR DCHE: 
1 ヨ 7_ ECO6 LDD 6。X 
187Q BDBA BSR RaDCHE 
1 ヨ 87C_ EC04 LDD 4.X 
1 ヨコ 7E E306 ADDD ら 6。X 
Q044 18EO _BDE4 BSR DCHF 
O04 18B2 EEO2 LDU 2。X s BUFFER QADDRESS 
0046 14 ECO4 LDD 4。X s FABE QADDRESS 
0047 18 ヨ 6 1O8EO6 に DX . ら 35X sFQGE CUUNTS 
QO4 ロ 19 ミ さ 40 人 8 FSHS aa 
O049 18BBB 58 LSLBE ェ DX32 
OO4R 18 ヨ BC 45 ROLa 
OO4E 188D 58 LSLBE 
QQ4C 18BE 45 RHLA 
OO4D 18BF 58 LSLB 
OO4E 1 ヨ 90 49 ROL 
O04F 1891 58 LSLB 
0050 192 49 ROLA 
O051 1893 58 LSLBH 
OO52 。 1894 4 ROLA 
005 さ 3 。 1895 68BEO LSE 。 。』8+ 
0054 1897 240E ECC  BO 
OO0555 1899 7DFFFO RST。。 生 EFFO 
00 ヨ 6 19 _ 2 フ ア 05 BE DFRT 
0057 189E BBFFFO DDQ ま FFFO 
QOS5 181 2O06 BR EXE ビ 
O059 13 BCO DFRT  :QDDQ #$CO 
OO05Q 15 SOO2 BR _ EXEC ビ 
O05B 18a7 8B8O EO : DD # ま BO 
O05C 1 ヨ 889 1FO1 EXEC  sTFR DX 
O05D 188B JSR  。5 sSTQACEK PROB. 
OO5E 1aD LE 22。 s RESTURE STACK 
O05F 18BO - RTS 
GOO6O 18B1 H 
0061 18B1 ュ : STaACE PRUGRAN 
0062 18B1 
Q06 さ 。 18B1 LDB 持 ま 40 i Ra 
O064 18B3 STB まま 0 ビ 
Q06 ロ 18E5 LOUFRO:LDE さる s1 FQGE 
0066 18E フ 7 LOFR1:LDR  』X+ 5 (』U す ) 
QO67 18E9 STa  。U+ 3 (。X+) 
O068 18BB DECE 
QO069 18BC ENE LUFR1 
O06 1BE 3 に ER ー3Y 
QO6H 18CO BNE LUFRO 村 | 
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リス ト 2 
OO6C 18C2 4F CLRA 
QO6D 18C3 970 ビ BT 評 生 0 ビ s RIH1 
O06E 18C5 3 RTS 
OO6F 18C6 0O FCEB OO 
O07O 18C7 TRANF _:RMB 1 





に 11 ヒダ ンプ 侯 ] 55 








RUN 
BOOO 64F 4C30 3 さ 030 さ O30 QOSEO_OQOE QOOO_O00O 

O000 OOOO OO00 OO00 OOQ0O 0000 O000O 0900 VOLOOO000。 に エエ よ ュ ュー エーーー トト トー トト トト ーーーー・ 
OSO 4455 4D5O 422O 2O2O 0041 OOOD 1 ヨ 800 OO0QO 

O000 OOO0_ OOOO_ OOOO OO000 OOOO_ OOOO OO0O DUMFB. . ・ - スス ニス ェ デース ェ デス メス CRE 


040  QDS1 30SBO 2044 494D SO41 252 ヨ さ 13 ロ 2920 

さき 4 さ 3D26 48 さ ヨ 3 さ O3 さ O 3 さ Q0OD 3230 SO2SO 464F .10..DIM、aAX(155) 、 : ビ =SHBOO0、 SO . FU 
060 52SO 493D さ 020 44F 2O さ 9 3 さ 931 OD さ さ さ O020 

202O 4255 4252 さ O2SC 492C 4125 2O3Q 4255 R.1=O. TO. 991 . さ 0. . . BUBRO。 1 。 ZZ. = BU 
BQ ヨ 0 4252 302C 492C 4124 QOD34 さ 02SO SO2O 4144 

3D43 2B49 2A3 さ 3220 さ Q5O 5249 4E54 204 BRO。 1 、 人 も. 40。.、 QD= ビ + エ ※ さ る 。: FRTINT 日 
BOA0 455B 242B 4144 2 の 22 2O2O 223B ODS5 さ 020 

SOSO 464F 522O 4Q3D さ O2O 44F 2O31 さ 50D EX$(AD)"、."』。5O. . . FOR .J ゴ =O0. TD. 1 王 。 
BOCO 3630 2OSO 2O2O OS 494E 542O 5249 474 日 

424 2B2S さ O3O さ O22 2B4B 455B 24SB 41255 60.、。.FRINT、RIGHT も ("OO00"+HEX ま (人 
BOEO 2B4A 2929 2C さ 4 2922 2O22 さ BOD さ 7 さ 0 2020 

SO2O 4946 SO4A さ D さ 7 2054 4845 4ESO 5O52 (J) ) 。4)"、"』。70。。、、TF、J=7. THEN. FR 
100 494E 420 3Q5O 5249 4E54 2022 2O20 2020 

2O20 223B OD さ B さ O2O 2O2O 4E45 5854 2O4Q INT.:FRINT."、、。。.."』.B0.. .NEXT.J 

















22 一 1 計算 = デ ロ グラ ム サン プル 印字 


3 979  Q0sO0s OO 


425 さ 2956 ら 1 1 7 さ 079 さ 2921 昌 2592 昌 9710264 さ 1 


田 関 牧人 


I/O'83 年 3 月 号 に 最大 系 数 の こと が , 載っ て いま し た が 
28 番 め の メ ル セ ン ヌ 氷 数 で ある , 286243 一 1(25962 桁 ) が "82 年 の Co 語 つ > で レ (に: ま ッ ーーーー 
暮 に 発見 され た と いう の を 知っ た の で , その 値 を 計算 で きる 11O FOR 【=%&HF9O TO %HFFF:READ QA* ま PURE T、VAL("SMH"+A ま ) NEXT T 


120 INPUT NsIF N<1 THEN 120 コ 9 
プロ グラ ム を 作り まし た 13QO POKE &HFF4。FIX (NZ/256^2) : =FTX(N-FIX(N/256^2) *256^ ら ) 
2 ら 140 * っ :FUKE %HFF6、MーFTX (M/256) *2556 
この プロ グラ ム は 2" 一 1 を FM- 8 で 計算 する も の で , RUN 15o : Oc EXEC&HF90: T ま =T TIME も 

+PEEK (%HFFB ) : ビニ ヨー1 +&H1O00O 


させ て ぁ ヵ を 入力 する と , 計算 結果 と 桁 数 と 計算 時 間 を プリ ン IHSHTR を 4PEERE37GCLENHW9 ご Lt 
タ に 出力 し ます . 86432 を 入力 する と 7 時間 53 分 後に 出力 し 22 に 1、 こら の 207 


19o 2 -1 
ます (3 月 号 の 24497 一 1 は 2 時 間 6 分 ) 200 PRTINT# 1:PRINT## 1、RIGHT ま も (" "tRIGHT も (D$ を 。 ビ ) 、 

8 210 MHILE E=>&H1OOO 

ワー ク ・ エ リア は 名 H1000 か ら ヵ に 比例 し て 広がり , そ 220 .D*e8TRSKPEEKtE) の 
R ティ 了 23O FRINT# 1。RIGHT*("O"TRTG 1 ー-1).2) 1 
の バイ ト 数 は 実行 後 &HFFA,B に 入っ て いま す . 0 2 所 生れ 0IERND 

250 PRTNT# 1:PRTNT# 1:FRINT# 1:CLOSE 1: 

260 DATA BE、OO。01、EF。OF Fa。B6、01 、HZ、10、00。 

っ 70 DATR OF、FZ、FC、OF 、FA、FD 、OF 、F 日 、A6、a4 、 

2BO DATA OF、F7。B1。64。2 昌 。05。7C、OF。F7。 

29O DATA F さ 、OF、F 日 、26、EO、C6、01 、F1。0 

OO DATA BF、OF、FA。E7。A4、CC、FF ,FF、F さ 

さ 10 DaTA B6、QF、F4、2 フ 7Q、COF 、F4、BE 

ュ 20 DaTA 、oo、39、0O、0O、00、00、00。 





mm 大 率 麗 を 求 の る プロ グ ラ /、 EPR 
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8 
! 
! 


FM-8 の 専用 プリ ンタ て 漢字 を 印刷 する の に , ハー ド 
上 ceoDo2N Cu 四 と 9 

人 ゆ 非 常に 遅い . 

@ 用 紙 い っ ぱい に 使え な い . 
0 コピ ー と コピ ー の 間 に 間 隔 が あく . 

JC つの 6 あり 5 選 の 5 うに いき まで ゼ ん 』 そこ で 
漢字 を 印刷 する プロ グラ ム を 作っ て み ま し た -. 


ーー で ーーー メ ーー つつ ーー<ー つ ーー つっ ーー っ 





ーー 





い < っ ゃ で いつ いつ <ー つ ひと ー つ ーー 


人 届 


本 プロ グラ ム は BASIC か ら マ シン 語 を 呼ん で 印刷 する も 
の で , 次 の よう な 特徴 を 持っ て いま す . 
⑩ ボ ポジション ・ イ インディ ペ ン デ ント で ある . 
@ 漢 字 の 角度 を 4 方 向 に 指定 で き , 縦 書 き が で きる . 
@ 1 行 分 の 漢字 コー ド を 配列 に 納め , マシ ン 語 に 引き 渡す . 
⑳ サ ブ プルー チン で あり , ワー ド ・ プ ロ セ モッ サ へ の 移植 お よ 
び 漢 字 処理 プロ グラ ム の 開発 な ど が 容易 に で きる . 


まず , CLEAR &H7CEE を 実行 し , マシ ン 語 を 入力 し 
て テー ププ その他 の デバ イス に ファ イル 名 “KPRINT" で SA 
VEM し て お きま す . BASIC の 方 は . サン プル ・ プ ログ ラム 
の よう に イニ シャ ライ ズ し て お きま す (配列 名 は "K "で な 
く て も よい ). マシ ン 語 が 入力 済み の 場合 は LOADM 命令 
は 不要 で す . 

変数 K(0) に は 角度 コー ド 0 一 3 と , 漢字 16 ド ッ ト に 対 
する 漢字 間 の 縦横 間隔 0 一 15 ド ッ ト を , 








iT 汗 寺 基 湊 田 
| 其 活 僅 講 申 
OECU EDPS 


PT 








OECU EDPS 平井 正実 








K(0) = (角度 コー ド ) 256 十 ( 綻 間隔 ) メ 16 十 ( 横 問 隔 ) | 





の よう に 納め ます . 

角度 コー ド は SYMBOL 文 と 同じ で す . そし て K(⑪) 一 K 
(60) に 1 行 分 の 漢字 コー ド を 代入 し , K=FNK(0) で プリ 
ンタ に 打ち 出さ れ ま す (ここ で の 反 は ダミ ー で あり , 何で 
も よい ). 

な お , 1 行 の 廊 字 数 は 横 の 間隔 に よっ て 表 1 に 示す と お 
り で す . 間隔 は 通常 綻 ・ 横 と も に 4 ドッ ト く らい が よい で 
し ょ う . ライ ン 印 刷 済 み の 用 紙 を 使う 場合 。 縦 間隔 は 8 ド 
ッ ト に し て くだ さい . 

マシ ン 語 実行 後 , 1 行 の 紙 送り 量 は ( 縦 間隔 十 8) ド ッ ト 
に セッ ト さ れ て いる の で , 漢字 印刷 の あと に 普通 文字 を 印 
刷 す る 場合 ,、 PRINT 半 1, CHR$(27) 二 "27 を 実行 し て 紙 
送り 量 を 12 ド ッ ト に 戻し て お く 〈 く 必要 が あり ます . 

な お , マシ ン 語 実行 に よっ て 配列 の 内 容 は 変化 し ませ ん . 
また DISK BASIC の 場合 , マシ ン 語 は &H6D00 か ら 入 力 
し で くだ さい 。 

この プロ グラ ム は ビッ ト ・ イ メー ジ を 使っ て 無理 に 漢字 
を プリ ント し て いる た め , 字 が 大 きい , 遅い と いう 欠点 が 
あり ます が , これ を 解決 する に は 漢字 デリ ンタ を 利用 する 
以外 、。 や む を 得 な いで し ょ う . 


ーー ブ 回 グ ヲ ム ⑳ 肢 明り 
倍 密 ビッ ト ・ イ メー ジ は 横 960 ド ッ ト あ る の で , 1 行 に は 
960+ (16 十 横 間 隔 ) 娘 字 の 漢字 が 印刷 可能 に な り ま す . 漢 
字 は 上 下 8 ドット ずつ 2 度 に 分 け て 印刷 し , 縦 間 隔 分 紙 送 
り し て 間際 を あけ ます . 
BIOS を 使っ て 取り 出し た 漢字 の パタ ー ン ・ デ ー タ は 図 
3 の よう に 横 8 ドッ ト 分 が 左右 交互 に な っ て いま す . この 
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表 1 図 1 K(0) の 内 容 


3 BIOS か ら の 漢字 デー タ 





間隔 | 訪 字 数 





























ANGLE0 ANGLE 1 











LSB 





デー タ を 角度 コー ド 別 に 図 4 の よう に ビッ ト ・ イ メー ジ 用 
2 テク 5 瑞生 30 ング に 送り (ます 、 

デー タ を マシ ン 語 に 引き 渡す の に , ある アド レス に POKE 
し て いく 方 法 で は 手間 と 時 間 が か か る た め , 配列 に 納め る 
方 法 が 最も 能率 的 で す . USR 命 令 を 実行 する と X レ ジス タ 
が 変数 の 格納 アド レス を 示し ます が , 配列 の 場合 , 先頭 ア 
ドレ ス を 示し ませ ん . そこ で VARPTR 命 令 で 取り 出し た 配 
列 の 先頭 アド レス を USR 命 令 で マシ ン 語 に 引き 渡す の で す . 
そう する SN 0 放 M 2 バイト に 配列 の 先 
頭 ア ドレ ス を 納め る こと が で きま す ( 図 2). 


鉛 あ り 


私 は 大 阪 FM-8 ユ ー ザ ー ズ クラ ブ を 通じ て , 有 Z80 の マシ ン 
語 は 知っ て いて も 6809 は 知ら な いと いう 人 が 意外 と 多い の 
に は 敬 きま し た . 6809 は 命令 が 整っ て いて 使い 易く , 理解 
で きれ ば 素晴らし い CPU で ある こと が わか り ま す . 6809 

の 命令 は 60 個 の ニモ ニッ ク で 覚え られ る 範囲 に あり , し か 
も 組み 合わ せ は 1,500 命 令 ち もち あります. 有 Z80 の よう に 存在 す 
る つも り で 使っ て いた 命令 が アセ モン ブル し て みて 存在 し な 
いこ と が 初め て わか っ だ た , な ど と いう こと は な い の で す . 
FM-8 ユ ー ザ ー の 皆さん , 6809 を マス ター し よう / 決し て 





難し く は な い の で す . 

避 参 考 文献 

1) F-BASIC 文 法 書 " : 富士 通 

2) “BIOS の 使い 方 " : イン ター フェ ー ス , "82 年 2 月 号 
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ANGLE2 


り 60 16 ド ッ ト 
1 56 glelglwlel TLITIII BUF1+0 BUF1+ 1 
2 53 ペニー ノ ペ ーーー モニ テニ バム ニニ ーー ニニ テニ ン +2 9 
3 50 角度 縦 問 隔 横 間隔 2 は 
4 48 +8 +9 
5 45 +10 二 11 
6 43 図 2 KUSR(VARPTR[ K(0)] ) 実行 時 電導 8 
の 本 +16 +17 
8 40 X 18 +19 
9 38 +20 Pi 
10 36 K(0) の 格納 アド レス 計 22 8 
1 35 X+2)(X+3) 26 27 
12 84 絆 層 28 +2 
13 | 33 KO| 一 - ke 30 
14 32 2 MSB LSB MSB LSB 
L 15 30 | 
図 4 プリ ンタ 出力 用 に 変換 
LSB MSB BUF2+15 BUF2 MSB LSB 





ANGLE3 





図 5 


ジロ チ ャ ー 計 














RTS 





ナー プリ レー ュー プログ ラム 


』O 















44。46。』4 日 。0。 4 人 。 4 








は 0 ふ へ は まみ む め $ 
8O4( 
0Y マ 居 


計 W/ 衝 


ゃ ゅ ょ 
HPESP り 計り まく 
ま も $ は @$ ゅ @+ 
帰せ SW を す @ 和 


らら や て 





























IF K(O) > 


(COUDEAD) ミ エーーー 人 DR 世 (1 ) 


03FF THEN RETURN 


QRNBLE。HSFQCE 。 VSFACE SET 


(LOOF') ミーーーMST RIGBHT FUSITION 


IF LLCELEAR GOTO NULL 


5FIRST LODF SET 
ほそ する も も する 11 
3 SECDND LOOF SET 
:LF 1ZE。LFT SET 


=LOOF 


s ロ it mmag ら LPT SET 


10 "DaMO 1 
2SO_ CLEAR。 多 HZEFF LORDM"EFRTNT" 
さ O_ DEF INTA-Z』 DTME(6O) 
40 DEFUSR=&HZDOO』 DEFFNE( ド )=UGR (VaRFTR(E(O) ) ) 
50 FDR エ T=1TU4BgRERDR ま EE (1T) =HE4OO+TVRL (" 銘 昌 リ オ 全 和 ま ) NEXTI 
60 FURT=OTOUSE(O) モエ ※ 記 王 6 す 4 水 16 す 4 ュ ド デーFNE(O) giNEXTTI 
70 DaTA 22。 24。 26。 2 日 。 Ga。 0O。 は (6 た Ke ア 人 折 
B。4C。4D。4E。0。4F。52。55。58。5B( D。5E , 5F 。 60。61 。628。O。64 . 
ンプ ルル EH 字 | SF= っ ーー 
テー マ 6 ナ テ コ ーー っ jr 
あい うえ お け こ さ し す せ を た ち う て と な に 見 ね 0 
【 ィ と D 
刈 ら か 選 提 隻 析 マ お 月 0 つか 逢 昌 時 0 介 DU 導 旧 8 
5 ュ ュ っ 
MC % 衝 WW)12 さま は ター パ 4C2 イ 1 1W 革 9 
ヽ マー 
Se 才 交 す 昨 へ WT 作 で 半 合 市 証 WWUOT 見 自首 
|] 屈 アー セン プリ レ ・ リリ ス ト = 
00)1 6000O ョ 
OOO2 OOOO 5 EPRTINT 
0003 OO00G 5 
ooo4 7DoOO DRG 7DOO 
OO 。 7DOO_ REOS LDX 。 4X H 
OO06 。 7DO2S 30OS LEAX 2。X 
9 7DO4 QFBDOSSE STX CODEAD。FC 
7DOB EC1E LDD  -2。X 
7DOQ 1083Q40O CMF'D 拉 O40O 
7DOE 2501 BCS JaMP1 
7D1O 39 RT5 
7D11 7BDOS5O JaMF'1 :STQA NGLE。F ビ 日 
7D1 コ 1F98 TFR BB。 人 Q 
OOOE 7D17 選 40F RRNDE 提 串 OF 
OOOF 7D19 E7BDOS49 STB HSPACE,PC 
oO10 。 7D1D 44 LSRQ 
OO11 7DIE 44 LSRA 
001 人 2 。 7D1F 44 LSRR 
OO013 。 7D2O 44 LSRA 
OO14 7D21 人 Q7BDOS42 STQ VSPFACE。』FC 
@ 7D25 1BDOS91 LEAY MOZISU。FC 5 
7DS⑦ E605 LDE BY 
7D2B 3O1E LEAX -2。X 
7D2D 5 ASLE 
7D2E 1OQEB5 LOOP1 :LDY  B。X 
oo1a 7D ミ 1 2607 ENE JaMFS 
OO1B 7D33 5a DECE 
OO1C 7D34 5 DECE 
OO1D 7D355 26F7 BNE LOOF1 
OO1E ZD37 16OOF5 LBRA_NULL 
Go1F 7D3A 4 JAMFS :LSRE 
5 7D3E EZ7BDOS29 STBE LO ロロ P。FC 
OO21 7D3F 6FBDO2S CLR  UD。PC 
0 ZD4 さ BDO4 ESR JaMF さ 
7D45 63BDO2S2O COM  UD。FC 
7D49 ミネ OBDO22 晶 JaMP3 :LEAX RCB。FC 
7D4D B60E LDQ  #PCMD 
2D4F aa784 BTA  。X 
7D051 1BDOS1C LEAY CTRL,FC 
7D55 1ORFOS STY 2,。X 
7D5B CC1B41 LDD 拉 釧 1B41 
7DS5E EDA4 STD 。Y 
7D5D B608 LDQ  # 昌 
7D5F 6D8DOSO6 TST  UD。PC 
7D63 SSZ704 BE JaMF4 
7D655 ABBDO1FE DDQ VSFACE。 PC 
7D69 AaA7 人 SS JaMF4 sSTA 2S。Y 
7ZD6E_ CCOOO ミ LDD  # さ 
7D6E EDQ4 STD 4。X 
7D7O BDFSD JSR BIOS 
7D7 ミ OBDO1FE LEAX RCB。FC 
7D77 6QE LDR  #FCMD 
7D79 AaA784 STQA  』X 











101 


&O 


漢字 印刷 アセ ンプ ブル ・ リ スト 











Q0O36 7D7E 318DO1F2 
OO037 7D7F 1OAFOS 
003 日 7DB2 CCEOOO4 
OO39 7D85 EDO4 
OO3Q 7D87 CC1B4C ビ 
OO3B 7DBQ EDQ4 
QO3C 7D ヨ BC 6BDO1D8 
OO3D 。 7D9O CE610 
OO3E 7D92 EEBBDO1DO 
OO3F 7D96 3D 

OO040 7D97 1E9 
OO41 7D99 ED22 
OO42 7DB BDF2D 
OO43 7D9E 6FBDO1C8 
OO044 272DQS REBDO1BD 
OO045 7DQ6 68DO1CO 
GO46 7DQaQ 4 昌 

QO47 7DaQB 1OQEB6 
OO4B 7DQE 72F 
OO49 7DBO 3 さ OBDO1C1 
004Q 7DE4 616 
OO4B 7DB6 7B4 
OO4C 7DEBB 10QFO4 
OO4D 7DEB 3 さ 18BDO1BC 
OO4E 7DBF 10QFOS 
QO4F 7DC2S BEBDFSDB 
OO05O 。 7DCG_ 3OBCS 人 
Q051 7DCB 3410 
QOS5S 7DCn QR6BDO197 
0053 。 7DCE 1O27O0084 
0O054 。 7DDS 4 

OO55 。 7DD さ 1027OOEF 
00586 7DD7 4 

OO57 7DD ヨ 1027010D 
005B 7DDC 160169Q 
OO59 7DDF 3O08DO1B ヨ 
OOSn 7DE さ 61QO 
OOSB 7DE5 6F8O 
QOSBSC 7DE7 4 

OOS5D 7DEB 2oFB 
OOSE 7DER 3OBDO187 
OOSF 7DEE 8B60E 
0060 ZDFO aa7 ヨ 4 
OO061 7DFS きき 18DO105 
006 人 8 7DF6 10QFOS 
0063 。 7DF9 C61O 
O064 ZDFE EBBDO167 
OO065 7ZDFF 4F 

QO066 。 7E00_ EDO4 
O067 。 7EQOS BDFSEDB 
OO068 7Z7EQO5 6CBDO161 
0069 7E09 a6BDO15D 
O06Q 7EOD 1BDO157 
OO6B 7E11 26BF 
O06C 7E1 さ さ 18DO15^n 
OO6D 7E17 860a 
OO6E 7E19 aa7a4 
OO6F 7E1B SOBDO156 
O070  ZE1F 6QE 
OO71 7EE1 784 
007 人 8 7ES さ 10RFOS 
0073 。 7E26 CCEOOO1 
O074 。 7ES9 EDO4 
QO75 。 7E2B BDF2DB 
0076 7E2E ささ 

OO77 7ESF 

007 ヨ 7EEF 

0079 7ESF 

007Q 7ZESF さ 1BDO1SE 
QO7B 7E さ ミ CC1E41 
QO7C 7E さ 6 EDQ4 
OO7D 7E3 さ 8 Q68BDO12B 
007E 7E3 さ C BB1O 
QO7F 7E3E C6O0Q 
OOBO 7E4O ED22 
OOB1 7E42 さ OBDO12F 
OOBS 7E46 6OE 
OOB3 7E48 Q78 ヨ 4 
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LERY 
STY 
LDD 
STD 
LDD 
STD 
LDR 
LDB 
DDB 
MUL 
EX は 
STD 
JSR 
CLR 
sgLDX 
LDAa 
QSL 
LDY 
EEG 
LEAX 
LDQ 
STA 
STY 
LEAY 
STY 
JSR 
LEAX 
FSHS 


NEXT 


CLEAR :LEAX 


LUUFE iCLR 


STY 
LDD 
STD 
JSR 
RTS 


ラー 


ULL  sLEAY 
LDD 
STD 
LDA 
DDa 
LDE 
STD 
LEAX 
LDR 
STA 


CTRL。FC 
し] 


HSPACE 。 FC 


人 a。 昌 
2。Y 

BIO0S 
COUNT 。FC 
CODEAD 。 FC 
COUNT 。FC 


a。X 
CLEAR 
RCB。PC 
#ECMD 

4 

4。X 

BUF1 、FC 
2 

BIOS 

ゞ RETURN。FC 
X 

NBLE 。FC 
QNBLEO 


NGLE 1 


) NGBLES 


QNBLE さ 
BUFS。FC 
共 16 
s メオ 


LOOF2 
RCB。FC 
#FCMD 

隊 
BUFS。FC 
9 ( 

共 16 
HSPACE 。 FC 


SPX 

BI0S 
COUNT。FC 
COUNT 。FC 
LOO ロ P 。 FC 
NEXT 
CTRL 、 FC 
韻 Oa 

、Y 
RCB。FC 
#FCMD 

< 

2。X 

1 

4。X 

BIDS 


SUE RODUT INE 


CTRL 。 PC 
韻 事 1B41 

、Y 
VSPQCE 。 PC 
16 

半 ま ON 

の 3W 
RCB。PC 
#FCMD 

夫 


iCEDUNTER CLEAR 
5 ミド (a) CUDE REaD 


s IF CUDE=O THEN BUF CLR 
sE FATTERN DaT INFUT 


sRETURN DRS _FUSH 


si NBLE CHANGE SUB CaLL 


si BUF CLEAR 


sCHANGBE DaATA。HSPACE  LFT ロ UT 


5s CUUNTER INCREMENT 
si IF CUUNT=LOUF THEN NEXT 


sLFT LF 


sSECEUND LOUUF OR BASIC 


sLPT LF (16+VSFACE dt ) 
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漢字 印刷 アセ ンプ ル ・ リ スト 











OO0 ヨ 4 。 7E4Q 1OAFOS STY 2』X 

OO085。 7E4D CCOOO4 LDD #4 

O0 ヨ 6 。 7E5O_ EDO4 STD 4。』X 

OO87 7E52 BDF2DB JSBR BIO5S 

008 昌 7E55 3 RT15 i BABI に RETURN 
OO89 7E56 308DO141 RNGBLEOsLEAX BUFS。FC iRNBLE 0O CHANGE (BUF2 マ ーーーBUF 1 ) 
O08A 7ESR_ AFBDO10F STX TH。PC 

OOBB 7ESE 3O8DO1 19 LEAX BUF1。FC 

00 ヨ BC 7E6 る 2 6D8DO10 ミ TST  UD。PC 

OOBD 7E66 人 270 ミ BEG JalP ロ 

OOBE 7ZE68 308810 LEAX 16。』X 

OOBF 7E6B AFBDOOFC JaMF5 :STX FROM。FC 

OO090 7E6F BD14 BSR CHANGO 

O091 7E71 QAEBDOOF ヨ LDX TOU。PC 

0092 7E7 さ 008 LERX 日 。X 

O093 7E77 AFBDOOF2 STX TO。FC 

0094 7E7EB AEBDOOEC LDX FRM。 FC 

O09 ロ 7E7F 3001 LEAX 1。X 

O096 7E ヨ 1 AFBDOOE6 STX FROM。 PC 

0097 7EB5 6FBDOOE7 CHQNBOsCLR YYCT。FC 


O09 ロ 7EB9 6FBDOOES LOUF3 :CLR XXCT。FC 
0099 7EBD AEBDOODA LODF4 sgLDX FROM。PC 





OO09Q 7E91 68BDOODa LDQ  XCT。FC 
O09B 7E95 4 SLa 

OO0SC 7E96 686 LDQ aaX 

OO9D 7E9 E68DOOD4 LDB  YCT。PC 
OO9E 7E9C 2704 EEG JaMP6 
OO9F 7EE 4 LOOUP5 QSLA 

OOQO _ 7E5F 5Ra DECB 

OOA1 7EAO_ 26FC BNE LOUOFP5 
OOQS 7ERS 4 日 JaMF6 BL 

OOA さ 。 ER3 AEBDOOC6 LDX TO,FC 
OOQ4 7EQZ7 68BDOOC5 LDQ  YCT。』FC 
OO 7EAB 6986 ROL Aa。X 

OOa6 。 7EAD 6CBDOOBE INC XXCT。FC 
OOR7 7EE1 68DOOB LDQ  XCT。PC 
OOQB 7EB5 108 CMFA # 日 

OOA9 7EB7 26D4 BNE LOOPF4 
OOQQ 7ZEEB ウ 6CBDOOB マ INC _ YCT』FC 
OOQE 7EBD A68DOORaF LDaA  YCT。FC 
OOAC 7EC1 日 10 CMFQ # 日 

OOAD 7EC3 26C4 BNE LUDPS 
OOQE 7EC5 3 RTS 

OOQF 7EC6 う 31 ヨ DOOD1 NBLE1:LEAY BUFS。FC s QRNBLE 1 CHANGE 
OOBO 7ECA さ O8DOOAD LEaX BUF1。FC 
OOBE1 7ECE 6D8BDOO97 TST  UD。FC 
OOB2S 。 7EDE 人 260 BNE JaMP7 
OOB さ 。 7ED4 3001 LEAX 1。X 

OOB4 ZED6 610 JaQMP7 sLDR 昔 16 

OOB5 7EDB C60 晶 LOOF'6 :LDE # 昌 

OOB6 7ED 6884 LOOF7 gaBL  』X 

OOB7 7EDC 664 ROR  。』Y 

OOE 昌 7EDE 5a DECE 

OOB⑦ 7EDF 26F BNE LOOPZ 
OO0EBA 7ZEE1 さき OO LEAX 2』X 

OOBE 7EE 181 LEAY 1。』Y 

OOEC 7EE5 4Ra DECR 

OOBD 7EE6 6FO BNE LOOP6 
OOEE 7EEB 39 RTS 

OOEF 7EE9 308DOORE RNBLESsLERX BUFE。FC s NGBLE 全 CHRNGE 
O0CO _ 72EED AF ヨ BCZD STX <TOU。FC 
OOC1 7EFO 3O8DOO87 LEAX BUF1。FC 
OOCS2 。 7EF4 3001 LEAX 1。X 

OOC き 。 7EF6 6D8C7O TST < く UD。FC 
OOC4 7EF9 260 ミ BNE _ JaMP 
OO0C5 。 7EFB 3O881O LEAX 16。X 
OOC6 7EFE AFBC6 ム JaFMFB iBTX <FRUH。FC 
OOC7 。 7FO1 8D1O BSR CHANGS 
OOCB 7FO3 AEBC67Z LDX <TO。PC 
OOC9 7FQO6 300 晶 LEAX B』X 

OOCR 7FOB aaFBC6E STX <TO。FC 
OOCB 7FOB AEBC5D LDX FROM。 FC 
OOCC 。 7FOE 301F LERAX 1。』X 
OOCD 7F1O aFBC5B STX <FRON。 FC 
OOCE 7F1 ミ 6FBC5Ra CHQNG2ECLR YET。F ビ 
OOCF 7F16 6FBC56 LOOFB ksCLR XXCT。FC 
OODO 7F19 AEBC4F LOOP9 sLDX <FROH。 FC 





OoD1 7F1C a68C5O LDQ :XCT。FPC 
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漢字 印刷 アセ ンプ ブル ・ リ スト 











O0DE 
OOD 
OO0D4 
0OD5 
00D6 
00D7 
90D 晶 
OOD9 
OO0Da 
OODE 
OODC 
OODD) 
OODE 
OODF 
OOEO 
OOE 1 
OOE 
OOES 
00E4 
OOE5 
OOE6 
OOE7 
OO0E 昌 
DOE ウ 
OO0EQ 
OOEB 
OOEC 
OOED 
OOEE 
OOEF 
OOFO 
OOF 1 
OOF2 
OOF 3 
O0F 4 
OOF5 
OOF6 
00F フ 7 
OO0FB 
00F9 
OO0F 人 n 
OOFB 
OOFC 
00FD 
OOFE 
00FF 
6100 
0101 
0102 
010 マ 
0104 
0105 
) 

0106 
0107 
0108 
0109 
010a 
O10B 
010C 
010D 
010E 
010F 
0110 
9111 
01 1 
0113 
O114 
0115 
9116 
0117 
9118 
0119 
011 
O11B 
011C 





フ F1F 
7Fzo 
7FS2 
7F25 
フ F タ 7 
7FzB 
フ FS9 
7F2E 
7F2C 
フ FzF 
フ F32 
7F34 
フ F ミ 7 
7F3a 
7F さ C 
7F3E 
7F41 
7F44 
7F46 
7F48 
7F49 
7F4C 
フ F4F 
7F52 
7F55 
7F57 
フ F59 
7F5E 
7F5D 
7FSF 


7F6O : 
7F62 3 


ZF6 さ 
7F63 
7F6 き 
7F6 ミ 
7F6 き 
7F6 き 
7F6 計 
7F65 紀 
7F66 
ZF6Z 
7F68 
7F6 ツ 
ZF6^a 
7F6BE 
7F6D 
ZF6F 
7F7O 
ZFZ1 
7F75 
ZF7B 


ZFE 
7FaB 
ZFaD 
7ZFaF 
7FE1 
7FB ミ 
7FE5 
7FBZ 
7FB ウ 
7FB^ ム 
7FBB 
7FEC 
7FBD 
7FBE 
7FBEF 
7FCO 
7FC1 
7FC2 
7FC ミ 
7FC4 
7FC5 
7FC6 
7FCZ 





4 
6B6 
E68C4B 
2704 
44 

5a 
26FC 
44 
AEBCSE 
QA6BC3E 
6686 
6CBC3B 
6BC ミ 5 
B1o8 
26DE 
6CBCSF 
QA6BCSC 
B1o8 
26CE 

さ 9 

ミ 18C4F 
3OBCSC 
さ OBB2O 
6DBC14 
2 プ 702 


き OO1 


0000 
00 
OO 
OO 
OO 
OO 
OO 
OO0O 
OOOO 
00 
OO 


OOOO 
90900 
OOOQO 
OO0OO 
OOOO 
000O 
OOOO 
OO 
さき ビ 
3 日 
うら 


さる 


QSLa 
LDa 
LDBE 
EE 
LOOFP10:LSRa 
DECE 
ENE 
JaQMF9 sLSRQ 
LDX 
LDQ 
ROR 
TNC 
LDa 
CMPa 
ENE 
TNG 
LDa 
CHFRa 
BNE 
RTS 
NGBLE3 ょ LERY 
LEAX 
LEAX 
TS 
BEG 
LEAX 
JaAMF10sLDaQ 
LOOP1 1:LDB 
STE 
DECa 
ENE 
RTS 


iMORE QREA 


BInS 


:EGU 
FCHD  :iEGEU 
ECMD iiEGU 
CODEADFDB 
NBLE 』FCE 
HSPACE:FCE 
VSFACE FCE 
EEEP 。 5iFGBB 
UD sFCBH 
CUUNT :FCB 
FRONM  sFDE 
TO sFDE 
4 s FCB 


YCT :sFCB 
CTRL  :RIMB 
RCB : RB 
EUF1 iRMB 
BUF 呈 siRPMB 
FDB 
FDE 
FDB 
FDE 
FDE 
FDBE 
FDE 
FCE 
NOZTSUiFCBH 
FCE 
FCBE 
FCBE 
FCB 
FCE 
FCB 
FCBE 
FCB 
FCE 
FCE 
FCE 
FCB 
FC 


a。X 
YECT、FC 
JaMF9 


LOOF1O 


TO。FC 
<SYCT。FC 
Q。X 
<XCT。FC 
SXCT。FC 
間 日 
LOOF9 
<YCT,FC 
sYCT。FC 
# 日 
LOOFB 


SBUFS。FC 
SBUF 1 FC 
32。 X 
SUD。FC 
JaMP1O 
7 

昔 16 

ューーX 

*Y+ 


LOOF1 1 


60 


5 さき 
に 19) 
4 
4 
人 4 さ 
人 41 
全 O 


きら 6 
さら 
き 4 
ささ 





104 


iRNGBLE ミミ CHANGE 


ji BIUS STaRT ADRS 

jiBIOUS FRINTER CUNMAND 
jiBIOS ERNZ1I _ COMMAND 
5E(1) aDRS 

iQNBLE CODE 

s HSPACE SIZE 

svVBFACE 81ZE 

iMOST RIGHT FUSITION 

ュ ミ い DO0』。 コロ w ロ デビ ド 

5E(T) COUNTER (0 一 LOOPF) 


sLFT CUNTR ロ L CODE QRER 
5sFATTERN DaTA AREA(ERNZT INFUT 


iCHQNGE DATA AREA (LFT ロ UTPUT ) 
HSPACE DATA 


: HSPACE=Q 








0 


漢字 印刷 アセ ンプ ブル ・ リ スト 





O11D 7FCB 2O FCE 
0T1E EEB の 1E FCB 
Q11F 7FCa END 


FT 


s HSFACE=1 





7 ど -80 7 Y ど 7/7 


を 潜 字 プ ゾ ソン 夕 ど 。 / 認 








人 5 
! 『 漢 字 が 普通 の キャ ラク タ 
と 同じ 大 き さ で プリ ンタ に 印字 で きた ら 』 と 思っ て い 
| る 方 も 多い と 思い ます . MP-80K を 持っ て いる 人 は 別 
! 
! 
! 
! 





FM-8 を 使っ て いる 方 で , 


で す が …… 。 そこ で MB27401 も し く は MP-80 TYPE 
1 で も 普通 の キャ ラク タ と 同じ 大 き さ で 印字 で きる よ 
うに プロ グラ ム を 作っ て み ま し た . 


emm wm ーー ーー ーー | 


も , 


| 1 間 箇 。 。 








富士 通 か ら 発 売 さ きれ て いる 
1 また は HARDC 2 に よっ て 漢字 を 印字 し た 場合 . ど うし て 
も 縦 方 向 が 16 ド ッ ト 分 必要 な た め に 字 が 大 き * を ます:。 
MP-80K の 場合 は 紙 送り が ドッ ト の 半分 で 行 な を る の で , 
縦 方 向 を 圧 緒 し て 印字 で きる の で す . iC で MES20 WU 
PETIT で は OMB2240 人 57 紙 送 り が 1 ドッ ト な の で で 
き な い か と 言う と , な ん と マニ ュ ア ル に は な い の で す が ESC 

十 " す 2 十 Ne: コマ ンド が あっ て , ドッ ト の 半分 で 紙 送 り 
が で きる の で す . 

つま り ESC+T “PP と ESCT“"J ず "を 組み 合わ せ て , MP-80 
KK と まっ た だ たく 同じ よう に 印字 で き HAN だ 7 だ だら ず MB= 
80K で は 18x14 で す が ,。 これ が 16x16 と な り 少 し 字体 が 違 

ます が 大 き さ は 普通 の キャ ラク タ 並 に な り ま す . 

プロ グラ ム は 日 本 語 入出 力 ラ イブ ラリ の 出力 ライ ブラ リ 
を 参考 に し て 作り まし た . 
ド な ピロ ジグ に 窓 
リス ト は ディ スク 使用 の 方 の 場合 も 考え て 5000H 番 地 か ら 
に な っ て いま す . プロ グラ ム 自 身 が 必要 な の は 5000H 一 5164 


ジン ショ ジャ イジ ディ ペン デン 


レー・ プ ログ ラム sf 


日 本 語 入 出力 ライ ブラ リ VOL. 
ピ 


に っ て お り , どこ へ 置い て も 走り ます が , 


まで で , 後 51D7H ま で は ワー ク ・ エ リア 


還 還 昌 がい) 還 還 


整数 変数 に 漢字 コー ド を 入れ て USR 関 数 で 5000H を 呼 
べ ば よく , 53 字 を 越え を る か CHR$ (13) が 送ら れる と 印字 
し て 改行 し ます . その 例 を BASIC の プロ グラ ム に 示し ます . 
娘 字 は 16X16 ド ッ ト で 廊 字 間隔 は 2 ドッ ト で す . 

な お , 漢字 プリ ント を 終了 する 場合 は 必ず ESC+“『A" 十 
12 を 実行 し て くだ さい . これ は 紙 送 り を プロ グラ ム 中 で 変 
更 し て 11 ド ッ ト 十 1/2 ド ッ ト 十 1/2 ド ッ ト の 計 12 ド ッ ト と し 
て 印字 し て いる だ ため , その まま に し て お く と 紙 送 り が 11 ド 
ッ ト の まま に な る の で 改行 ピッ チ が 1/6 イ ンチ と な ら な く な 
り ま す . 

以上 で 特に 説明 は いら な いと 思い ます . BASIC の プ ブログ 
ラム を 参考 に し て いた だ けれ ば 良い と 思い ます 。 だ た だし, 
漢字 ROM が 実装 きれ て いな いと 使え ませ ん . 
参考 文献 
1) 日 本 語 入出 力 ラ イプ ラリ VOL.1 , 
2) MP-80K, 説明 書 
3) MP-80TYPETII, 説明 書 
4) 富士 通 スカ イラ プ ブ ・ シ ャ トル 創刊 号 
5) アプ ソリ ュー ト ・ ア セン プラ 解説 書 , 富士 通 

サン プル 印字 例 (原寸 ) 


IO 工学 社 
FM 一 8 漢字 プリ ン 








富士 通 





トブ プロ グラ ム 








10_C じ LERR。』 多 日 4FFF 

20_ DEF _ USR1 =HBOOGQO 
OPENTOUL。 1 。 7LPTGs リ " 
40 _ READ 内 ス 


60 人 4mUBR 1 ( 谷 久 ) 
プ 70_ BOT 4 

100 DAT 人 H2 ミ 
10E DaTR 名 日 
104 DATR SHS 






ム 2 さき 4D 。 3 15D 。 HE 








50 1F 人 2=O _ THEN FRTNT 提 14 選 HR 呈 (SH1E) すり リリ +CHR 和 ま (12) END 


49。 2H21 さ F 。 HH ミ 4F 。 HE120。 日 9 人 5 





* HE ロ 4 日 。 HE ロロ 7 4 8 kH256D 。 SH25 エ 0。 SHS ロ 69。 


。 HG ロフ 。 H256R 
60』。1 さ 。O 








EE レー リス ト TS 














OO0QO 0 9 NAH FANFRT OO12SO 5OOE 6 BD Q155 LDAa SCOUNT 。 FCR 
0 Q ロ FT SYhH 。 NDUEJ GO1 さ OBO12 さ Q BD Oo152 LERX EUFF 。 FCR 
oOQ ORG まま 5OOO oo14Q 5Q16 EF に 7 STU 人 Q。X 
RYTES EQBU 106 Qoo15O 5O1 フ 4 ビ TNC 

呈 STRRT  EGU 3 OO150 5O19 4 ヒビ 1NCAR 
OOO60 5OOQO_ 81 CMF 谷 井 ま 0 人 2 OO170 。 O1 全 人 7 BD OoO149 TA SECLUINT 。 FCR 
po0070 BOOS 全 6 na02S ENE RETURN OO18O SO1E 1 る CMFa 韻 BYTE 
ooOBQ 5OO4 EC 979 LRDD X OO19O < oO std ECC MAIN 
oOOO 5OO ム 6 10B さ OOOD CNMFD 押 OOOD OOSOO RETURN RTGS 
00100 BOO 7 17 BOOES EEG MATN Or BD O140 MaIN LDRE SCUNT 。FCR 
OO11O0 OOC 1E 0 さ EX ロ D。U COQ204 Q2 フ 6 Tec』 LDA 井本 09 
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O 


アセ ンプ ブル ・ リ スト 














106 


Q00S2O6 








き 49 


00S5O 





OO400 
Q0410 
OO042O 
004 さ 3Q 
60440 
OO45O 
QO46O 
QO0470 
OO480 
OO490 


0O05 ヨ O 
Q059O 


QO6QQO 


Q0610 
Q0620 
00630 
Q0640 
OO065O 
G066Q 
0067Q 
Q068Q 
00690 
0070Q 
0070 全 











046 
04 人 
コ O4E 
0 
505 人 4 
05B 





506Q 
506 人 4 
06 
506E 
5BO6D 
507 1 
507 
紀 0 フ 
5071 
5OB1 
BOB 
OB 
OB 
BOBD 
5QBF 


509 フ プ 
09E 
5Q9F 
5QO 谷 1 


QA 





SOEB 
BOBE 人 Rn 
SOBC 
5OCO 
OCS 


SOC 條 





5Q0CBH 
SoCD 
SOD1 
5OD ミ 
BOD5 


SOD7 





20 
6 
<『4 
8BD 
さ 1 
21 
26 
さ ウ 
86 
人 
さ 和 4 
6 日 
る 9 





O08 
BD 
10 
B1 
谷 人 4 


QOS 


0129 
Q12F 


114 
10E 
Q106 
FBFAR 
Q119 
Q116 


17a 
QORE 
9174 
Q104 
6169 
5Oa1 


Q09 プ 
Q009 
OoOBD 
QOBZ 
FEFA 
014F 
97972P4 
EoOE 人 Ra 


呈 OE 全 
QQ5D 
Q09 品 
QQBF 
FBFQ 

5064 
0067 
912ER 

19) が 

OF 
0Q0EB ム る 








Q11E 
5OE2 
oeo 


Q116 
BoOCE 


610E 
EoCO 


Q106 


IATN1 
NINE 


NATNS 


IATN4 


SHIFT 


SHIF1 


SH1IF2 


SHTF さ 


PLL 
LEAX 
STE 
Ta 
LEARX 
STBE 
ST ム a 
LEAX 
BTX 
LE 
JSR 
LDA 
LEAX 
LEAX 
TX 
LEAX 
BTX 
LEAU 
CPMFU 
BEB 
LDD 
STD 
LEAX 
STX 
LERX 
TSR 
LDX 
LEAY 
ESR 
LEAX 
ESR 
LEAX 
STX 
LEAX 
JSR 
ER 
LEAX 
CMFX 
ENE 
ESR 
CLR 
RT5 
STX 
ESR 
ERA 
LDA 
STA 
ESR 
LEAY 
DEC 
ENE 
RT5 
LDA 
Ta 
FSHS 
SL- 
FRQL 
LEAX 





FUFEN4 。FCR 
1.X 
FDPENB。FCR 





FOPEN1 。 PCR 
[FEF 人 1 
SCHUNT 。 FCR 
EUFF,FCR 
4 

FEND1 ,FCR 
KDAT4。FCR 
FEND2。FCR 
EUFF 。 FCR 
FEND1 。 PCR 
MIN ミ 

ェ U+ キ 
KRDAT さ 。 FCR 
KRDAT4。FCR 
DAT2。PCR 
KRDAT1 。 PCR 
[FEFA] 
FEND2。FCR 
FDAT4。FCR 
SHIFT 

まま 01。X 
SHIFT 
FDaT4。FCR 
PDAT2。FPCR 
PDAT1 。FCR 
[FEFA] 
ITN2 
EDQTG。 FCR 
FEND2。FCER 
MATN4 
FRINTS 
SCOUNT 。 FCR 





FEND2。PFCR 
PRINT1 
ATN1 
韻 ま 0 

FEND さ 。 PCR 
SHIFS 

ま 014Y 
FEND さ 。 FDR 
HIF1 


井本 0 日 
FEND4 。FCR 
メ 

ペー キ 

sY 

0 の が 








QOBOO 
Q0810 
OO82O 
oO08 ミ Q 
00 昌 2 
oO8 ヨ 40 


QO85O 
QOB60 
oO ヨ 7O 
OOBBO 
OO08B90 


OO90O 
QO910 
OO94O 
Q0 ワ 4 分 
OO0550 


OO 人 2 
QO0554 
O0956 
O095 晶 
OOg60 
OO0970 


OOBO 
OO99O 
Q1Q00Q 
Q1Q01Q 
Q1020 
O1Q03O 
Q1040 


oO1Q05O 
Q106O 
Q107Q 
QO1O0BO 
Q1090 
Q110Q 
Q1102 
Q111Q0 
Q1120 
01130 
Qo1140 
Q115O 
OQ1160 
Q1120 


SOD 
BODD 
SODF 
oOE 1 


5104 
5105 
弓 106 
5108 
510a 
510 ビ 
512 
12E 
512C 
ら 12E 
51 さ Q 
514Q 
5142 
14 さ 
51 4 分 
146 
148 
514 谷 
514E 
514C 
514D 
514E 
515O 
5152 
5154 
5155 
515 フ 
15@ 
515 人 an 
515E 
515D 
515F 
5160 
5162 
16 ミ 
516 王 
16Z 
516 
51D2 
51D4 
1D6 
1DZ 





SBD _QOF 合 
F4 SQOD ミ 
10 





9F FBFA 


BD_G051 
BD GO049 
BD 0Q04 さ 
9F FEFA 














1E4C 
000 人 2 
OE 

oO 

QQQ2 
Qoo8 
QD 

1E4 人 人 
91 

1E4C 
OQQ2 
OOO1 
Q06 人 a 
OQ002 
QQ002 
OOO1 
O0Q1 
oOO 





FR1NT1 


FR1NT2 


ド KDAT1 


ド EDaTS 
FEDaT ミ 
ド DAT4 
ド DaT 
FDAaT1 


FDAT2 
PDAT2S 
FDAT4 
FDaT ら 6 
FDAT フ 


FDAT 


F ロ PEN1 


FHFENS 


FHPEN ミ 


F ロ PEN4 
FUPEN5 


FFPEN ら 


FFPEN7 


FUPFENB 
SCUNT 
BUFF 
PEND1 
PEND2 
FEND ミ 
FEND4 


DEC 
ENE 
FULS 
RT 
LEAX 
BTX 





RE 
RIE 
RIME 
RIE 
FCBE 


RIME 
FDE 
RIME 
FDBE 
FCH 


RME 
FDE 
FDE 
FCE 
FCE 
FCE 


RE 
FDE 
FDE 
FCE 
FDE 
RME 
FCE 


RIBE 
FDE 
FCBH 
FDE 
FCBE 
FDE 
RM 
RINE 
RMBE 
RME 
RMB 
RNE 
RME 
END 





FEND4』FCR 
HIF ミ 
X 


FOFENZ。FCR 
FENG6 。FCR 
OFEN5。FCR 
[FEF ム ] 





FDATB。FCR 
FDAT7。FCR 
FDAT6。FCR 
[* ま FEBF] 


2 

第 0O12 
16 

第 DO00O 
ま OE 。 


2 

征 OD004 
まま 1B4 人 n 
1 

ま O 人 Rn 

生 OE 。 


ク 


征 00O プ 
征 1B41 
11 

ま 1B4C 


ま OE 。 
まま OOOB 
も OD 
事 1E4 谷 


1 
征 1B4C 


START- 











較 松 本 忠 博 


プロ グラ ム で は 乱数 は 使わ ず 、(Gz ) 座標 の 数 値 か ら 
1/O'82 年 4 月 号 p.208。 BIG 1/O プ ラ ザ に FM-8 用 の euc leo 
この 2 ペッ いと 判断 し た た め ). 

て いま し た . 今回 ,。 これ と ほぼ 同じ 動作 な する プロ グ 8: EAST の 883 
ラム を マシ ン 央 で 作成 し た の で 発表 し ます ・ 『 後 、 自分 で HARDC2 を 実行 する 必要 が あり ます . 
に つい て 順に 久 束 化 の た め 処理 は 、 ドッ ト 単 位 で は な く 横 1 列 ずつ 処 


















それ で は 4 月 号 の ブロ グラ ム と の 相違 





べ ま す . 理 (GET, PUT) し て いま す . 
⑩6809 の マシ ン 語 で で き て いま す . も ちろ ん ボ ポジ ショ ン ・ プロ グラ ム 中 いく つか むだ な 部 分 もち も あ る と 思い ます が , 
イン ディ ペン デン ト で す . (0. 0) か ら (639, 199) 自分 な り に わか りや すく 作っ た つも り で す . ROM の バー ジ 
処理 に 要する 時 間 は 30 秒 衣 で す . た だ し , 本 ョ ン に も 依存 し て いな いと 思い ます 。 な お, ワー ク ・ エ リリ 
プロ グラ ム に は HARDC2 は 含ま れ て いま せん . ア と し て 43D か ら 240 バ イト 使っ て いま す . 細か いと ころ は 
@ オ リ ジ ナ ル の 方 は 濃淡 を つけ る た め に “ラン スウ ニー アセ ンプ ブル ・ リ スト を 見 て も ら っ た 方 が 早い で し ょ う . 





ヨル ドッ ト ノ ショ ウキ ョ " を 行なっ て いま す が , 
淡 ス クリ ー ン ・ コ ピー アセ ンプ ブル ・ リス | 昌和 


] 




















ポポ ポポ ポポ 水 水 水 水 氷水 氷水 氷 ボ ポ 氷 ポポ ポポ ポポ ポポ ポポ ポポ ポポ 涼 
%※ ポポ 
** 5HaDE R HUT I NE **※ 
| る.1 し 1 
ポポ ポポ ポポ ポポ 水 水玉 玉水 水 氷水 氷 ポ ポポ ポ ポポ ポポ ポポ ポポ ポポ 
* 
* 。 TF ((X+YX 呈 ) MOD 8) =CL QND CLSE プ THEN PRESET(X。 
ネ Xs 0Qー6 さ 9 
* らい 4 
※ 
(6000) RG 争 ら 000 
*# 
(QOC5) XO EBU まじ 
YQ EGU 生じ フ 
MOD EQU 第 ド 己 
BUFF EGBU も 4 さ D 
し 
* MATIN 
3 
1 5O STaRT JRCC 持 多 5 MSGK 1IRGB FIRG 
BD 329 BSR INIT1 | 
Se が 所 LEAS  -2。 
2 BD 61 LOOF1 BSR GET s BETS(O。 ッ ) 一 (6 さ 9。y) 。 BUFF 。 は 
600 昌 BD Sa EGR TNITS 
600 人 86 50 LDa 拉 B0 
600 ビ 仙 プ 7 61 ST 1。 呈 
ら 600E 6 QB8 LOOFS LDR #8 | 
6010 7 E4 STa に ) | 
6012 BD 2 LUUF さ BSR CALCUL 
691 和 4 BD 42 ESR CaRRY 
6016 6 人 E4 DEC s 
601 昌 2 ら 6 F ヨ ENE LOOF ラ 
さき Q _QO1 LEAX 1。X 
6 人 Q ら 61 DEC 1。S 
26 EE BNE LOUOFS 
17 OO9D LBSR FUT :FUTS(O。y) 一 バ (6 ら う 9 。 y ) 。 BUFF 。FSE 1 
QC C TNC YO+1 
6 CB LDA YO+1 
1 CB CM 拉 20O 
ご 6 DE ENE LOOF1 s ReDeat。 unti1 ーッ =2OO 
さら 5 90 PULS  X。PC : RETURN. 
* 
* 。 INITIaLIZE 1 
* | 
5F 4F INIT1 CLRD | 
DD C5 STD XO 
DD CZ STD YO 
3 RT 
* 1 
も 3 INITIALIZE 人 | 
※ | 
BE O43D TNITS  LDX 昔 BUFF 
QF C5 CLR XO 
OF C6 CLR X0+1 
さ 9 RTS 
100555 ネ 
| 10056 * 。 CALCULATE "MOD" 
1005 フ も 3 
10058 D6 C8 CALCUL LDE YO+1 
100589 6 05 LDAa 菩 呈 
10060 さ D NMUL 
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10O 


デ セ ン プル ・ リ スト 


10061 
1006 人 
10063 
10064 
10065 
| 10066 
| 1006Z 
10068 
| 10069 
| 10070 
10Q71 
1007 人 2 
| 10073 





10074 
1007 
10076 
1007 ア 
10078 
1007 
1008Q 
10081 
1008 信 
100 ミ 
1008 生 
100855 
10086 
1008 ア 
1008 
1008 
1009Q 
10091 
1009 人 2 
1009 ミ 
100944 
1009 





10099 
10100 
10101 
10102 
1010 ミ 
10104 
101055 
10106 
10107 
10108 
10109 
10110 
10111 
10112 
1011 ミ 
10114 
101 15 
10116 
1011 フ 
10118 
10119 
1012O 
JO 用 1 
10122 
10123 

10124 

10123 

101236 

1012 ア 
10128 
10129 
101 さ 0 
101 さ 1 
101 ミ 人 2 
1013 る 
101 さ 4 
1013 

101 ミ さら 6 
| 1013Z 

10138 

10139 

10140 

10141 

10142 

1014 さ 

10144 
| 10145 
| 10146 

1014 ア 
| 10148 
| 10149 

1015O 

101 史 1 





101 紀 さ 
10154 
101555 
10156 
101 紀 ア 
10158 
10159 
10160 
10161 
| 1016 人 2 
1016 さ 
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6Q04 1 
604 る 
6045 
604 プ 7 
6049 


ら 604 全 
604E 
604F 
6050 
6055 
6054 
ら 656 
605 フ 


6058 
605a 
605E 
ら 605D 
605F 
ら 6061 
ら 606 ミ 
6064 
ら 6066 
606 紀 


606 
606E 
606D 
606F 
607 1 
6074 
6076 
607 コ 
607E 
607D 
ら 607 ド 
60 昌 1 
60 昌 4 


60 ヨ 6 
6089 
る 6OBE 
608D 
608F 
6091 
6093 
609 和 4 
6096 


ら 6Q9 プ 
609 谷 
609 ビ 
609E 
60AO 
60 人 人 
6095 
60 人 7 
609 
6QOaE 


608 ビ 
6OaF 
6OE1 
60H さ 
6QOE6 
6OE9 
60EE 


6OBC 
6OEF 


ら 6QCO 
60CS 
6QC4 
69C6 
GE 
6QCD 
6ODO 
60DS 
ら 6QD4 
60D6 
ら 6Q0D7 
6QD 
ら 6QDE 
60DC 
ら 6QDE 








DE C6 DDE  XQ+1 
C4 07 人 NNDE 拉 7 
5 ド 富 STE IOD 
OC C6 INC X0Q+1 
39 RTS 

* 

* 。 BET COLOR CODE 

* 
4F COLHR  CLRR 人 
68 89 OnoaO 人 SL 160.。X 
な ん RHL 全 
68 8 SO BL 0。 X 
49 ROL 
68 B4 QSL 1 
49 ROL 
さ 9 RTS 

\ 

* 。 SET ON CaRRY 

し 4 
8D FO CARRY ESR COLOR 
ちち F CLRH 
1 07 CMF 人 RG 提 7 
ら ウブ も ら EEGB RESET 
90 F 呈 SUER MOD 
らら 2. 1 EHTI RESET 
ら じ ピ SET INCE 
EAR 4 RESET ロ RB ュ X 
E7 4 STE ュ メ 
3 RT 

* 

* 。 GET ONE LINE in BUFFER 

* 
D 41 GET ESR HaLT の 
6 1D LD 人 人 1D :BET ELOCIE 全 
BD SB ESR GETXY 
ヨ D 4E ESR SUE 
CE 043D LDU 韻 BUFF 
8D 10 ESR GETTFR 
6 ら 64 LDa 墓 10Q 
7 FC Ta まま FCB ヨ 2 
BD 3F EGR SUE 
8D 07 ESR GETTFKR 
6 8B0 LD 韻 あ BO 
EZ7 FC8O STA も FCBO 
2O 36 BR SUE 

し 4 
BE FCB ミ GETTFR LDX 井 和 ま F ビ 日 ミ 
BD 全 1 ESR HALT 
E6 80 LDE 多 中 
グロ ア BEG 62 
6 0 1 LDa きい P 
仙 7 CO BT 人 中 
5A DECE 
6 F9 ENE 1 
さ ウ EK4 RTS 

* 

BET XsY 

し 1 
BE FCBS SETXY  LDX 韻 邊 FC 
人 7 0 STA eX 中 
5F 4F CLRD 
ED 4 STD どく s X1 
CC 027F LDD 韻 6 さ 9 
ED 04 STD 4。X s X2 
DC ビ Z LDD YO 
ED QOS2 STD 3.X siY1 
ED 06 STD 6。X sY2 
さ 9 RTS 

3 

* 。 HaLT SUE・MFU 

も 3 
6 FDQ5 HALT LDA も FDO5 
2B FB BIMI HALT 
8B6 0 LD 人 a 草 ま B0 
7 FDQO5 STa 第 FDO5 
H6 FDO5 Ma1T LDA も FDQ5 
= 人 FH BEFL MAaIT 
さ 9 RTS 

素 

* RESTART SUB・NMFU 

玉 
7F FDO5 SUE CLR ま FDO5 
セー ィ RTS 

※ 

* 。 PUT ONE LINE 

* 
D FUT BSR HALT 
6 LDa 間 生 1 sFUT BLOCE 1 
8D BSR GETXY 

1 QBE LDY 揚 EUFF 

8E LDX 共 ま FCBB 
CC LDD 井本 OOO さ : GND 
ED STD で 3 
に 6 LDE は こ 1 98】 
選 ゲ STBE 中 
品 全 LSRE 
EE Aa1 la LDU SW 
EF 1 STU ぇ メキ キ 
紀 DECBE 
6 F BINE EE 
SO DC ER SUB 

※ 
(6ODF ) END 














FM-8 IMP-80 TYPEHI に よる 





各社 か ら カ ラー プリ ンタ が 発表 され 始め まし た . そこ で 
カラ ー リ ボン を 使っ て 専用 プリ ンタ (MP-80type II ) に よ 
る カラ ー ハ ー ド ・ コ ピー を 考え て み ま し た . 








現在 。 市 販 さ きれ て いる MP-80 用 カラ ー カ ー ト リッ ジ ・ 
ポン は 黒 , 赤 , 緑 , 紫 , 茶 の 5 色 が 出 て いる よう で す . こ 
れ を 使え ば リボ ン の 交換 に より 携 似 的 に カラ ー コ ピー が 可 
こ な り ます . た だ し , 色 は 2 人 色 少な く , 画面 と 同じ 色 が 
出せ な いと いう 欠点 が あり ます . コピ ー の 大 き さ は HARD 
C1 で は 大 きす ぎ て 荒く な り , HARDC2 で は 横長 に な っ て 
し まい ます . そこ で , HARDC1 の 半分 の 大 き さ , つま り 画 図 1 引数 











面 1 ド ッ ト に 対し て 。 プ リン タ は 横 2 ドッ ト , 終 1/2 ド ッ 上 エ SS 
ト , 倍 密 度 ビ ッ ト ・ イ メー ジ に し まし た . 
ボ ー 


当 図 2 GET BLOCK1 に よる パター 入力 
BASIC か ら USR 命 令 に より 実行 し ます . 引 数 は 整数 型 で 
ッ ツ 














の よう に な っ て お り , ヾ 1” に し た ビッ ト に 対応 する 色 
プリ ント され ます . し た が っ て 単色 コピ ー の 場合 、 引数 

5 ょ り ま す が , 0 の と きも これ と 同じ し に な る よう 
に し て あり ます . &HFEF の 場合 。 何 も 実 行 し ませ ん . また ., 
8 ビッ ト 目 は “0? て 左側 ヾ 1” で 右側 に プリ ント され ま 
す . 一 枚 の 用 紙 に 4 回 コピ ー で きま す . 

プロ グラ ム を リス ト 1 の よう に 変更 する こと に より , コ 
ビデ 生 ば 画 ーー IP の Pe325 
ッ ト , 標準 ビット ・ イ メー ジ に な り ま す . マシ ン 語 は ポジ 
ショ ン ・ イ ン デ ィ ペ ン デ ント で す が ,。 プロ グラ ム の 後に 32 較 40 回 
0 バイ ト の バッ ファ 領域 が 必要 な の で , DISK BASIC の 場 

MMOG SEE まい 


| カラ ー コ ビー の アイ デ 














で す -. _ 実行 は プロ グラ ム 1 の よう に 行 な に いま す . 





一) cc) ーー) 
ー の で 2 を 行 だ うに 当 だ っ て , 最大 の 問題 は 重ね 打 
ちの 除 に 位置 を 合わ せる こと で す . これ は 用 紙 1 枚 を プリ BIOS の サブ シス テム * es3 ンプ ッ ト ・ TIE 
ンタ に 通し , 上 と 下 を つなぎ 合わ せ て ルー プ 状 に すれ ば フ の うち , GET BLOCK1 コ マン ド に より , 画 面 デ ー タ を 読み 
ォ ー ム ・ フ ィ ー ド に より ピッ タリ と 位置 が 揃い ます (写真 取り , プリ ンタ に 出力 し ます .。 メイ ン 部 と サブ 部 の 共有 メ 
1). 用 紙 の 裏側 に セロテープ で 張る と うま くい きま す が , モリ は 128 バ イト し か な いた め ,X 方向 16 ド ッ ト , Y 方 向 50 
フォ ー ム ・ フ ィ ー ド の 際 , 折れ 曲 ら な いよ うに 注意 が 必要 ドッ ト 計 100 バ イト ずつ 読み 取り ます ( 図 2 ). こ うす れ ば X 
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510 











リス ト 1 フー チャ ヤー ト 
7EOE 02ー-01 

7EEH 4 ビー4B 
ジ ピロ. グラ 1 





10 CLEAR,&&HZCFF LHRDM "HARDC さ " 
2O_ DEF INTA-Z: DEFUSR=H7DOO 
さ 30 ロ FEN"OU"。1。"LFTOI "sgPRINT 福 1 。CHR ま (1 人 2) 





40 

20。 7 ラウ イル の サウ セイ 

GOAMI 

70 FR Ir=O TH 6 

0 =2TT EEUSR(R)』 7 CUFY 

90 PRINT#1.CHR ま (1 人 で) 』 ェ "フォ ー ム フィ ー ト ~ 
100 介 和 =TNPUT 生 (1) ょ "リリ ホリ ドン コウ カー 

119 NEXT 1 

120 END 








方 向 の 16 ド ッ ト が ちょ うど 2 バイ ト の デー タ と な り ま す . 
この うち 偶数 また は 奇数 ビッ ト め を 取り 出し ,、 バッ ファ に 
1 行 分 の デー タ 200 バ イト を だ たくわえ そま す . 

プリ ンタ に 打ち 出す 際 , 高速 化 の た め ヾ “1? の ある 最も 
左 の デー タ か ら , 1" の ある 最も 右 の デー タ ま で を ピッ ト 
・ イ メー ジ で プリ ント し て いま す . 左側 は 6 ビット を スペ 
ー ス 1 廊 字 に 置き 換え る こと に より , ヘッ ド は 最短 距離 を 
動く こと に な り ま す . この プロ グラ ム は プリ ンタ に は デー 
タ を 1 バイ ト ず つ 出 力 し て いる た め , プリ ンタ が 打ち 終わ 
る まで CPU は 次 の ルー チン へ 行き ませ ん . プリ ンタ 用 バ 
ッ フ ァ を 400 バ イト にし, データ を 一 気 に 出力 する こと に よ 
り , プリ ンタ 動作 中 に CPU は 次 の ルー チン の 処理 を する 


ため, 少し 早く な る で し ょ う . 
emm ーー 










ーー 中 | 

実行 時 間 は 最高 2 分 51 秒 。 最低 41 秒 で す . HARDC1 の 4 
分 37 秒 , HARDC2 の 2 分 10 秒 に 比べ る と 高速 で あり , 単色 
コピ ー と し て は 有効 で す . カラ ー コ ピー と し て 使う 場合 , 
用 紙 を ルー プ 状 に する , リボ ン を 何 度 も 交換 する と いう 過 
酷 な 使い 方 を する た め , プリ ンタ の 故障 の も と で あり , イ 
ンク ・ リ ボン の ムダ 使い で も あり , 多用 する こと は 避け る ほ 
う が よ いで し ょ う . カラ ー プ ブリ ンタ が 安く 手 に 入る 日 が 待 
ち 遠 し いも ゃ の で す . 

最後 に 写真 を 撮っ て くれ た 中 村 君 , あり が と う . 


避 参 考 文献 














初期 値 設定 






80 回 


4 回 


サ プ シ ステ ム か ら る 
「 6 


奇数 また は 偶数 ドッ ト 目 
を バッ ファ に スト ア 










デー タ 172 編 小 





^1? の ある 最も 右側 と 


左側 の 位置 計算 最高 200 バ イト 


プリ ント 位置 セッ ト 』 ス ペー ス 出 力 
プリ ンタ に デー タ 出 力 最高 400 バ イト 


1/2 ド ッ ト 改 行 


7 ドット 改行 












ヘッ ド を 真中 に も っ て いく 





RETURN 


FM-8 活 用 研究 ?, 工学 社 





ーー コピ ビー プロ グラム ・ リリ スト 日 








QOO1  Q000 日 

OOOS OOOO 日 COLOR HARD COFY 

000 さ 。 OO000 5 

O0004 OOOO ョ program by JGBSECZ/ ユ 

Q005 。 Q000O 日 19 ヨ 2/10/2SO 

OO06 OOOO s ロロ 51 上 1 ロロ 1nHiD ロ Gnd ら ロモ ロ FO ロ Lam 

QO07  Q0Q0O 日 

OO08 OO00 5 

QO009 7DQ0O RG 7DOQO sdisEBQSTC 1i= 6DQOO sPS 
OOOR_ 7DOO 3 1ni モ ia1iz 

QOOB 7DOO_ ECOS LDD 2。』X ュ s は F ロ um らら ロモ 1 ロ ad 

OOOC 7DO2 C1FF CMPB 六 委 FF s ュ 和 † COUL = 可 FF モ 上 hen Fe モ turn 
OOQOD 7DO4 SBZ04 BE ※+ ら 6 

OOOE 7D06 102 CMFR 半 2 s ュ fT PHG テ = 人 2 上 hen return 
QOOOF 7DoB SSO1 BCS  ※+ さ 

OO1O 7DOa 39 RTS 

OO11 7DOE SD TSTE 

OO12 7DOC 26O2 ENE  ※+4 








110 
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カジ ラー ョ 世 三 アロ クラ バー 








001 計 
OO014 
9015 
0916 
0017 
0018 
0019 
0901 全 
OO01B 
001 ビ 
OO1D 
001E ビ 
901F 
002O 
00S1 
OO 人 2 
002 
00S4 
Q025 
00O 人 8 ら 
00E7 
002S 日 
OOS9 
OO 人 S 全 
OOSB 
OO2C 
OOSD 
OOSE 
QOSF 
OO さ O 
OQ1 
00 さ 2 
00 ラ 3 
OO る 4 
003 
003 さ 6 
00 ミ 7 
O038 
0039 
00 る 人馬 


00E 
003F 
O040 
OO 人 41 
004 全 
0043 
O044 





004 代 
004B 
O04 ビ 
GO4D 
OO4E 
OO04F 
605O 
00 紀 1 
00S 
00 呈 計 
00 呈 44 
0055 
OO56 
00 フ 
005 
00 ワ 
0055 谷 
0 
005C 
005D 
OO0S5E 
OO05F 
oO060 
9061 
006 全 





7DoOE 
7D19 
7D14 
7D16 
7D18 
7D19 
7DIiB 
7D1D 
7D1F 
7DS1 
7DS マ 
7DS 
7DS9 
7D2C 
7DSE 
7D31 
7D3 さ 
7D36 
7D39 
7D3C 
7D3 じ 
7D3E 
7D3E 
7D4 餅 
7D4 全 
7D46 
7D4 
7D4^a 
7D4C 
7D4D 
7D4F 
7DSO 
7DSS 
7D54 
7DS6 
7DS8 
7DS5a 
7DSE 
7DS5D 
7DSF 
7D61 
7D6 
7D65 
7D67 
7068 
7D69 
7D6E 
7D6D 
7De6F 
7D70 
7D71 
7D7 ミ 
7D75 
7D77 
7D79 
7D7C 
7D7E 
7D8O 
7DBE 
7DB4 
7D8 ヨ 6 
7DB9 
7D89 
7D8SB 
7D8D 
7D8F 
7D91 
7D92 
7D96 
7D8 
7D9a 
7DE 
7DO 
7DAE 
7Da4 
7D^a ら 6 
7Da8 
7Daa 
7D@C 
7DE 





CE6FE LDE 中 FE 
308DO1aD LEAX RCE。FC 
E71C GTB  -4』X 
C605 LDE #55 
4D TSTA 
270 マ BE ※+ 和 4 
C62E LDE 菩 4 さ 
E71B STB SB。X 
6QE LDR 立 OE 
7B4 ST  』X 
さ 1 ヨ BED EEAY 19. X 
10AFOS TV 人 S。 光 
CCOOQO ミ LDD 音 ミ 
EDO4 STD 4』X 
EDFED JSR BIOS 
6QO5 DE 旨 。X 
さ 1 ヨ BE6 LERY 6』X 
10QFOS に 1# NG 議 つい 
EDFSD JSR BI105S 
s XLUUF =e モ 
6F1D CELR  - さ 』X 
s YLOOP se 
6FBDO17D LOFP1 gsCLR  YLOOF。』FG 
i』 5uh system inDut 
さ OBDO18 さ LOOFS :LEAX INEUF 。FC 
861H LDR 間欠 1 
7OS BTQ 2』X 
6155 LDA 一 11。X 
4 人 4 LSRA 
CE610 LDB 甘 16 
さ D MUL 
EDO3 STD 3』X 
CEOF QADDB 昔 1 選 
EDO7 TDI グ ぶ 
人 616 LDR  -10』X 
63 LDE  #5O 
3D MUL 
EDO5 STD 8。X 
CE さ 1 DDE 拉 49 
EDO9 BTD 9。X 
6FOE ELR 11』X 
614 LDA  ー12』X 
ささ 10C LEAY 1 人 S。X 
F CLRE 
人 44 LSRA 
2404 BCC  ※+ ら 6 
E7aO ら 江 』 ま Y キ 
6COB INC 11』X 
5C INCB 
4D TSTA 
26F5 BNE  ※ー ワ 
AF1a BTX  -6yX 
61 1 LDR 拉 和 11 
718 STA  -。』X 
CCO06 LDD 立 104 
ED1E GBD 2 
C60C LDH 昔 12 
EBOB DDE 11.X 
ED1C STD 4。』X 
301 昌 LEAX 一 。X 
BDFESD JGR BIOS 
s DFinter Duff 5 
300C LEAX 12』X 
604 LDQ 立 4 
人 AO1 人 2 GUBR 一 14。』X 
63 LDE  #5O 
3D MUL 
さき 18DO19a LEAY ロ UTEBUF-1 。F ビ 
さき 1aH LEaY D。』Y 
63 全 LDQ  #5O 
E6BDO12O LOUF さ :LDB  XLOOF'。FC 
C401 QNDB #1 
704 BE ※+ ら 6 
ら 6901 ROL 41。X 
694 ROL  』X 
C60 LDE #8 
66 ヨ 4 RUR  』X 
ら 6601 RUHR 。 1』X% 
66 昌 4 RUR  。』X 
66091 RUR 。 1』X 


i X=RCB 
sEGL 
iL position 


sR _ positi ロ n 
s PDS 
ミロ Finter ロ ut 


s Y=ESCA 


ョ Y=DCE 


s XLHHF CC1ear 
sYLOF cl1ear 


s X=INEUF 
iBET BLOCE 演 


s XLHOP 


iX1 se 
ュ XS set 
ョ YLOOF' 
sY1 = ト 


ュ Y 人 2 se モ 


C ロ de 


ョ F' 人 4 


Sub COmmandl COd@ 


sCOlor number C1ear 


軸 抽 叶 


5 Y=C ロ 1 OF COH@ adHFG 呈 宮 


: こ O1or Code 5=e モ 。addre 紀 呈 1nC 
sColor numberr 5 


s 5ubgysteim 1nDut COd@ 


iRCBE 


ュ X=RCBE 


』 X=INEUF+4 


i YLD ロ F' 


s Y=HUTEBUFー1 


lg に ) 


sif dd then 1dgt L =hif キ 上 


sinput buffer 2dOE R =hif モ 
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カラ ー コ ピー プロ グラ ム ・ リ スト 








0063 。 7DEBO 664 ROR jaY s OutDut Buffer 1dot R 呈 hif モ 
0064 。 7DB2 5Aa DECB 

006 7DB3 26F さ BNE  ※ー11 

0066 7DB5 3OOS LEAX SS。X 

Q067 7DE7 さ 13F BENY 15 Y 

OO68 7DB9 4a DECA 

0069 7DBQ So6DE ENE LUOUF ミ 

OO6 人 Q 7DBE ュ s YLOOF Count 

QO6BH 7DBC 3 さ O0BDOOFF LEAX YL ロ OF 。FC s X=YLOUOF' ョ F フ 7 
OO06C 7DCEO 6C8B4 INC  』X 

OO6D 。 7DCS 6 ヨ 4 LDR  』X 

OO6E 7DC4 104 CMFR 昔 4 

OO6F 7DC6 1026FF7 昌 LBNE LUOFS 

OO7O 7DCA is Outnut hyte 1enqgth 

Q0071 7DCQA 3 さ 18DO162 - LEAY OUTBUF-1 。FC s Y=HUTBUF-1 

O007 全 7DCE CCOOCB LDD  #2OO 

0073 。 7DD1 6DaB TBF 』DiY 

O074 7DD3 2605 BNE  *※+ フ 

0075 7DD5 5a DECB 5 H: da モ a 1a5 上 addr@55 
0076 7DD6 26F9 BNE  ※- 弓 

0077 7DDB 2O6E BRQ _ JaMP si 和 f a11 clear then jamp 
O007B 7DDQ 3402 FSHS Ra 5 (S) =0 (SG ) : 5DaC numheF 
0079 。 7DDC 3 さ 1 人 81 LEAY 1。Y s Y=HUTBUF 

007Q 7DDE 6DaAoO LGSTII が と ss。buffer ne 上 addr 紀 5 
007H 7DEO_ 26OE BNE 。※+16 

O07C 。 7DE2 4C INCA 

Q07D 7DE3 106 CMF' 昔 6 

OO7E 7DE5 26F7 BNE  ※ーZ 

O07F 7DE7 7E2 に 本 se に ) 

OOBO 7DE9 EOEO SUBB 。5+ 

O081 7DEB 4F CLRA 

OQOB2 7DEC 6CE4 INC  。 ロロ aC 己 numDer 1nCF 選 mn ロモ 
O08 さ 。 7DEE 2OEE ERR  ※ー16 

O084 7DFO 5 DF1n positiOn se 

OO8BS 7DFO 308DOOCD LEAX RCE。FC s X=RCBH sF8 
0906 7DF4 さ 11a LERY -6』X s SFACE 

OOB7 7DF6 1OQFO2 に 】 和 A 4 主 と すか 

O0 ヨ 7DF9 6OE LDR 昔 ま OE spPF1inter Qut code 

OOB9 7DFBE 7B4 STQ  。』X 

QOBR 7DFD 601 LDQ 1 

OOBB 7DFF 705 STA 58,X 

O0BC 7EQO1 a6E4 LDA 。8 i SDaCG munber 1oad 
OOBD 7EO3 aB1E QADDQ -。』X :FOS 

OOBE 7E05 BDF2D8 JSR BIQGS 

OOBF 7EO8 4a DECa 

Q0090 7E09 26FA BNE  ※ー4 

O0091 7EOB ュ ミ Di immagG 5 トモ 

0092 7EOB さ 404 FSHS 

0093 。 7EOD 602 LDR 半 2 Or 昔 1 

Q094 7EOF 3D MUL sb ュ it immaq data numher 
O0955 7E10 1EB9 EXG a。B 

O096 7E12 ED18 GTD -』X s ESCL+2 

0097 7E14 3 さ 5O4 FULS 

OO09 日 7E16 604 LDR  #4 

0099 7E18 Q7Q05 STQ ョ 。X 

009 7E1Q さ 116 LEAY -10』X ョ Y=ESCL 

OO9B 7E1C 10QFOS TV 2 

OO09C 7E1F BDF2D8 JSR BIQS 

OO9D 7E22 i ata Out 

OO09E 7ESS 601 LDR  #1 日 SFP 
O09F 7ES4 7O5 STQ 5』X 

OO08O 7ES6 さき 18DO107 LEAY ロ UTBUF 。 FC 5 Y=dUTBUF 

OOR1 7ESR 35OS FULS 』 呈 ロ 8a と 己 number 1 ロ ad 

OO 7ESC さ 404 FPSHS 

OO 。 7E2E C6O06 LDE 6 

0084 7E30 3D NMUL 

00G 7E ミ 1 さ 1aB LEAY D。Y s Ya モ a ー ロ ut 1 addr 刀 5 
OOQR6 7E33 35O4 PULS BE 

OOQ7 7E35 10RFOS に の 全く 

OOQB 7E3B B60S2 LDR 拉 2 H Or 音 1 
OOA9 。 7E3Q _BDFSDB JSR EBIQG sdata qut 。 2or1 1qop 
OOQQn 7E3D 4a DECA 

OORE 7E3E 26FR BNE  ※ー4 

OOQC 7Z7E40 1 人 21 EERY も 5 sbBuffer nx モ 上 addr@s55 
O0AD 7E42 Sa DECE 

OOQE 7E4 さ 26FO BNE  ※*ー14 

QOaF 7E45 s pFinter LF 

OOBO 7E45 3OBC79 JaFMIF  kLEAX で REE。 FC s X=RCB 

OOE1 7E48 6OE LDQ 音 和 OE s ロ Finter Out cod 

OOBS 7E4Q 784 BT  』X 
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1O 


カラ ー コ 過 三 プロ グラ で リスト 








OOH 
00E4 
QOB 
00B6 
OOR7Z 
OOBB 
OO0B ウ 
OOBE 全 
OOBB 
00BC 
QOQ0BD 
OOBE 
O0EF 
OODO 
90C1 
00CS 
00C 計 
00C 和 4 
090C 
OOC6 
90C7 
OOC8 
00C ウ 9 
O0CA 
0OQ0CE 
00CC 
OO0CD 
00CE 
QOCF 
00DO 
QQD1 
00D 
00D 計 
OOD4 
00D 
OOD6 
0OD7 
00D8 
00D9 
OOD 人 
00DE 
OODC 
00DD 
OODE 
00DF 
00EO 
OOE1 
00ES 
OOE 党 
00E4 
OOE 
OOE6 
OOE7 
OOEB 
OOE 
OOEA 
OOEB 
OOEC 
OOED 
OOEE 
OOEF 
OOFO 
QOF1 
OOFS 
OOF ミ 
OOF 和 4 
O0OF 
OOF6 
00F フ 7 
OQOF8 
OQ0F 
OOFA 
GOOFBH 
OOFC 
GOQ0FD 
OOFE 


7E4 ビ 
7E4F 
7ESS 
7ES4 
7E56 
7ZEB8 
7E5 人 Aa 
7ES5B 
7ESCE 
7EBE 
7E61 
7E61 
7E6 ミ 
7E65 
7E67 
7E6BH 
7EG6E 
7ZE6D 
7E7QO 
7 ヒビ 7 
7E74 
4 ニ ァ イズ ご 
/EZ ウ 
7E7a8 
EE7 メ 5 
EE 
7E ヨ 1 
7EB 
7EB5 
7EBB 
7EBA 
7EBD 
7EBF 
7E51 
7E94 
7E96 
7E99 
7E5C 
4X4 ヨ 
7Ea 人 1 
7ER ミ 
7EA6 
7ERZ 
7ERAZ 
7EaZ 
7ER8 
7E ウ 
7EARA 
7EAB 
7ZEAC 
7EaAD 
7EE 
7EAF 
7EBO 
の EEB は 
7EBS 
7EBS 
7EB4 
7EE5 
7EE6 
7EBZ 
7EBB 
7EB 
7EB 人 Ra 
7EBB 
7EEC 
7EBD 
7EBE 
7ZEBF 
7ECO 
7EC1 
7EC 
7F ミ 1 
/ ド F 
7 フ FF 
アビ FE 


318C5a 
1OaAFO2 
C6o4 
a61D 
B401 
3701 
5C 

4F 
EDO4 
BDF2DB 


SE1D 
61D 
B15O 
10E6FED 


さき 11 台 
10RFOS 
日 601 

介 705 
6 
EDFSDB 
人 4 
So6FA 

さ 13 
10aFOS 
6044 
705 
EDFED 
さま らく 
10QFOS 
601 
介 プ 0 
BDFSEDB 
さき 136 
10QFOE 
BDFSD 
31355 
10aF OS 
6CQ5 
BDFSDB 
つの 


1 
14 
1BE 
4 仙 
91 
GOD 
OR 
1B 
介 1 
07 
1BE 
さる 
1B 
4 
691 
00 
1B 
4 
OO 
OO 
る 0 
OO 
OO 
OO 
00 
OO 


LEAY ESCJ 。F ビ ュ Y=ES ビ J 
GSY 2 
LDE 持 4 
区 DR ご SsX 5 XLOOF 
QND 人 QR 1 
EE 。※+3 ュ i キ odd then printer LF 
INCE 
CLRA 
STD ず 。X 
JSR BIOS 
s XLUUF cC ロ un キモ 
TNC X 5 XLH ロ F 
LDQ さ 。 が 
CMFR #BO 
LEBNE LOF'1 
ij ロ Finter normalig 刀 
LERY -6』X ュ Y=SFCE HgkBo) 
GIHYO 
LDR  # せ 1 
STQ  。』X 
LDR  #40 shead とら en モビ ロロ 5 ュ 1 上 ュ ロロ 
JSR BIOS 
DECA 
BNE  ※ー4 
LEAY - 日 。\ sESCK 
BTY。 妥 。X 
LDR 4 
STQ 8』X 
JSR BIOS sbit immage 1dot out 
EERY さ 。Y ュ Y= ニ ES じ E+ 計 ュ nu1 1 CodG addre5 ら 5 
BY 。 ら 。 淡 
LDQ #1 
GT 8』X 
JSR BIOS 
LEAY -10。Y s Y=CR 
STY、 2』X 
JSR BIQS 
LEQY8』Y ュ Y=EGC 
TI 
INE 8。X 
JSR BIQS 
RTS 
ュー い ロ ヒド コレ ヒュ 
BIUS  :EGU まま $FSDB ロ ュ F11 
DC sFCB ま も 12 iDCSEihead mov 与 5DeGed ロロ Fma11> 己 
DC4 :FCB ま 14 s DC44:head moOvVG SDGed ロロ OFLma1i<G 
EBCET sFCB *$1B sEBG 1/2dot LF 
FCB ま $4R Hoa 
FCE 91 1 
CR sFCE  * ま OD s CR 
し F 5FCB  * ま OR $EF 
ESCQR _ :FCB ま 1B jESE 7dot LF 
FCH 41 5 "na" 
FCE  *0Z KA 
ESC2 ,sFCB ま 1B sESC 12dot LF 
FCB まま 3 る 2 
ESCE 。 sFCB  $1B s ESC bit imma ロ COd@ 
FCE  $4B gd 
FCE  $91 六 
FCE  *00 5O 
ESCEL 。 sFCB や 1B FN 4=152 it 1mmaq ら COd 
FCB  $4 ビ 0 Or 昔 4Bs "EE リ 
FCE O s 1 ロ w 
FCE OQ shigh 
BPRCE skFCB も 2O ーッ 
FO0S 3 に 時 。 'O spO51itian し: ロコ 。Ri 4 る 
COL sFCB 0 iC ロ 1OF COd も 1 一 中 FE 
XLUF kiFCB OO 5 ヨ O Coun キ 上 
YLGBP (=sFCB 10 i 人 4 COun ロ キモ 
NUL sFCB oO rsnOt us 
RCBE sRME 日 
INBUF sRME 104 3 紀 い ロッ ほ 上 与 m 1n ロ ut Duff 
OUTBUFgRMB 2OQ0 ミロ ビュ ロモ エビ ロ い 上 Du 上 Duff 
き 
ョ END 
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この プロ グラ ム の 特徴 は ハー ド の 追加 な し に , プロ グラ 
ム の み で FM-8 が 低 周 波 オ シロ スコ ー プ に な る と いう こと で 
す . この 機能 を 使う に は BASIC で は 遅 す する の で , アナ ログ ・ 
ポー ト か ら の 読み 込み は マシ ン 語 を 使っ て いま す . 

F M-8 内 蔵 の シリ アル 型 A/D コ ン バ ー タ で は これ が 限界 
だ と 思い ます . “GALAXY FLY" の よう に , サ プ CPU に プ 
ログ ラム を 転送 し て その プロ グラ ム で サ プ CPU が 制御 され 


る の で , 表示 スピ ー ド が 速く な り ま し た . また , 時 間 軸 の 
表示 間隔 が 自由 に 選択 で き , 経過 時 間 を 測定 スピ ビー ド と 表 
示 時 間 か ら 計 算 し て , た と えば 12msec と いう よう に , 表示 
で きる よう に な っ て いま す . 





サン プル 印字 








































ReadMHHHHHHHHHH 
HfRK1 THHHHHHHHHHT 
M 45 り TIITHHHTHTH HLHTHH 


9.4MV 


























沿 
HHH 











記 1 

- 図 1 の よう に DIN5 ビ ピン オス ッッ 放 古 計 ら い ) 
を 買っ て き て ,。 FM-8 典 の アナ ログ ・ コ ネ ク 夕 に 差し こみ 、 
ラジ オ や テー プレ コー ダー や アン プ の イヤ ホン 端子 か ら 。 





み の 遇 クリッ プ 付 の 接続 コー ド で DIN5 ピ ン ソ ケッ ト の G 端 
了 ( 金 析 部 分 ) に マイ ナス 、 1 ピン に プラ ス 側 を 接続 すれ 
(6 玖 で す *。 


入力 が 交流 の 場合 、 マ イナ ス 側 が カッ ト さ れ て し まい ま 
す . 全部 の 波形 を 出し た い 場 合 は 図 2 の 回 路 で 入力 に バイ 
アス 電圧 を か け ま す . 葵 上 ハム が は いっ て し まい ます が ノノ 

BASIC フ ログ ラム の 930 行 の TIG20 キ =TIG 革 7 の 7 を 
大 きい 数 字 に する と , 経過 時 間 線 の きめ が 細か く な り , 小 
NG の GdE く がり ます 。 

STOP | キー を 近 す と 止ま り ま す が , サブ CPU の キャ ラ 
クタ ぃ パッ フフ ア に プログラム を 書き 込ん で いる だ め 。 だ ま 
に “READY”" が 出 な く な る と き が あり ます が , その と き 
は キー を 押し な が ら リ モッ ト ・ ポ タン を 押し . 
その 後 モ ニタ ・ モ ー ド で アド レス 0O1E1 に $CC, 01E2 に $57 
を いれ る と も と の 状 表 に 戻り ます . 

1 秒間 の 測定 回 数 お よび 測定 ス ビ ピード の 有効 数 字 は 3 桁 
ぐら いで す . 
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図 1 接続 
FM- 8 の 裏 
二 ラジ オ 、 テ レコ 、 ア ンプ 


の イヤ ホン 壮 子 








図 2 バイ アス を か ける と き の 接 続 較 








入力 電圧 調整 ボリ ウム 
100ko 





」 5V 乾 電池 











EIC ビン ログ ラム ・ リ スト 




















10 CULDR 4: CLEAR。 %H2FFF : MIDTHBO。 2 EDNSULEO。 2。O。 OiFRTNT" FM 日 オジ シロ“ 

EQ_ FRINT" 22 た だ と ロン タプ が JY 還 b fs.BRJs.NM 

0 上 呈 =INEEY 呈 

40 IF( L ま = リ "YU) OUR (しま ="y") THEN1 さ 0 | 
50 IF( L ま も ="N" )UR (し まま ="n") THENZO ] 
60_ BUTOU 3QO 

70_ FRINT! カセ ッ ト ロー トメ ジュ ョ シロ LDK の 、Y。 ロ R。 N 。 ツ 

BO L1$ ま =INEEY ま 

90 IF( し 1 生 ="Y") OR (し ま ="y リ )THEN 120 

100 ITF( L1 ま ="NP) ロ R (し L ま ="n" )THEN BO 


110 BOTO 0 

12O_ LOADM"ODSHIRONM" 
3O_FRINT:FRINTsPRTINT:FRTINT" ニュ ウリ ョ フワ レー パー ルーロ / 日 V デス (ラミ パオ ヤ テレ し コ  / コイ ホー ダフ 

チョ フウ セ リ ニュ ウリ ョ フク シテ モ の "イミ ハ ョ ブフ" ミヌ )"sFRINTsFRINT: PRINT "STUF KEY ヲ オタ ヌ ト トマ リマ タリ" ョ FR 











RINTsFRTINT:FRINTs 
140_ PRINT "アナ ロフ" ホッ ー ト へ ノノ ニュ ウリ ョ の .// シカ 9 内 。 DIN 5 ヒ * つ フン オス カク コネ フグ (\ プ り ) ヲ カカ ゅ テキ テ FM- 
日 22 の お FI の ー コ k ツ の ニッ サコ 5 だ EE2D の 7 1722 ジン) ミニ ウス っ 1 ヒデ ニニ) ファ ラ g ララ ミュ ウリ ョ ウシ マヌ 


15O PRINTsPRTNTsPRINTsPRINT" り リキ" ニニ ヌス フン テ ^ イィ テ デ *" ス カマ Y gr N " 
160 人 中 =TNEEY 呈 

170 IF( mVYU) OUR (しま ="y") THEN 180 ELSE 160 

180 CLBiLDCATE 0。2 





190 FRINT" 1 カンノ ソフ テイ カイ マウ ヨミ コミ ヒ に" ッ ト E ョ ウミ バート" 9 ト ソフ ティ イー メ ヒ ー ト * INF 

UT NUMEBAR  " 

2O0 FRINT" BE" ッ ト 0-199 1 

210 FRINT" ョ ウイ フー EY ッ ト 0-199 1 ュー 

n 

25 FRINT" ョ ウイ 6 EY ッ ト 0-199 1- 

23o FRINT" が ョ ウイ 5 FEY ッ ト G-199 1 

コ 

340 FRINT" 2 が ョ ウイ 4 に Y9 ト 0-199 1 

250 FRINT" シ " ョ ウイ さき ヒ " ッ ト 0-199 1 

360 PRINT" Yi ョ ウイ 2 ー EY9 ト Q-199 1 
FRINT" が ョ ウイ 1 FEY9 ト 0-199 1 
FRINT" カ jf 7 ビッ ト 0-125 1- ー | 
FRINT" カ 7 6 EY ッ ト 0- 6 さ 1- ー 
FRTNT" ヵ 7 5 FY ッ ト 0- ミ 1 1 ー 
FRINT" ヵ 7 4 ビッ ト O- 15 1- ー 
FRINT" カイ ミー EY ッ ト o- フフ 1- ー 
FRINT" カイ 2 EY ッ ト 0- ミ 1- ー 
FRINT" カ f 1 ビッ ト 0- 1 1- ー 


Y= ミ FOR S=B TU 1 BTEF 一 1:SP1#=(1/((1B+2OXS) /1079000#) ) 笠 1s Y=Y+1:LDCATE 6、Y:PR 

UBSTNB " 基 間 持 "=SF1 社 =FRINT" カイ "ENEXT 

さ 60 Y= さ :FOR = TU 1 STEF 1:SF1#=(1B+2O0*S) /1 .079 持 :Y= ニ Y+1:LUCATE 5O.Y:FRINT USING 
"性 半 折半 ! =SF1 半 EPRINT" マイ 2 ロ ": NEXT 

ミ 7 フ 0 Y=11:FUR 8=7 TU 1 STEF 1:SBFP1 共 =(1/((1 昌 +* (-) +20*S) /1079000 昔 ) ) 羊 1 : Y=Y+1:LDCA 

TE 6、Y:PRINT USTNG "性 提 持 ":BP1 音 ::PRINT" カイ " ェ NEXT 

さ BO Y=11:FUR 8= フ 7 TO 1 STEF 1:SFP1 半 =(1 昌 +BX (日 8) +20XS) /1 . 079 革 : Y=Y+1:LDCATE 50.Y:FR 
INT UBSTNEB " 拓 間 。 提 替り ょ SF1 提 sgEFRTNT" コパ 2 ロモ "= NEXT 

EDNNECT (0。 14) (6 さ 9。14) 一 (6 さ 9。 155) 一 (0。155) 一 (0。 14) 

LINE (142。14) 一 (142、155) 。DR 

LINE (0、2B) (6 さ 9。 2B) 、 DR 

LINE (265。14) 一 (265。155) 。DR 

LINE ( さ BO、14)-( ミ BO。155) 。DR 

LINE (455+64、14) 一 (455+64 。 155) 、R 

FRINT:FRTNT: FRTNT: INFUT" NFUT NUMBER = "』AzIF (azB) DR (=O) THEN 45o 
TNFUT" ヒ ョ シ " カン カワ つつ で トド リト ニニ 1 カイ ソフ テイ テン ヒョウ ミ バ (1 一 255) "3 日 

IF (H <=O) DR (Hs255) THEN 47Q 

H1=F TX (599/H) +1: IF H1>126 THEN H1=126 

TF H1 <2 THEN H2 =2ELSE HG=H1 

FDRE &H6926。H: FDRE&H6944 、H コ ー1 

PLB: CDLUR さ :LDCATE 45。21:FRTNTH: "トド ウト ニ 1 カイ ソフ テイ テン ヒュ ウル トリ 

LOCATE O。O 3 

FRINT"O.QOV" =FRINT:FRTNT"O。Q5V" :FRTINT 

FRTINT:FRTNT"O. 1OV" 

FRINT 

FRINT"O. 15V" 

FRINT 

FRINT 

FRINT"O.2V" 

FRINT 

FRINT 

PRINT"O. 25V" 

FRINT 

FRINT"O. ミ OU" 

FRINT 

PRINT 

FRTNT"O、 ミ 5V" 

FRINT:FRTNT"O. 40V" 
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BASIC プ ログ ラム 


・ リ スト 





690 
700 
71O 
72O 

さ O 
740 
)+1 
75O 
769 
779 
78O 
750 
QQ 


に ) 
日 さ Q 
40 
5O 
609 
70 
88QO 
90 
900 
910 
920 


930 
949 
950 
7 
960 
962 
964 
966 
970 
4)9】 
990 





KR BIKAN" : TIB 


1000 征 林 =OsFUR し =10XSEN#/ 昌 + せ 2 TU 69 STEF 10XSEN/ 晶 :LUCATE L 2 ロ : =T 提 +TTGGB 社 :FRINT U 
SING!' 拉 拉 。 提 提 手 り ュ 丁 補 ssFRINT "msec "ssNEXT 

101O_RETURN 

1020 SF 柱 (1 日 +T2O※XEHTT) /1079 本 :RETURN 

10 さ 0 SF 本 (1 日 + 昌 ※ (日 BIT) +20※EBTT) /1079 柱 : RETURN 

1040 IF FIX(TIG2O 手 ※10) >O THEN TIGB#=((TTB2O#%10) 1) /10:RETURN 

1050 IF FIX(TIB20 柱 ※100) >O THEN TIBB 皇 =((T1B20O 揚 ※100) 半 1) 71OO:RETURN 

1060 PRINT"ER" ュ :FRTINT "TITG20 提 = リュ TB2O 祝 : STDF 

1070 FUR X=0_TD 100:Q =O kNEXTX:LOEATE 20。2OEND 


FRINT 

FRINT 

FRINT"O. 45V" 

FUR Y=O TO 46 :Y1=4.0BXY: Y2=0= Y2=Y1 一 FTX(Y1) 一 、 呈 : TF Y2 GO THEN Y1=FIX(Y1)+1 
LINE (40。Y1) 一 (6 さ 9。Y1 ) 。 DR。 1 :NEXT 

FOR Y=O TO 46 STEF 5 :Y1=YX4.08B:Y2=O: YG=Y1 一 FTX(Y1) 一 . 呈 : TF YO THEN Y1=FIX(Y1 


LINE(40。Y1) 一 (6 さ 9。Y1) 。DR。 で = NEXT 

IF =B THEN POEE &H61F さ 。H1+1 : HIT= ニ 日 : GUSUB1020: BUSUB9SO:EXEC&H61DE: GUTUD107Q 
TF 人 ロニ ー7 THEN FURE SH5SB52 。 日 1+1 : HIT=7 :BUSUB10 さ Os BUHSUB92O:EXECS&H5B さ D: BDTD1070 
ITF = ニー6THEN FOREE SH5EBFD。H1+1 : HITT=6=: BUSUB10 さ 0 BUSUB920: EXEC&H5BEB= BHTD1070 

員 所 PUFEE SH5CAB 。H1+1 : BTT= ニ 5 ロ : BDSUB10 さ O: BUSUB9SO EXEC&H5C9 さ = BUDTD1070 











































0 ロ FUEE &H5D5 さ 。H1+1 : BTT=4: BUSUB10 さ Qi BUSUB92、 XECS&H5D3E: GBDTU1070 
IF FURE %&H5DFE 。H1+1 : HITT= さ = BUSUB10 さ Oi BUSUE92 XEC&H5DE9』 GBDTU1070 
IF PUEE &H5SEA9。H1+1 s 昌 TT=7: GBDSUB1O20: GUDSUB ワ 2 XEC&HSE94: BUTU1070 
IF FURE %&HSF 紀 6。H1+1 : BIT=6: BUSUBE1020: BUSUBSOsEXEC&HSF41:GBUTD1070 
山 選 PURE SH6D3F 。 日 1+1 : BTT= 紀 : BUSUB1020: BUSUB920:EXECE&H6DS 人 RE BHTU1070 
IF PUKE &H6DFO。 日 1+1 : HIT= 0 XEC&H6DDE: BUTD1070 
IF PURE &H6EA1 。H1+1: 日 1T= XECH6EBCs BUTU107O 
UE FURE %&H6F5B。H1+1: BIT= XEC&H6F4 ミ = BDTH1070 
IF FOREE SH6CB4』H1+1: 昌 IT EXEC&H6C6F : BHTD1070 
IF 2THEN PUEE SH6BD4。 昌 1+1: BTT=2: GDBUB103 :EXEC&H6BEF : BUT0D1070 
TIF = ニー1THEN FUEE HH6B2 フ 。H1+1 : HIT=1 : BHSUB1030: BUSUB ウ SOEXEC&H6E1SiBDTU1070 


BDTO 189 


TTG 提 =SF 拉 ※ (日 1 ) =: IF H=O THEN LUCATE 紀 。25 :FRINT"O" ェ gzRETURN: "FRINT "BAMEN NO EEY 





TTG2O##=T1G 社 / フ ェ 1/ フ 7 BAMEN ND EEIKS BIKAN 

NMDB=LEN (STR$(FTX(TIB2O#) ) ) 1: "PRINT"MDB-1= リ "DB: 
TIGG##=(TTG2O#\(10“ (MDG-1) ) ) *(10 (MDBー1 ) ) : IF TIGB#=O THEN GOSUB 1040 'FRINT" 
BAMEN NH KEITKEA BIRAN に K" ェ TLTBGB 半 

SEN#= (TIGG/10) / (SF#/H) : "FRINT "BEN ND KANKAR 
IF (SEN< ミ 5) QND (SEN#=>1 . 王 ) THEN SEN#= さ XSEN 持 : TBB 韻 =TTBB 村 # さ 
TF (SEN#<1. 王 ) AND(SEN#*=。 王 ) THEN SEN 失 =4XSEN#: TBGG 社 =TTGB# ポ 4 
TF (BEN#<. 王 ) THEN BEN#=BXSEN 間 : TBB#=TTBGB#% 日 

FUR X=40 TO 639 BTEF SEN#:LINE (X。O) 一 (X。191) 。DR。1:NEXT 

FOR X=40 TU 639 STEP10OX BEN#:LINE (X。Q) 一 (X。191) 、DR。2:NEXT 
LOCATE 5。25:PRINT"O": 














"SEN 拉 3 





















2QO_QC D6 OC EZ 
5a3QO_QC D6 QC EZ 








BO 97 Q0C OF QC D6 QC E7 BQO 97 QOC GF 
B0 39 QO_QO_QO C6 BB D7 QC C6 Q4 D7 





FC :F9 


+F Sum 


1 52 
5 :』6 さ 
FC :2Z 
B さ 』12 
BEF :BD 
4 si1E 
27 si40 
RF 66 
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,O 


マシ ン 語 ダン プ ・ リ スト 








0O0 Q0 OO QQO 0O ksQO 
QO_QO OO QO QO =:QQO 
GO _QO OO _QO 0O 
QQO QO OO QQ _QQO 
26 FD 96 05 2B 
FD 96 05 2 FC 
さ 5 7F 39 さ 4 7F 
BZ 62 51 6 FD 
SF 10 aE C1 1Q 

















5EOO さ 4 OO C6 1C CE 59 FD 10 aE C1 10 AF 1 5 26 F フ 7 = 
SE10 4 26 EF 6 39 a7 日 4 BE さ Q QQ 6 8O BD 34 QO 86 
SE2O 1B 4A 26 FD 96 05 2B FC 1a 5O 6 BO 97 05 C6 08B 
SE3O SA 27 FD 96 05 2A FC 6 QO1 BZ FC 0 BE 3Q 0O CE 
SE40 FC B1 C6 03 6F C4 64 OO 69 C4 5Q 26 F9 さ 3 41 11 
SESO_ 3 FD QO 26 ED 86 OO 97 05 1C AF 20 QO BE CC 57 
SE60 BF O1 E1 7E 61 BB 39 QQO OO QO 7F 5F 09 3B 6 7F 
SE70 4Q 26 FD 96 Q5 2BE FC 1A 50 868o9705C60Q8g5a 
SEBO 27 FD 96 05 2 FC 6 Q2 BZ FC BO 6 QO 97 05 1 ビ 
SE9O AF 35 7F 39 34 7F BD 60 17 BE 5E 6 BF Q1 E1 6 
SEAO _EB BZ7 5F O9 B6 FD 1F BB B6 0Q3 BE ミ さ 4 OO C6 22 CE 
SEBO 65 A9 10 aE C1 10 aF 1 5Q 26 F7 4 26 EF 日 6 さ 9 
5ECO _A7 4 BE 30 0O B6 0O BD さ 4 QO 6 18 4 26 FD 96 
SEDO Q5 2E FC 1a 50 6 80 97 QS C6 0B Sa 27 FD 96 05 
SEEO 2 FC B6 O1 B7 FC BO BE 3O QO CE FC B1 Ce6 07 6F 





Add 。 +O +1 +2 + さ +4 + 呈 + ら 6 + フ + ヨ +9 + +B +C +D +E +F Sum 
600O BE CC 57 BF O1 E1 35 7F 9 QO QO QO OO OO 0QQ OO = ミ SF 
6010 QO QO OO OO QQ QQ QQO B6 FD Q5 2E FE 1Q 5oO 6 0 :4E dd +O +1 +2 + さ +4 + 呈 + ら 6 + プ + 日 +9 +a +B +C +D +E +F Sum 
6020 B7 FD 05 BD 74 7F FD QO5 BE 00 QO ミ O 1F 26 FC B6 =FO 6500 QC D7 QOC 97 QC D7 QC 97 OC D7 OC 97 OC D7 QC D6 :5Z 
60 さ O FD Q5 2B FE B6 BO HB7 FD 05 17 OO 91 7F FD Q5 BE :9E 6510 OC EZ BO 97 OC QF QC D6 QC E7 BO 97 OC QF QC D6 :GE 
6040 OO OO さ O 1F 26 FC B6 FD Q5 2B FEB CE 6B EQO 12 BE =:05 6520 QC EZ BO 97 QC OF QC D6 OC E7 BO さ 9 QO QQ 0O E7 :9a 
605O 6H さ 9 12 12 12 12 C6 FF 6 BO BZ FD O5 BZ FD 05 :29 65 さ O BO さ 9 QO QO OO C6 BB D7 QC C6 0Q4 D7 OC 97 OC OF =49 
6060 A6 CO BE7 FC 日 1 F7 FC BO 7F FD 0O5 7F FD 05 B6 FD :C2 6540 QC D6 QC E7 BO 39 OO QQO OO C6 BB D7 QC C6 QO D7 :BC 
6070 0Q5 2R FE B6 BO BZ FD O5 EZ FD Q5 B6 FC BQ 26 EB :E ミ 6550 OC 97 QOC OF QC D6 QC E7 BOO さ 9 Q0 QO QO C6 BB D7 :71 
60BO 11 日 3 6 E7 26 D2 6 O1 BZ FC BO 7F FD 05 7F FD :94 6560 QC C6 Q4 D7 OC 97 QC QF QC 97 QC OF QC D6 QC E7 :FE 
6090 Q5 BE OO QO 3Q 1F 26 FC 39 10 BE FC 0 ミ o BD 0O =:14 6570 BO 97 QOC OF OC D6 OF E7 BO 97 QC QF OC D6 OC E7 =:CE 
6OAO OR C6 21 6 BO AZ7 AO 5 26 F9 9 0O 0O さ F 59 41 :E9 65BO BO 97 QC OF QC D6 QC E7 8O 97 QC OF OC D6 OC EZ7 :QE 
6OBO 4D 41 55 4 さ 4 49 9 さ DS BF 90 さ 4 0 さ 1a 5O B7 D4 6 6590 BQO 97 OC QF OC D6 0OC E7 BO 97 OC OF CC D6 QC E7 :QE 
60CO On Bo D4 OB B6 D4 09 B6 D4 QQ さ 5 日 さ OO 10 BE FC =15 65QQO BO さ 9 QC EZ 0 さ 9 BB D7 OC C6 BB D7 QC C6 QQ D7 9E 
60DO_BQO さ 0 BD QQO OR C6 41 QA6 BQO 7 AO 5 26 F9 さく 9 0o 6D 65BO OF 97 QC D7 QC 97 QC D7 OC D6 QC E7 BO 97 QC OF =:1 さ 
6OEO QO さ F 59 41 4D 41 55 43 4 49 91 D ミ 96 ミ E 日 1 QO :49 65CO QC D6 QC E7 BQ 97 QC OF OQC D6 QC EZ7 BQ 97 QC CF :GE 
6QFO 2C 93 さ E 8B1 90 さ 4 7F CE CO QO 12 7F D ミ Bo 7F DS :85 65DO OC D6 QC E7 BOO 97 QOC OF QC D6 0OC E7 BO 7 QC QF :GE 





人 dd +O +1 +2 + さ +4 + 昌 +6 + フ + 日 +9 +a +B +C +D +E +F Bum 
61OO BO 7F D3 BO B6 D4 QQ B6 D ミ BO 27 F8 コ 1 Q1 27 oD :C4 
6110 BZ D4 Oa BZ D4 Oa Be D さ 1 a7 Co 2o DE 7E Co oo :p4 || dd +0 +1 +2 + さ +4 45 6 
e120 oo oo oo oo oo oo co co oo oo oo oo oo oo oo oo oo 

613O Qo Oo oo Oo Oo 0O Oo 0o oo 0o oo oo Go oo oo oo :oo | 610 BO 97 OC OF 0OC D6 OF E7 8O 97 0OC OF QC D6 QC EZ7 sQE 
6140 oo oo oo oo oo oo oo oo oo oo oo Go oo oo oo Oo :oo | 6620 BO 97 OC OF OE D6 OC EZ BO 97 OC QF OE D6 OC EZ :QE 
615Q OO OO OO OO OO QO OO OO OO OO _QO GO oo GO oo oo :oo | 963Q BO さ 9 OP QF QC De QC E7 BQ さ 9 Q4 DZ QC C6 BB D7 s6E 
616O oo Oo OO QO 0O OO QQ Oo Oo Qo oo oo Go oo oo oo oo 中 6640 CC C6 QO D7 QC 97 QC D7 QC 7 QE D7 QC De QC E7 :BA ] 


+ フ 7 + 日 +9 +Q +B +C +D +E +F Sum 














117 


マシ ン 語 ダン プ ・ リ スト 





6650 BO 97 OC QGF QOC D6 QC E 
6660 BO 97 QC OF QOP D6 0C 
667Q0 8O 97 QOC OF QC D6 OC 
















6B40 BE さ Q 00 
6B5O FC 1A SO 


SE :86 
FC s158 
64 』21 














66Bo_BQO 39 04 D7 QOCE C6 BB 6B7O BoO 69 C4 OO iC4 
| 6690 QC 97 OC OF QC D6 0C 6EBO 97 05 1C 39 iA ワ 
| 66aQ_BO 97 QC OF QE D6 GCC ら 6B9O OO _QO_QO oO5 65 
| 66EQ BQO 97 QOC OF QE D6 0OE | 6BAO 2E FC 1 2 44 
66CO_OC D6 OC E7 B0 39 0QO 6BBO FC B6 Q2 さき 4 iR 
66DO_OC 97 OC D7 QOC 97 GC 6BCO 7F BD 60 86 :FD 
66EO OC D6 OC E7 BO 97 0C 6BDO FD 1F BE C1 67 


GO 


セ 
ュ 
民 
2 
ご 
+ 
4 
キ 
1 
お 
上 
+ 
ドコ 
キ 
| 
+ 
ひ 
+ 
NR 
+ 
m 
キ 
-O 
+ 
セ 
+ 
に 
キ 
ロ 
キ 
に 
キ 
ul 
+ 
マ 
の 
由 
ョ 


9) 中 区 志 選 
B6 01 BZ 
BO 69 C4 
97 05 1C 
- OO _ QOQO_ OO 
6C40 OO_QO_QOO OO OO0 7F 6C FO 3B 6 7F 4 26 FD 96 6G5 
0 6C5O 2B FC 1 50 B6 BO 97 05 C6 OB 5 27 FD 96 05 2 
OC OF 0C D6 0C EZ zBO 6C60 FC 日 6 02 BZ FC BO B6 OO 97 05 1C aF 35 34 
OO 00 00 C6 BB DZ sE5。|| ec7O 7F BD 60 17 BE 6F 45 BF Q1 E1 B6 aC BZ 6C FO 86 
OE OF QC De 0C EZ giFE 6PBO FD 1F BB B6 7F BE ミ 4 QO C6 Qa CE 6 QB 10 E C1 
OC OF QC D6 QC E7 :QE || 。cCgo 1o aF 1 5 26 F フ 7 4 26 EF 6 39 AZ7 B4 BE so QO 
OC E7 BO 97 0C OF sEB || 6Cao Be Bo BD 34 OO B6 18 4 26 FD 96 Q5 SB FC 1 Bo 
BB" BZ .GPIG9.0O5D7 BB C 5 OB 5A 27 FD 96 05 2 FC B6 Q1 H7 
FC B1 C6 Q1 6F C4 64 BO 69 C4 
6 


20 













ひい 
人] 
で 
ら で 
ご ロロ 
ロ ご 
ロロ G 
ひ 3 
らら 
ゃ ロロ 
ロ 選 
S 
らら 
ロロ 
Q ら 
ひひ 
G ご 
ロウ ロ 


























BF O1 E1 B6 B4 7 6D ミ 日 6 FD 1F BB B6 7F =:41 
OO _C6 1 CE 66 C9 10 AE C1 10 aF 日 1 5A 26 iDE 
・ 00 』F5 
4 26 FD 96 0S 2E FC 1Q 5Q0 6 0 97 Q5 C6 :9F 
27 FD 96 05 2 FC 6 01 B7 FC B0 BE さ 9 QQO siEF 
81 C6 Q5 6F C4 64 BQO 69 C4 5Q 26 F9 68 C4 jiFF 
0 :BC 
20 0O BE CC 7 BF O1 E1 7E 6D Q4 39 QO OO 65 
6E 56 3B B6 7F 4 26 FD 96 CS5 2B FC 1a 5o 
7 05 C6 08 5Q 27 FD 96 05 2Q FC 6 02 B7 
17 
















Bums 
dd  + 〇 O +1 + フ + ミ +4 + ロ +6 + フ + 日 +9 + 人 Q +B + ピ +D + せ E+F Sum 
6AOO D7 B、 
6Q10 39 4 add 
6Q20 61 C 6FQO 
6Q30 ささ 7 SF10 
6 人 40 ささ 1 GoF2Q 
6A5Q 1E 品 ESO 
6a6O 5a Bm | | 9E40 
6a7O Q4 4 ら ES 
6aBO 9E CE EGO 
6a9Q BO SS | BE 
6AAQ E6 5( 語 SEB0 
6aBO C1 B | eFgo 
6aCO 9D フッ | eFao 
6aDO FB sg || 6FBo 
1 | sFco 
フ 





Sum: 6E 


dd +0 +1 +2 + さ る +4 +5 + せ 6 +Z + 日 19 +a +B + ビ +D +E +F Bum 
6BOO 96 QG 2A FC ヨ 6 02 BZ FC 8B0 ヨ 6 OO 97 Q5 1C AF 35 i9E 
6B10 12 3B さ 4 7F BD 60 17 BE 6 EB BF Q1 E1 6 Ea BZ :aC 
6B2O 6E BS 86 FD 1F BE 6 7F BE さ 4 QQO C6 18 CE Sa DF iC 
6B3O _ 10 AE C1 10 aF 日 1 5 26 F7 4 26 EF 6 39 a7 4 :7F 
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以前 , PC-8001 で 株 式 チ ャ ー ト ・ プ ログ ラム を 作ろ うと 
し た の で す が , ドッ ト が 粗い の と , デー タ の ロー ド に 時 間 
が か か り , あき ら め て いま し た . 今度 FM-8 を 購入 し て みて , 
ドッ ト が 細か く , 1.600 ボ ー な の て 少し は 速い だ ろう と 思い , 
再度 挑戦 し て み ま し た . 結果 は 予想 以上 で し た . 

チャ ー ト は か な り 細 か く な り , それ 以外 に いろ いろ な 機 
能 を 加え る こと が で きま し た 。 


| 機器 構成 


⑩FM-7/8 
人 め 高 解 度 ディ スプ レイ 
フリ ンタ 
⑳ カ セッ ト ・ レ コー ダ 
プリ シタ は な ぐ で も 使え ます が , ゎ 当 氏 ハー 層 ・ 選 ピー は 
で きま せん . 


プロ グラ ム に つい て 


だ 方 宮 じ し o 坦 02FK の 





プロ グラ ム を 作る と き の 共 本 的 な 考 

点 に 注意 し ま 必 た : 

⑯ 入 力 す る デー タ は 週末 の 終値 だ け と する . 
高値 。 安値 。 出来 高 な を どの 入力 も 考え まし た が , 入力 に 
時 間 が か か っ て 面倒 で あり , また 余り 多く の 情報 を 入れ 
て も , か そっ て 判断 が 鈍く な っ て し まう の で , 単純 に し 
に | y 

チャ ー ト の スケ ー リ ング は で きる だ け 同 じ と する . 市 販 
の チャ ー ト 誌 は 銘柄 に より まち まち な の で , 相対 的 に 高 

写真 1 


アイカ ドラ トウ ログ (ショ キ トウ ロク 。 テ *ー タ ー 4 マテ * > 
DRTR ヨミ コミ 〈 サ イシ ョ ニ オ コ ナ ウ > 

DRTR INPUT 

チャ ー ト ヲ ミニ 


の D は Q 


メイ カラ ウイ カ 
メイ カラ サク フラ ヾ ョ 
トウ ログ No 。 ヒョウ シ “ 


DRTR キロ ク (サイ コ ^ ニニ オ コ ナ ウ ) 


に 
に 7 
ア : 
に 衣 
9 : 


キー イフ ーー>〉 画 





圏 ア デイ & ケ イ 


い の か 安い の か 判断 し に くい か ら で す . 

売り 買い の タイ ミン グ は , ハッ チ 法 に よる も の と し ます . 
ハッ チ 法 と は , 安値 より 10% 上 算 し た と ころ で 買い , 高 
値 よ り 10 下 が っ た と ころ で 9 た [で ぐす 


人 きい カ 


⑩⑯ キー 入力 に つい て : 基本 的 に , 各 作業 の 終了 は [O| で 終わ 
る よう せい て あり ます また 、 途中 に (Y・ リ /N) と か 
(Y/N・ リ ) の 表示 が で きま す が , これ は [Y] か [RET_ 
URN| の どちら で も 受け つけ る と いう 意味 で す . 後者 の 
場合 IN| か |RETURN| で す . 多く 使う 方 を , [RETUR_ 
N| で 処理 で きる よう に し まし た . 

@ 全 録 : : 最初 は |9| を 押し て 初期 登録 か ら 行 
い .。 その 後 は |5| を 押し , 追加 を 行なっ て くだ さい . 
その 場合 続け て デー タ を 45 週 分 まで 入れ る こと が で き 
ます . [O| を 入れ る と 入力 は 終了 し , 高値 の あっ た 月 を 
開い て きま す . それ が 終わ る と 次 の 入力 に 移り ます . な お , 
デー タ を 、 あらかじめ 読み 込ん で あれ ば , 間違っ て [9] 








な っ つ 沿 ぐ だき 


を 押し て も 登録 を 受け つけ な いよ うに し て あり ます . 
デー タス 入力 : 1 画面 15 銘 柄 ず つ 入 力 , 表示 し て いき ます . 

入力 ミス を 防ぐ た め , 右側 に 先週 終値 を 表示 し て あり ま 
す . これ に よっ て 尋常 値 を 見 つけ ます . デー タ が 入り き 
ら な く な る と , “アフ レ " と 表示 し て 次 の 銘柄 に 移り ます . 
RETURN | を 押す と 、 各 銘柄 ご と に 安値 、 高値 の 月 を 比 
較 し て 入れ 換え て ゆき , 次 の 画面 に 移り ます . 

登録 で きる 銘柄 数 は 60 銘 柄 ま で で す . これ 以上 は デー 
タ 用 テー プ を 別に 作っ て くだ さい . 

記録 で きる デー タ 数 は 2 桁 銘柄 の 場合 、63 週 分 (1 

写真 2 





7 二 P3 ト 」』 
困 
き 


<m 
1 
ドコ 


458 ] 


HL 


Ce Ca 
嘱 加 
品 


は は 
名 S 
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1O 


年 2 箇月 位 )、4 桁 銘柄 の 場合 、 50 週 分 ( 約 1 年 分 ) で す . 
これ 以外 の 株 価 、 つ まり 2 桁 と か 5 桁 の 場合 は 3, 4 桁 
に 修正 し て 入力 し て くだ さい . 

デー タ の ロー ド 時 間 は , 13 銘 柄 10 箇 月 分 (43 週 分 ) を 
読み 込ん で 約 1 分 位 で す . 60 銘 柄 入 れ て も 4 一 5 分 で 済 
むと 思い ます . この 程度 で あれ ば , イラ イラ し て 待つ こ 
と も な いで し ょ う (プロ グラ ム 自 体 は , 約 2 分 弱 で ロー 
に で きま * ポ )s 


@ 銘 柄 を 買っ た 場合 : まず |Z| を 押し て 銘柄 の 登録 番号 を 


調べ て か ら メ | 
こ で 買値 を 入力 する と , それ 以降 の 株 価 が 買値 を 上 まわ 
れ ば , 自動 的 に 高値 と 買い 値 の 入れ 換え を 行ない ます . 
これ は , ハッ チ 法 に より 売り の タイ ミン グ を 見 る と き に 
必要 に な る の で 設け まし た -. 





チャ ー ト 表示 : ここ に 一 番 力 を 入れ まし た . 


まず チャ ー ト ・ メ ニュ ー の 中 で , “UP メイ ガラ ” と あ 
る の は , 今週 と 先週 を 比較 し て , 上 昇 し て いる も の を 表 
示し て いき ます .“ 十 10% メ イガ ラ " は 、 安値 より 10% ア 
ッ プ し た 場合 ,“ー10% メ イガ ラ " は , 高値 (安値 ) より 
102 ダ ウン し た 場合 の み 表示 し ます . また , 新高 値 銘柄 
は , 新高 値 の 場合 の み 表 示し ます . 

これ ら は すべ て , 今週 の デー タ で の み 判 断 し て いま す . 
つま り , 先週 の デー タ が 十 10 を 越え て いて 。 今週 の デ 
ー タ も 十 10 多 を 越え て いた 場合 に は 表示 し ませ ん . これ 


年 足 チ ャ ー ト 例 








2 :^492 ド 9 3 FL 
969 969 
859 858 
69 869 
759 758 
789 799 
659 由 658 
699 | 四 669 
558 558 
5e8 ]- 569 
458 I 459 
499 に = 499 
359 358 
368 
258 259] H 
159 298 
166 169 mu 
2 :A492 ド 9 

















11 の 292 (9)% 9 9EY5 が 39 ( 25 )% 





EE お は 人 下 ド ドド 





は 入 は ドド 
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週 中 チャ ー ト 例 








8:?937 【?)4]= 1388 円 ャ Z 4 ] 





= 962 円 
[フイ 由 1256 上 








ドッ トス ケー ル 入 り 








8:?952 2074]= 1388 月 は 





8:?937 【?14]= 1388 四 [thZ4 ぇ ]= 982 円 





13 週 移動 平均 線 入り 


みね 摘 古 


7" う 29" 作 ]= 1258 月 











IM 
旧 1 
| LT ml. 
ーー ] 
498 
十 1022( カ イ ) ラ イン 入り 
8:?95? [?14]= 1388 崩 が 2 4 ]= 982 目 
フ 2]= 1258 月 





992 四 





ー102%( ウ リ ) ラ イン 入り 損益 表 入り 
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』0 


に より 最新 情報 の み を 取り 出せ る わけ で す . 年 間 チ ャ ー ト も 作成 し て お きま し た . 過去 10 年 間 の 年 足 
つぎ に チャ ー ト その も の で す が , [1|-[「 ぁ | の キー に つっ を 記録 し て お く た め で す . デー タ 数 は 400 まで . 操作 方 法 
いて は , 続け て 押す と 前 の 表示 が 消さ れ ま す . [1 | は 横 は 週 足 チ ャ ー ト と ほぼ 同じ で す . この 中 で , [3| を 押し , 


の ライ ン 引 き , | 2| は 13 週 移動 平均 線 (た だ し , デー タ チャ ー ト を 指定 し て アッ プ 銘 柄 を 選別 きせ る と , アッ プ 補 
が 13 週 以上 必要 ) で これ も 売買 の 目安 と な り ま す . |3| と を 表示 し て 率 の 小さ い 順 に 表示 し て いき ます . この ハー ド 
4| は , +10 多 一 102 タ の ライ ン を 引き , その 値 も 表示 ・ コ ピー を と っ て 新年 度 の 作戦 を 立て る わけ で す . アッ プ 
し まう 33 SNS50 ス as に 2 必 を 2 倍 に じ で (チー 上 率 が 小さ いと いう こと は , 新年 度 で きら に 上 昇 する 可能 性 
か ら 見 れ ば 1/2 縮 小 ) 表 赤 し ます . 大 き な 流 れ を 見 た い が 大 きい と 言え ます . 安値 で 買っ て 高値 で 売る の は , 株 の 





と き に 使い ます . [6| は 現在 値 に 対す る 損益 を 表示 し ま 基本 で すか ら ………. 
す . 株 数 は 千 株 単位 で 入れ て くだ さい . |[Q] で 湊 に 移り 
まり 3 | 2 4) / デ 
銘柄 削除 : この 場合 も 登録 番号 を 前 も っ て 見 て お く 必 要 わり に 
が あり ます . また , 削除 を 行なう と 、 デ ー タ 記録 の と き , 
登録 番号 が ズレ て 記録 きれ る の で , 次 に デー タ を 読み 込 以上 で す が , 単に マイ コン に チャ ー ト を 描か せる の で は 


むと き , |Z| を 押し て 新しい 番号 を 見 て お いて くだ さい . な く , 実際 の 売買 に 役立て る た め に 使う こと が 大 切 で す 
の デー タ 記 録 : 1 日 の 作業 の 終わ り に は 必ず 行なっ て くだ この プロ グラ スム 完成 後 , 早速 ある 銘柄 を 買っ て いま す が , 
さい . 現在 。 2 週間 で FM-8 を 買え る だ け の 利益 が で て いま す . 
すべ り 出 し は 順調 の よう です. 株 に 尋 味 の ある 方 は 、 打ち 


| 年 間 チ ャ ー ト に つい て TOTT 


週 足 プロ クラ / = っ = モー 



































10 "XXXXXX% 。 ジュ ウソ フ フ " ロ フラ XX 43O LOCATE。 19: CULUR6: TNPUT "カウ ニッ 。 。 。 DR で (Y・ リ /N) 

20 ゆ 557 。 "4 昌和 : CDLUR ア 

11。7 By K.1 _ 440 ITF ロ ま ="Y" UR ="" THEN 46O 

30 CLEAR17000: DEF INTQ-Z 450 IF ロ ま ="N" THEN CLB:GD TU さ BO ELSE 43Q 

40 M1=60: M2=45 460 LUCATE ロ 。 3: COLUR フ = TNPUT "リキ * 力 " アリ マッ マカ 2(Y・ リ /N 

SO DIM N* ま (M1 ) 。D*(M1 ) 日 ま (M1 ) 。、DQ ま (M1 ) 。、 和 T ま (M2) 。M(M1) ||) 「・B ま 

。 り (65) 。HT (M1 ) 。LD(M1) 。Ka(M1 ) 470 IF 口 ま ="Y" OUR 中 = リリ THEN CLSiR=R+1 : GH TH 370 

60 WIDTH40。25: LUCATEO 。 0: CHLUR7: PR TNT "ーーーーーー ッ ||480 IF ロ *="N" THEN E2=R: RETURN ELSE 460 

ュ ウ ツ の ーーーーーーー 490 ミタ * シ 

70 LUCATE 0』2: CDLHR さ =FRTNT "9』 メイ カラ トウ ロフ (bp ョ キ トウ ロ | 100 LOEATEO。Oi EDLHR7:FRINT" 

の 。 テー ワー" ョ M1 3 リマ テ " 。) と 

BO LOCATE 0。4:COLUR6: PRINT" 1: DaTA ヨミ コミ (サヨ ニオ || 一 ーーーー" 

コナ ウ ) " 10 LOCATEO。 1 : CDLOR6:FRINT"NO :』 2 メイ が ラ N 

90 LUCATE O。6: CULOUR7:FRTNT"2』 DAT INPUT" Os メイ ガラ No : メ ィ イガ ラ No : メイ 

100 LOCaTE 0。 日 :CDLUR5: PRINT " コ : チャー ト ヲ ミル " と 

110 LOCATE Q』10:』 CHLOR2: PRINT"4』 メイ カラ (カイ )" S2O_ LUCATEO。 Si CULUR7:FRTNT" 

120 LUCATE O。12:CDLDR4:PRINT "5』 メイ カト ラ リィ カリ 

130 LOCATE 0。14:COLHR4:FRTINT "6』 2 イカ "ラー サフ が ョ リ SETIRNM 

140 LOCATE 0O』16: COLDR5: PRTINT "フェ トウ ロフ NOD. ヒ ョ ウリ 530 "リリ . ビ 

15O LUCATE O。1: CDLUR6:PRTNT "日 : DATA キロ フ ( サ マコ" ニ |1540 LUCATE5、2 さ : CDLDR5: FRTNT "リタ ー フ (9 キ ^ ) nr CC( コ ヒ “ 一) " 

オ コ ナ ウ ) " : CDLUR7 

16O LOCEATE O、20: CDLUR7:PRTNT"O』 END": PULUR フ コ 50 口 ま =TNKEY 和 も 

170 LUCATE O』2 さ : EDLDR4: TNPUT "NO。 キー イン ーー* "。 器 560 IF 品 村 ="C" THEN LUCATE5。2 さ :FRINTSFC(22) : HARDC 

18O IF Bi9 THEN 170 :ELS:RETURN 

190 IF Q=9 THEN 13BO 70 1TF =CHR ま (13) THEN CLS:RETURN ELSE 550 

200 IF ロ =O THEN MIDTHBO、2O: CDLDR7: END 58O *Y 

210 DN ロ GBD TO 1420。1560。 19 ミ O。23BO 。2490、27BO 。 2B9 | | 590 ITF HI(R) /CY =<156+100/CS THEN RETURN 

0.2960 ら 600 _CY=CY+CS:BD TD 59o 

22O " %X% ル GUBH ルー チー ※※% は OL の は 且 

230 "ナシ 620 CULUR5: LODY=CYx(100/CS) : 8=LDY: 88=10xCY 

40 LOCRTESB』10:FRTNT" す ナ シー! 10kFDR M=1TOSOOO0:NEXT | 630 LINE(43』10) 一 (43。 180) 。FSET。 4 

: RETURN1940 640 FUR 1=1 ヨ O TU 2O_ STEP-10:9$=STR$ (5) 

25O "マエ / DaTa 65O IF (TI MDD 20)=O THEN 66O ELSE 67O 

2 っ 60 FDR R=1 TO E2 660 COLUR6: SYMBDL (O。 エ ユー4 ) 。B ま 。 1 1 :BD TD 68oO 

3270 LE=LEN(D ま ( 民 ) ) 67O_ COLDR4: SYMBDL (O。 エー4) 。 8。 1 。 1 

2BO DA*(R) =MID も (D ま (FR) 。LEー5。 4 ) 68O 5S=8+88: NEXT 

290 IF INBTR(DQ*(R) 。 "すり ) =O THEN =10 ELBE 人 Q= ヲ 690 FUR エ =18O TO 2O_ STEP -10』PSET(41 。 1) :PSET(42。 

30O_ NM(R)=VaL (MID ま (D ま (R) 。LEー。 4 ) ) 1) : NEXT 

き 310 NEXT R:RETURN フ 700 * チ ャ ー ト 

ささ 20 "カフ リョ ウ 7 フ 10 NE=O0: ITF LEFT(D$(R) 。 1 ) =" リ =" THEN NE=1 : RETURN 

さき 30 LOCATE155。 15: CDLUR4: FRINT "カフ リョ ウー !! "gs EDLHR7 ェ F | | 7GO ED=INSTR (D ま (R) 。" =") 

DR 1=1 TOD 100O:NEXT:RETURN6O フミ O り $=LEFT も (D$ も (R) 。 ITNSTR (D ま ( 民 ) 、"+") 一 1 ) : V= ニ VQL ( り ま ) 

40 "END 740 YO=180- (りー-LDY) /CY: IF YO>1BO THEN YO=18O 

350 CLS:LUCATES。 10: COLUR6:FRTNT"E N D":FHR 1=1T|| 7BO =1:NV= ニ OFS= ニ O+ CC=1 : HG ま = は ( 民 ) 月! 

D10OO: NEXT: RETURN1940 760 IF T=ED THEN TC=CC:LDCATE255。 Os CODLOR6:』 PRINT"[ 

さき 60 "トウ ロフ 2 カネ ] コ = リ "3HT(R) 3 "円 "LOCATE4 さ 。O: CDLUR5: PRTNT"[ ヤ 

さき 70 IF RM1 THEN E2=R: LHCATE5。 10: CHLDR2:FRINT "メイ | ズ ネ コー ニ リ %LO(R) "円 "LUCATE4 さ 。 1 : COLDR7:PRTNT "上 ケ " フサ 

が ラ キー リー" ェ FR エニ =1. TUD さ OOO: NEXT: RETURN6O イチコ = リョ NVi "円 " RETURN 

3 LUERTEO。 GS: CHLUR4:FRTNT " ケ * ノー トウ ロフ Ng.=" ョ 770 り ま =NMID ま も (D も (R) 。T。 INSTR(T。D ま (R) 。" ナ す ") 一 征 ) 
LUCERTE17。 ら 6:FRTNT"ーーーーーー " 7BO =VaL (V ま ) : り (CC) = リ = し =LEN ( り $) : = モエ + し +1 
LDCATEO。 品 : COLDR フ : INPUT" メ イカ" ラ (9 モミ パー イ ナイ ) = リ 、N 串 | 790 Y=1BOー(V-LDY) /CY: TF Y*18O THEN Y=18OELSE TIF 

Y<10 THEN Y=1O 

ITF LEN(N$(R) ) *9 THEN BEEF:BU TU 40O B00 ITF YYO THEN B10 ELSE B2O 

















4SO_HT(R)=10O: ド Ka(R) ニ 100: LU(R) =20O00:B$(R) ="1" =D ま | 昌 10 LINE(XO。YO) 一 (X0+ さ 。Y) 。、PSET。。 BF:BD T ロ B40 
(R)=" =" B20 LINE(XO。YO) 一 (XQ+ さ 。Y) 、PSET 。 7。 日 





121 


10 


週 足 プ ログ ラム 





ー) 。 HB ま 。 1 。 1 

日 40 YO=Yi XQ ニ XO+ ら 6』 NV=V』 ビビ ニモ ビビ +1 :GH TU 760 

BSO' 13。 ジコ ウ 

60 IF V(13)=O THEN BEEF』LUCRTE6 さ 。 17: CHLURS FRIN 
T" テ *ー タ ー フ ソフ ク !!0aFHR J=1 TH 1000』NEXTLHGATE6 さ 。 
17:FRINTSFC(15) : RETURN 

7O_ CC=C ビ -13 ょ TX=118:T1=O 

BBO FUR J=1 TO 13: 本 1 拉 = ニ 1 持 +V (J) : NEXT: TS2= ビ INT ( 征 1#/ 
13) 

90 TY=1 ヨ 0-(TS-LOY) /CY: ITF TY>1 ヨ 8O THEN TY=1 ヨ O ELS 
E IF TY ぶ 1O THEN TY=1O 

200 PSET(TX。TY。6。 XR ) 

910 丁 1 提 =Os TX= ニ TX+6g DTY=TY 

1920 FOR IT=2 TU CC 

930 FUR J=1I TO 1+12= 征 1 提 古 1 拉 +V(J) :NEXT:T2= ニ CITNT(T1 
菩 /1 さ ) 

940 TY=1 ヨ 0O-(T2ー-LOUY ) /CYi IF TY>1 ヨ O THEN TY=1 ヨ 0 EL 
E IF TYX10 THEN TY=10 

950_DTY=(DTY+TY) /2 

960 PFSET(TX- さ 。DTY。6。 XR ) 

970 FPSET (TX。TY。 6。 XOR ) 

980 1 提 =Oi TX= ニ TX+6s DTY=TYs NEXT 

99O_ RETURN 

1000 "DDT 

1010 FOUR エ =180 TU 20 STEP-10:FUR J=45 TU 4 さ 32 STE 
P_10: FPSET (J。 エ T。 4。XOUR) : NEXTJ。 T RETURN 

1020 *"ー10% 

103Q VMD=INT (KR(R) *。9) : VD ま =STR ま (VD)+" 円 gYD=180ー( 
VD-LOY) /CYi IF YD ぐ 10 THEN YD=10 ELSE 1F YD>1 ヨ O TH 
EN YD=18Q0 

1040 LINE(45。YD) 一 (43 さ 2 。YD) 。 XHR。 2: BYMBUL (43。 YD-4 ) 
。 VD ま 。 1 。1。7。 。 XUR: RETURN 

1050 「 オ 10X 

1060_VD=INT (LU(R) *1 。 1 ) : VD ま =STR ま (VD)+" 円 "sg YD=1 ヨ Oー 
(VD-LOY) /CY: IF YD で 10 THEN YD=10O ELSE 1F YD:18O~ 生 
HEN YD=180 

1070 LINE(45。YD) (432。YD) 。 XHR, 弓 : SYMBDL ( 43 YD-4 ) 
。VD ま 。 1 。 1 。7。。XUR: RETURN 

108O "ソフ ッ エ キ 

1090 LHCATE60。 19: CULUR5: INFUT "カイ ネ = "。a1 

1100 LOCATE60。 人 1: EDLUR6:FRTNT "カフ "スウ = リ "LHCATE72。 
21iCOLOUR6』PRINT"(X1000) 『" 

1110 LUCATE67。21』: CHLUR6: INPUT" 
ー1X1.03) XS) /10) 

1120 IF ATSO THEN 1140 ELSE 113O 

1130 LUCATE60。 2 さき 』 ELUR4:FRTNT "ソフ エキ = ニー ヤ フ +" ョ TI "マフ 
"iCOLUR7』 RETURN 

1140 LUCATE60.2 さ EDLHRS ェ FR TNT リ ソ ッ エキ = ヤヤ フ 
"sg ECULUR7』 RETURN 

115O "に ヒョウ 

1160 MIDTHBO。 2 XO=45: LUCATE BB。O: CHLUR フ PRINTUST 
NG " 拉 拉 持 & り iR。N ま も (R) 

1170 BUSUB5SBO』 GOSUH610』 7 レフ ミ バ 多 の ラフ 

1180 LOUCATE6 ラ 。 1 : COLOR4: FRINT "1: トド リト マヌ ケー ルリ 

1190 LOUCATE6 ミ CULUR6』 FRTNT "2 ュー 1 コジ シュウ ニー イト " ウ バ イキ フリ 
1200 LUCATE6 さ 。 5: CDLUR2: PRINT " そ 』 ニー10 ん (ウリ ) ライ フ 
1210 LUCATE6 さ 。7』 EDLUR5: FRTNT "4:』 +10( カ カイ) 
1220 LUCATE6 さ 』。9: EDULUR5: FRTNT " 呈 :』 (1/2) ジュ グ = 
1230 LUCRTE6 さ 。 1 1 CHLUR さ : FRITNT"6 ソフ エキ リ " 
1S40 LUCATE63。 13: COLUR4:PRINT "フェ コ ヒ ?ー リ 

125O LOCATE6 さ 18: COLHR7 ェ FRTNT"Og リリ キ " ニ の 9 ル 。 
1260 LINE(495。0) 一 (639、12B) 。FSET 。 4。B 

1270 LUCATE6 さ 。 17: CHLUR6: FRTNT "NO. ラ キー イフ ーー テリ 
12BO =ITNEEY ま ょ TF ロロ 和 ま = リリ THEN 128Q 

1290 LUEATE6 さ 。 17sFRTINTSFC(15) 


司 TF り =HI(R) QAND FS=O THEN FS=1: SYMBUL(XO0-2O。Y 


"。 Ss RT= ニ CINT(((NV 


"5 Ti" マン 









ウ " 











13 IF ="O" THEN CLS:V(1 さ 3) =0: X=4 ロ : XN=BO: RETUR 
N 

1310 IF 昌和 ="1! THEN BOBSUB1O00: GO TO 127O 

1 さ 20 IF 品 ま ="2" THEN CC=TC: BUSUBB5O BU TU 127O 
13 さ 0 ITF 唱和 = リリ THEN BUSUB1020: GU TU 1270 

1340 IF 避 ま =" リ 4" THEN BUSUB105O: GU TU 1270 

1350 TITF 品 ま =" 避 " THEN TF F5=O THEN F5=1 : CY= ニ 2*CY: CS 


=CYs BUTO1 15O ELSE F5=O』 CY=CY/2』 ビ =CY GBD TU 115O 
1360 1TF 器 下 =" リ 6" THEN TF F6=Q THEN F6=1 : BHSUB108O ェ 
BU TU 12S70 ELSE F6=OsLTNE(470。 150) 一 (6 さ 9。 199) 。 PSE 
TO0。BFi BU TO 127O 

1 ミコ 70 TF GQ 和 = リブ" THEN LINE(49 旨 。O) 一 (6 る 39。 1 さ 6) 。PSET 。O 
。 BF : HARDCS: BU TU 118O ELSE BEEP:GD TD 1270 

13O " 還 較 トウ ロフ (ジョ キ ) 男 証 画 

1390 MIDTH40. Ss TF HI(1)SEO THEN BEEP:LUCATEO。 10 
sPRINT" ト ウロ 2 アリ !!o。 (Ii リ ゴ カ ) ラミ シテ 22" サイ"sFUR 了 =1TO 
さき 000s NEXTiGBU TO 69 

1400 R=1:GHSUE さ 60』 "トウ ロフ 

1410 GUTD 60 
14SO " 還 較 ヨミ コミ 























1430_ MIDTH40。 SO LHCEATE5。 10: CHLUR5SgPRINT "DRTR テー 
si: CODLOR7:PRINT "リラ セト テリ 

1440 LHCEATE10。12: COLUR6:FRTNT" PLRY 
TNI 2 スク クタ も が 7 

145O_ LOEATE5。15:FRINT"( す 2LnT "sgEULHRSIFRTNT "RE 
TURN キー リ "isEOLDR7 ェ PRINT" すす 56 う 『 

146O IF INEEY ま =CHR 串 (1) THEN 1470 ELSE 1460 
147O_CLS』sLUCATE5。』 10: PRTNT "ーーー ヨミ コミ チュ ウ ーーー" 

148O R=1 : HPEN" 1 。 手 2。 "CASOISYUDATa1" 

1490 IF EDF (2) THEN CLUSE##23 GBD TU155O 

1500O INFUT #2。HI(R) 。LU(R) 。 ド KR(R) 

1510 INPUT 人 で 。N ま (R) 

152O TINFUT 拉 人 では 呈 (R) 

153O _ INPUT 拉 2。D ま (R) 

1540 R=R+1: GU TO 149O 

1550O ES タニ Rー1 : BUSUEB さ 2O 

1560 "* 還 還 是 DQTR INFLUT 男 還 較 

157O_ MIDTH4O。20: LUCATE。 10』 CDLUR フ ミ INPUT リナ っ フ 月 デ * マ 
カカ ="。B ま :CLS 

158O X= ニ 0: XX メニ 24:FLAG=1 

1590 "上 ヒョウ” 入 TINPUT 

1600 FUR R=1 TU E2 STEF 15 
1610 LHCATEO。 Qi CHLUR6gFRTINT" 
9 "siCEOLOR4 ょ FRINT "セン ジュ ウリ 
162O0 LHCATEO。1:FRINT" 


1630 LOUCATEO』17:FRINTSTRTNG ま も (31 。 リー リ ) 

1640 Y=2sFUR J=R TU R+14 

1650 LE=LEN(D ま (J) ) : IF LE=E THEN DD=OkGD TO 168O 
166O IF LE:25O_ THEN BEEP:LUCATEO。 18: COLDR2 FRINT 
N ま (J) 』 "ニー アフ レ し "DA ま ()=""gDQ=OsFUR MM=1 TUSOOO NEXT | 
: DD=VaL (MID も (D*(J) 。LEー5。 4) ) : 1(J) =DD: LUCATEO。 18:P | 
RINTSFC(2O) : GBD TU 1690 

167O DD=VaL (MID ま (D ま () 。 LEー5。 4 ) ) : MM (J) =DD 
1680 CUHLUR7: LUCATEO。 18:FRINTN ま ( け ) 3 "= リュ 
Da*$ () : Da=VaL (DQ ま (J) ) : LUCATEO。 18: PRINTSFC(2O) 
1690_ LUCATEO。Y: CHLUR フ FRINTUSTNG" 提 井手 5 % 名 
韻 提 電電 = "3J。N も (J) 。 DA 

1700 LUCATES う 。 Y: CHLOR4:FRINTUB TNG "" 拉 韻 拉 拉 振 "』 DD 

1710 Y=Y+1s ITF J>E2ー1 THEN BEEPsGO TO 1730 
172O_NEXT JiBEEP 

1730 LOCATEO』 18』 COLUR6』 INFUT "2Z (テイ セイ ) 。 リ ダー (和牛 * ) 
s も :CULUR7: LUCATEO。 18s FRTNTSPC (3O) 

1740 TIF 時 ="Z" THEN 1760 

175O IF 品 ま =!! THEN 181OELSE 17 さ 3O 

1760 "ティ セイ 

1770 LOCATE5。 18: INFUT "テイ セイ ヌル No= "。iLUCATE5。 1 日 
: FRINTSPC(2O) 

1780 IF GSR OHR GR+14 ロ R BE2 THEN BEEP:GO TO 17| 

70 

1790 IF VaL(DQ ま も ( ロ ) ) =O _ THEN BEEP:GH TU 173Q 

180O LOUCATEO。 18: CDLUR5: PRINT "イマ ./ テ "ー ワ ー= リ ョ Da ま (日) 

LUEATE2O。 1 日 : CDULHR フ = INPUT "2" シイ デー ター テリ" DQ ま (ロロ) DR 

=VRL (DA ま も ( 唱 ) ) :LDCATE16。 避 (16) *15+1 : CDLUR6』FRINT 

UING " 拓 提 拉 提 井 "! ョ DR COLUR7: LUCERTEO。 18: PRINTSPC (3B) 8 

0 TO 173QO 

19 全 寺 

182O_ FUR J=R TO R+14 

183O DRQ=VaL (DA*(J) ) 

1840 IF Da=O THEN 1890 

1850 IF Da:HI(J) THEN HI (J) =DRs 日生 (J ) = は 欠 

1860 IF DSLO( け ) THEN LU(J) =DA 

1870 IF Da:KA(J) THEN ERR (J) =DAa 





"ii: CULUR7:FR 


NGs ディ イ ガラ sa コ 922 

















| 
| 
| 


188O D$(J)=LEFT 吊 (D ま ( 吉 ) 。 INSTR(D ま ( け ) "= リ )ー1 ) +DRR ま ( り 
) より キ ニ リ 
1890 TIF JE ター1 THEN 1920 


1900_ NEXT J 

1910 CLSsNEXT R 

1920 GO TO 60 

1930 * 回 是 還 ジコ ウ チャ ー ト 回 是 

1940 MIDTH40.25: LUCATE。 さ : COLUR プ FRTNT "ーーーーー 
h : デ ーー ビア ポ 

195O LOCATE さ 。6』 CULUR フ FRINT" 1: セ ド フ ブロ 

1960 LUCATES。 BB: CDLUR7:PRINT "ミコ の "9 リ 











1970 LODCQATE3。 10: CUHLUR5s FRTNT "コミ UP 7 カラ リ 
19BO LUDCATE3。 12』 EDLDR4:FRTNT "人 4: シフ タカ ネー パカ ラリ 
1990 LUCATE き 。 14: CULUR: FRTNT "5 +10 多 (7) 主力 
SOOO_ LUCATE さ 。 16: CDLURS ェ FRTNT "6』 一 10%(9 ウ 9) が 
201O LOCATE ミ 。 1 日 : CDLUR7:FRTNT"O』 メニ ュー ニニ モト “ルリ 
2020 LUCATE さ 。 2 さ 』 TNPUT "NO 。 キー イフ ーーー テ リョ 公 

2O030 ITF ar6 THEN BEEF:BO TU SOSO 

2O40 ITF =O THEN 60 

2O5O_ ロ N BU TO 2060.S1004。 で 180。 0。2SBO 





2060 セン ズバ 
2070_ MIDTHBO。 25:FHR R=1 TU ES CY ニ SCB=EY 
2OBO_ BUSUB1 150』 "の 2" ラフ 
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0O 


週 走 プロ グラ ム 
2090O_NEXT RBUSUB ミ 40』 "END ご ら 660 LUCATEO。 1 昌 * DOS Io 4 テー ター= テ リョ 丁 生 (BB) sg し 
oOOM て 70 CRTESO。 1 日 COLDR7: INFUT" タ 9" テ ^ ー ダ ー= リ " 。 征 生 ( 日 ) : XR ニ G 
110 MIDTH40。 2 ロビ Y ニ S ェ ビニ CY 壮 16:LUCaTE XX 人 GO+ 王 。 品 一 XA15+15 。COLORG PRTNTT*( ロ ) 3" 
LOCATEO。 Qi CODLDR4:PRINT "で て テリ ー タ ワー マウ ニー" リョ ES リ "s CUL ロ KR フェ LUCATEO。 18: FRINTSFC( ミ ヨ ) : GBD TU 2600 
2670 "LU。H エ 
LOCATEO。 ミ CHLUR7 ェ TNFUT "リト ウロ 2 NO. (OiEND) =" ュ R | 1S6BO FDR J=1 TO E1:T=VaL (T ま (J) ) 

















IF R=Q THEN 194 ひ 690 IF TsHI(R) THEN HI(R)=T 

IF _ RES THEN BEEF: BHT 213Q ぞ 700 IF TEER(R) THEN ER(R)=T 

BODSUB1150: "の" ラッ ミ 710 IF TSLD(R) THEN LO(R)=T 

BOD TO SS1109 ご 72O_NEXT J 

の 回民 ぞ デ 730 BEEF:LUCATEO。 1 日 FRTNT "7 カネ = ニ " ョ HI(R)i" 円 "saLOC 
IF FLAGB=O THEN GUSUBS5O ェ FLRG=1 RTESO。 1 日 : TNFUT" ヲ カネ ルー ナ っ 月 テマ カカ = ニ リ 。 昌 $(R) : LHCEATEO。 
MIDTHBO 。 25: CR=Os FDR R=1 TU ES CY=2』 ビ =CY 1 コ :FRINTSPC(45) 





IF_M(R)VQL(DQ ま (R) ) THEN Ca=1 GUSUB1150s "の "11S740 『 キ 
ご 750 DQ ま =" リ "giFUR =1 TO E1:DQ ま =D 人 ます 生ま () キリ ナリ ENEXT 
5O_ ELSE BUSUB さ 40: “" 

で 760 D ま も (R) =DQ ま ます " 





NEXT Ri IF CA=QOTHEN BOBSUE 





ジッ カネ 2770 CLSNEXT RiBH TO 60 
IF FLG=O THEN BUSUBSO ェ FLAG=1 2 フ 7 " 男 還 題 サフ :/ ヨコ 還 還 
MIDTHBO。 2 CR= ニ Os FUR R=1 TU _ ES:CY= ニ Ss ビニ CY ぞ 790 MIDTH40。2O:LHCATE。 ミ 』 INFUT リサ 2 ミ が ョ ニー マ ル トウ ロフ No 
IF VaL(DQ ま (R) ) =HI(R) THEN CQ=1 : GUSUB1 15O ・ 三 "aR 
NEXT _R: IF Ca=OTHEN BUSUB23O ELSE BUSUE340 2B ヨ 00 IF RES THEN BEEF:GBH TU S79O 
32BO *+ キ 10 2B10 LUCEATE10。7: COLUR5: PRINT N ま (R) 





90 TIF FLAG=O THEN GUSUBSGO ェ FLRG=1 =B2O_ LUCATE5、 10: CHLHR7 TINFUT "リサ フミ た ョ ー ジテ OE で (Y・ リ 














MIDTHBO. 25: CR= ニ Os FDR R=1 TU ES: CY= ニ Si CS=CY ZN) "本 
IF VaL(DQ ま (R) ) LU(R) *1.1 AND NM(R)SLU(R)*1。1 | 12B3O 1TF 器 和 ="Y" UR 唱和 ま =" "0 丁 HEN 2B5O 
THEN Ca=1: BUSUB1150 SB40 IF 器 和 ="N" THEN CLS:BH TU 2790 ELSE 2B2O 
232O NEXT Ri IF CA=OTHEN BUSUBS30O ELSE GUSUB340 <B5CO_N も (R) = リリ 
人 2550 2B60 LUCATE5。 15: CHLOR6: INFUT "の リキ" カ " アリ ママ ヌカ 全 (Y/N 
うさ 40 IF FLAG=O THEN BUSUBSO ェ FLAG=1 ・ り ) "昌和 ま s CDLUR プ 
2350 MIDTHBO』 25: CR ニ Os FUR R=1 TU ES CY=S: CS=CY 2B70 ITF 串 ま ="Y" THEN CLS:BH TO 279O0 
2 さ 60 IF VQL(DQ ま (R) ) ミ ERR(R) *。9 AND M(R) KA(R)*。9 T| 12BBO 1F ロロ ま ="N" UR まま = の 0 THEN 60 ELSE 260 
HEN CA=1:GUSUH1150 SB90 " 画 還 還 トウ ロフ NO. ヒ ョ ウ :/ 男 是 呈 


2 さ 70_NEXT _R: IF CA=OTHEN GUHSUB2 さ Q ELSE BUSUE340 2900 MIDTHBO。 2 BHSUB490: "ミケ ミ 



























2 さ BO "回 是 | 回 是 敵 910 X=0s Y CULHR7 

2390 MIDTH40』。 SOILHEATE。 弓 : INFUT リト ウロ 2 No=" 。R 920 FUR R=1 TO ES 

2400 IF RE2 THEN BEEF:BD TU 2390 930 LUCATEX 。Y』FRTNTUSTNG" 拓 手 』 多 "saR。N ま (R 

人 410 LOCATE10.7: CHLUR6:FRINT N ま も (R) ) 

242O LUCATE5。9』 COLUR6』 INFUT "カフ ニッ 。。 。 DR で (Y・ リ 7/N) | 12940 Y=Y+1: ITF YE17 THEN Y= ニ ミュ X=X+2Og TF X*60 THEN 
中 LOCATE、 9: PRINTSFC(2 ロ ) : CHLUR7 ア BUSUE3O BDSUB 490』 X= ニ 0 ドリ. ビ 

24 さ 0 1F ="Y" DR =""0 THEN 245O 2950_NEXT: GUSUB53 さ 0 GOD TU 609』 デリ 。 ビ 

2440 IF 器 和 ="NU THEN 2S390 ELSE 242O で 96O " 証 較 DQTN キロ 還 本 問 

245O_ LOCATE5。 10』 INPUT" リ カゴ ネー "EiKR(R) =K 2970_ MIDTH40、2OkLHERTE5。 10』 CDOLUR: FRTNT "DATA テー フ 

2460 LUCATE5。 15: CDLUR6: TNFUT "リキ " カ ^ アリ マヌカ ? (YZN| 1 "5:EOLOR7:FRINT" ラ セト シテ リ 

・ り ) 昌和 EDLUR7 SBO_ LUCRTE10。 12 CDLUR6: PRTNT" ロ フォ ッ "sasEHLUR7:FRTI 

2470 IF ロロ ま = リ YU THEN O NT" ニ シテ の" サイ 。" 

24 ヨ BO ITF 品 和 ま ="N" DR 口 生 THEN 60 ELSE 2460 2S990 LUCATE5。 15: PRINT"( すり し)" "sgEOLOR: FRTNT "RE 

2490 " 症 男 リカ 還 証 較 TURN キー"』 = EDLUR7:FRINT" ラ キマ 。)" 

2500_ WIDTH40O 。 2 : ビジ = ニ ビ スコ + 1 : R ニ ビス ェ DE スニ ビス さ 000 IF INEEY$=CHR ま (1 さ ) THEN さ 010 ELSE OOO 

3 呈 10 GUSUEB さ 6O ェ i 7 トウ ロフ 3010_ CLSi LUCATE5。 10: COLUR: FR INT "ーーー キロ 2 チュウ ーーー 


2520 MIDTHBO。2O:FUR _R=DES TU ES 1 





253 さ 0 LOUCATEO。 OsFRTNT Ri "si リ "INb(R) :LDCATESO。 OFRIN | | OSO OFEN" ロ "。 手 2 " CABOI SBYUDATA1" 
TW( DATA カス "= UM23 リ マテ "Os END) 030 FUR R=1 TU ES 

2540 * TNFUT 3040 IF N ま (R)="" THEN ミ 090 

っ 品 5O X= ニ Os Y= ニ Ss ビニ 1 ミ O5O_PRINT#2。HT(R) iLD(R) ER(R) 
2 ロ 60 LOCATEX 。Y:FRINTUS TNG" 拓 提 持 " ョ CsTNFUT" "(| 1 づつ 060 PRINT#S。N も (R) 

) ミ 070 PRINT 提 且 昌和 $(R) 

257O IF 生ま ( じ )="O" THEN E1= ビ ー1 : GBD TU 2600 OBO_ FRTNT 皇 G。D ま (R) 


258O Y=Y+1s ITF Y16 THEN Y X=X+2O さ O90_NEXT: CLUSE#2: BUSUE う 20 
2590 C=C+1』 TF C>NS THEN E1= ビ ー1 : GU TU 2600 ELSE 2 
56Q 

2600 BEEFLUCATE コ 。 18: COLHR6: INPUT " Z (テイ セイ ) 。 リラ ーー ( 
リキ まう) りあ LOCERTE 避 。 18: FRTNTSPC (25) : CULUR7 

ぞ ら 610 TIF 本 = リ Z リ THEN 26 さ 0 

ご 6SO TIF 昌和 ま =" リ 0 THEN 267O ELSE 2600 

630 「 テ イセ 

<640 LOCRTE。 1 日 : INPUT "ティ セイ ヌル No= "。 ロ LUCATE5。 1 
:FRINTSPC(2O) 

=650 1F GE1 THEN BEEF:BUD TU 264O0 」 








ET ブロ グラ PE 





10 ええ NEN 25 ロフ "ラム 共著 半 半 100 LUCATEO。9: CULURG: FRTNT" う : 年 チャ ー ト ヲ ミル 。" 
6? S57。 1 110 LOCATEO。 1 1 : CULUR2 PRTNT "4: キロ フタ "ミミ DATA パフ コウ リ 























+。 プ By 応 . エ 120 LOCATEO。 1 さ 3: COLUR4:FRINT " 王 : 年 メイ ガラ の カリ 
さき 0 CLEAR400O DEF INTAーZ き さ 0 LUCATEO。 15: CHLUR4: FRTINT "6 年 2 イカ リラ サミ が ョ リ 
40 MS2=400 140 LOCATEO。 17: CULUR: PRINT "フェ 年 トウ ロ 2NO。 ヒョウ ミ が ーー リ 
50_ DIM Z(M2。10) 。HI (MS) 。LO (MS) 。 (HE。1) 。ST (MS。 1) 。N 150 LUCATEO。 19: CULUR6:FRTNT "日 : 年 DaT キロ フ (サイ コ " 
(MS) ニオ コナ 9) “ 
60 MIDTH40。 Si LUCATE。 Os CULUR7 プ FRTNT "ーーーーーーー 年 160 LUCEATEO。S1 : CHLOR フ 7 ェ FRTNT "Oi END":CULUR フ 7 
を っ cm ニー ニー 170 LOCaTE5。 INFUT" NO。 キー イフ ーー テリ 。 合 
79 LHCATEO。 さ : COLUR さ EFRTNT "の: 年 メイ ガ ナラ トウ ロフ 2 (ジョ キ ト 180 IF ai9THEN 170 
ウロ グ ぁ アー ター( 2 190 ITF Q=9 THEN 1110 
0 LUCATEO。 弓 : CULUR6:FRINT" 1: 年 DRTR ヨミ コミ ( サ * ミ ョ ニ ご 0O IF =O THEN MIDTHBO。2O: END 
オ コ ナ ウ ) " =10 DN BU TO 1150。1280。1620.2170。2290。 2 ささ 0。 245 














20 LUCATEO。 7 COLUR7EFRINT"S』 年 DRHTR INFUT" 0。2550 
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,0 








年 足 プ ログ ラム 

る エエ エコ GUE ルー チッ E、、 到 、 却 . コ 
CS h ウ ロニ 三 

IF RMS2 THEN BEEP:LUCATE5. 10: CDLDRS: FRTNT "メイ 
キー バー リュ FUR 1=1 TH 3OOO: NEXT: RETURN6O 
LUCATE5。 10: INPUT "ナー 年 : = ニー"。NE:CLS 
LHCATEO』 Qi EHLUR4 ょ FRTNT" YY ./ トウ ロフ _ NO.=" ョ iR 
LOCATE17. 弓 :FRTNT" 
LCATEO。 4: COLUR7 ェ INFUT 

















ドラ (9 モミ パイ ナイ ) ニニ リ 。N 和 も 


IF LEN(N も (R) ) ※9 THEN BEEF:GD TU 2 ヨ o 
HI(R)=10OsLD(R) =SOOOO 

FOR =}1 TH 10: Z(R。T) =Ok NEXT 

< LOCATE5。 18: CULUR6: INFUT "カウ ニ フ 。。 DR で (Y・ り /N) 
"まま s CDLUR7 





DR ="" THEN 35oO 
THEN CLS:GD TO 
350 LUCATE、2 き : CDLDR7: ITNFUT "9 
) "、$ 

き 60 1TF ="YU FR ="" THEN R=R+1:CLSEBO TO 26o 
"N" THEN E2=R: MTDTH4O。20: GBD TU ミ BO ELS 






0 ELSE 320 
"アリ マヌ カ (YY・ リ /N 











E 





3BO FOUR R=DE2 TO ES 

90 LUCATE O。OkFRINTUSTNB" 持 持 "iR。N*( 
R) 

400 Y= さ sFHR エ =1 TU 10:LUCATEO、Y:FRINTUBTNB" 拉 年 
="iNE+ エ ー10 

410 LUCATE 6。Y: INFUT" "、Z(R、T) 

420 Y=Y+1:NEXT 1 

430O LODCATE5。 18: CDLUR6: ITNFUT"Z (ティ イセ イ ) 、 リ ラー フ (9 ギド) 『" 
iLUCATE5。 1 日 :FRINTSFC (35) : CDLOR7 

440 IF ="Z" THEN 46Q 

450 IF ロ ま ="" THEN 490 ELSE 43O 

460 * テ ィ セ イ 

470 LUCATE5 1 日 : INPUT "ティ セイ ヌル 年 = "、B:B=E+10-NE:L 
DCATE5。 18:FRINTSPC(2O) 

4BQ LUCATEO。1: CDLUR5:FRINT "7 
DCATE2O。 18: CULUR7: ITNFUT" ウ 5" ミイ 
CATE 6。B+2: CDLUR6:PRTNTZ(R。H) i" 
0.18:PRINTSFC (3) :BD TU 43O 

490 "HIT。LO 

5QO FDR 1=1 TO 10 

510 1F Z(R.1) >HI(R) THEN HI(R)=Z(R、。1) 
520 IF Z(R,1)<LD(R) THEN LD(R)=Z(R。T) 
3O NEXT 1 

540 CLB:NEXT R 

550 RETURN 

560 "ーーー ミタ "シーーーー 

570 LUCATEO、0: COLDR フ PRTNT" 












5 Z(R。B) し 
= "、Z(R。B) :L ロ 
"s EDLDR7: ょ LUCATE 








80 LOCATEO。 1 : COLOR6: PRINT"NO : 年 メ ゴ イカ ラ N 


O si 年 メイ カラ No gs 年 メイ ガ ラ No 』 年 メ 
リプ 


90 LOCATEO。 Si COLOR フ 7 ェ PRTNT" 





600 RETURN 

610 ーーー リ 。 ビ ーーー 

620 IF HD=O THEN 630 ELSE 640 

630 LUCATEO、2 さ : EDLOR: PRINT" リタ ー ン (9 キ " ) or ( コ ヒ “* 一 
) ": ELOR7:GD TO 65o 

640 LUCATEO』2 さ : COLHR: FRTNT "(ヌケ ー 上 ル ) Or リタ ー フ ( り リキ") 
or ビ ( コ ヒ " -) "s COLDR7 

650 =INREY ま 

660 1TF = リ "SG" THEN LOCATEO。2 さ :FRTNTSPC ( さ 5) : BHSUH 
910:GD TO 62O0 

670 1F =" ビ " THEN LUCATEO。2 さ :PRTNTSPC (35) =: IF HD 
=2 THEN HARDC2:CLS: RETURN ELSE HARDC: CLS: RETURN 
6BO 1F =CHR 和 も (13) THEN CLS:RETURN ELSE 65O 

690 "ーー Y ーー 

700 1F HI(R) /CY=<170+10O/CS THEN RETURN 

710 CY=CY+CS:GOD TU 7oO 

7 フ 20 ーーー 2" ラフ ーーー 

730 COLOR5: LOY=CEY*(100/C) : = ニ LUY : 8=10*CY: XS= ニ Xー4 
1 

740 LINE(X。10) -(X。1 ヨ 0) 。FSET 、4 

750 FDR 1 エ =18O TD 20 STEP-1O 

760 Bb=BTR$ (8) 

770 IF (1 MD 20)=O THEN 7BO ELSE 79o 

78O CDLOR6: SYIBDL (X5。 エー4 ) 。 8$。 1 。 1 :BD TU BOO 

790 COLDR4: SYMBDL (X。 エー4 ) 。 時 。 1 1 

BOO 5=S+S8: NEXT 

10 FOR 1=1O TU 20O STEF 10iFSET(Xー ら 1) iFPSET(Xー 
1. 1) 』NEXT り 

B20 チャ ー ト 

30 YO=1 ヨ 0-(Z(R,。 1) LUY) /CY: IF YO>1BO THEN YO=18O 
B40 FDR 1=1 TO 10 

B50 Y=180-(Z(R。T) LOY) /CY: IF Ys1 ヨ BO THEN Y=1 ヨ O EL 
SE IF Y<24 THEN Y=24 

B60 IF YsYO THEN 70 ELSE Bo 

















70 LINE(XO0。YO) 一 (XO+6。Y) 。PSET。 己 。 BEF:BD TU 90 
80 LTNE(XO。YO) 一 (XO+6。Y) 。FBET。7。 昌 

890 YO= ニ Ys X0=X0+12:NEXT 

00_ RETURN、 

On ニー ドニ ーー 

SO XM=45:FUR MM=1 TU CC:FOR NM1=1 ヨ 0Q TU 2O GTEF -1 
O:FHR MS=XM TU XM+15O_ STEF 10 

930 FPSET (M2、M1 4。 XDR) 

940 NEXT MS2。M1 

250 XM=XM+20 日 sNEXT NM 

960_ RETURN 

20。 ソー ト 

20 SR=O 

90 1F SH-SL ヾ =QO_ THEN 110O 

1000 5SX=NM(5H。 1 ) : 5J=SH: 1=Lー1 

1010 = ゴー1 

102O_TF SBXSM(BJ。1) AND BJ:=BL BU TO 1010 

10 さ O 1=5T+1 

1040 IF SGX>M(ST。1) BU TO 103O 

1050 IF STSSJ AND 8SJ※=SL THEN SMAP_M(S1.O) 。M(SJ。 
09) iBMaF_M(G1T。1) 。M(SJ。 1 ) 

1060 IF BITSSJ BOD TH 101O 

1070 SMaF_M(SI。O) 。M(SH.O) : SMQP_M(ST.1) 。M(SH、 1 ) 
1080 ITF ST-SLSSH-S1 THEN SR=SR+1 : ST (SR,。Q) =81T+1: 
T(SR,。 1 ) =5H: SH=5S エ 1 : GJ TU 1090 ELSE BR=SR+1:』T(SR 
・ 0) =SL: ST (SR 。 1 ) =5 エ ー1 : 5L=S1+1 

1090 BUSUB990』 GL=ST (SR . 0) : SH=ST (SR. 1 ) : SR=SR-1 : G ロ 
SUB99O 

1100_RETURN 

1110 " 還 還 題 年 トウ ロフ 男 是 較 

112O_MIDTH40.25: TF HIT(1)YO THEN BEEF:LDCATEO。 10 
iPRINT リト ウロ 2 アリ ー!!。 (4』 の イカ ) ラミ テ 2 ウ 2" サイ 。"sFDR 1 エ =1 
TO 3OO0gNEXTsGO TO 60 

113O ド R=1 : DE2=R: BSUB つ さ O ェ "トウ ロフ 

1140 GO TO 60 

115O "回 題 DQTR ヨミ コミ 評 還 還 

1160 MIDTH40。20: LHCATE5。 呈 : CDLURs PRTNT "DATR テー フ * 
"ii EDLUR7 ェ PRTINT "ヨー セ ゅ ト テリ 

1170 LHCATE10。7: COLUR6:FRTNT "PLAY "*:CEODLDR7:FRTN 

UE ウデ グ タ 2 ゆ 7 ガ な 

118O_ LHCATE5。 12:FRINT"( オ ワ 9LN" "ECULDR6: PRINT "RE 

TURN キー"ssCULUR フ 7:PRINT" ヲ オス 。 )『 

1190 IF INREY$=CHR も (1 ミ ) THEN 12OO_ ELSE 1190 

12O0_ ELS: LOCATE 紀 。 10: CDLUR: FRTNT リーー ヨミ コミ チュ ウ ーーー 











1210 R ド =1 : PEN" 1T"、##2。 "CQBSO: 年 DATa" 

1220 ITF E ロ F(2) THEN CLDSE#2:BD TU127O 

123O INFUT 2』N$ も (R) 

1240 INPUT #2。HI(R) 。LD(R) 

1250 INFUT ##G、Z(R。1) 、Z(R,2) 。Z(R。 さ ) 。 Z (R。4) 。Z (R、) 
>Z(R。6) 。Z(R。7) 。Z (R。 日 ) 。Z (R。9) 。Z (R。10) 

1260 R=R+1:GUD TO 122O 

1270 E=R-1 :LUCATE1。 1: CULUR4:PRTNT "カフ リョ ウー! 1 "8 ビ 
DLOR7:FDR エ =1 TD 1000』NEXT:BD TOD 6o 

12O " 還 還 DQTA INPUT 還 

1290 WIDTH40。2 の 

13 さ 00 FDR R=1 TO E2 STEF 15 

1 さ 10 "1 年 ラウ 

1 さ 20 FDR J=R TO R+14 

13 さ Q Z(J、1)=O:FDR 1=1 TU 9:Z(J。T)=Z(J。T+1) :NEXT 
1 さ 40 Z(J。10) =O 

1 さ 5O IF J>E2-1 THEN 1 さ 7Q 

1 さ 60 NEXT J 

1370 "ヒョウ ミー INPUT 

1380 LUCATEO。O: CDLUR プ 7:FRINT" No: メイ カーラ 』 コト 
シリ ョ =EOLDR4: PRINT" : キョ ネー 
1390 LDPATEO。 1 : CDLUR4:PRINT" 





1400 LUDCATEO。17:PRINTSBTRINB$( さ SG。"ー") 

1410 Y=2:FDR J=R TU R+14 

1420 CULUR フ LOCATEO。 18: PRTNTN$(J) 3 "= リュ ETNPUT" "。 
Z ( け 。10) : LDPATEO。 1 日 : PRINTSPC (20) 
14 さ 0 LDPATE O。Y:PRINTUBTNGB" 拓 持寺 』 
"5 ゴ 』N ま () 。Z (J。10) 

1440 LUCATE2 さ ,Y: CULUR4:FRINTUB TNGB": 間 電 革 井 "2 (。9) 
1450 IF JsE2ー1 THEN BEEP:GD TU 1470 

1460 Y=Y+1: NEXT J:BEEF 

1470 LUCATEO。1B: CDLOR ら 6: INPUT" Z (テイ セ Y) 。 リ ラージ (の キ ギド ) 
・ ロ = LHCATEO。 18: FRTNTSPC (5) : CULDR プ 

14BO IF ロ $="Z" THEN 15oO 

1490 1TF ロ $="" THEN 1540 ELSE 147O 

1500 ティ fr 

1510 LHCATE5。 1 昌 : TNFUT" テ ゴ セ イ ヌル No= "BsLUCATE。 18 
:PFRINTSFC(2O) 

1520 TF Q<R OUR ロ >R+14 ロ R ロ cES THEN EEEF:BH TO 15 
10 

15 さ Q LUCATEQO。 1 日 : CDLDR:FRTNT "ゴマ ノ Zs) 
: LUCATE2O。 1 昌 : PDLDR7: TNFUT "97* シイ テー タ ー= "。Z(B。10) 
:LUCRTE16。 ロ ー(R 半 16) *1 王 +1 : ELUR6:FRTNTUB TNG" 間 持 振 " 
1Z( ロ 。10) : COLUR7:LUCATEO。 18: FRINTSFC ( ミ 日 ) :BD TH 14 


色 = 音韻 井 半井 
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70 

1540 *HT。L ロ 

155Q FOR J=R TO . 尺 +14 

156Q IF Z(J。T) HIT (J) THEN HI (J) =Z (J。 1) 

1570 IF Z(J。1)SLH( け ) THEN LO(J) =Z (J。T ) 

15 ヨ QO IF JE2ー1 THEN 1610 

1590_ NEXT J 

1600 CLS:NEXT R 

1610 GO TH 6O 

162O " 回 訂 昌 年 サヤ ー ト 問題 間 

1630 MIDTH40』2O:CY=: CS=CY 

1640 LUCQTE。 1 : PRTNT "ーーー 年 チャ ー ト 一 ーー" 

1650 LUCATE5。4: CHLUR フ PRINT"1』 セト フラ プリ 

1660 LUCATE。6: CHLHR6:FRTNT"2E コバ" リリ 

1670 LUCATE5。 日: CDULUDR: FRINT UP メ ィ カ " ラリ 

1680 LUCATE5。 10』 CULUR7 ミ FRTNT "Oi メニ ュー ニニ モト " ル 。" 

1690 LUCQTE5』 15』 INFUT "NO。 ラ キー イフ ーー テリ " BB 

1700 IF 品 =1 THEN 1740 

1710 IF =2 THEN 185O 

1720 IF =3 THEN 195oO 

1730 IF =O THEN 6OELSE 1690 

DRZOG6 コ ーー 2 に 2 ミー ニー 

1750 MIDTHBO 。 3: X ニ 4 さ = XN=6: ビビ =O 

1760 FUR R=1 TU E2: CEY=5: CS=CY 

1770 LOCATE XN。1:EULUR7:PRINT Ri ": "IN ま (R) 

1780 GUSUE690i 7 し に テ た 

1790 XO=X+5: BUSUB72O ェ "の" ラフ 

1800 X= ニ X+SGO XN=XN+26: ビビ = ビビ +1 : IF XS460 THEN HD= タ 2 
: BDSUB61Os X ニ N=6: CC= ニ Oi リピ 
1810 NEXT R 

1 ヨ 820O_ BUSUB610』 "りり . ビ 

183O GU TH 1630 

1840 ス ーー ニョ WE りこ と 

1 ヨ 5O_MIDTH40、2O X= ニ 4 さき: XN=6: ビビ = 
1860 LOCATEO』 Oi COLUR4i PRINT 

>" 

1 ヨコ 7O LUCATE5。 10』 CHLUR7』 INFUT " 下 ウロ 2 No.( OiEND )= 
".R 

18 ヨ O IF R=O THEN 1630 

189O IF _ RES THEN BEEP:GOU TO 1870 

1900 MIDTHBO。25:LUCATE XN。 1:CULOR7gFRINT RI "EVEN 
(R〉 

1910 BUSUEB690』 "し ニハ 

1920 XO=X+ ロ 』 BUSUB72O ェ "の" ラフ 

1930 HD=SI BUSUB610: "リピ 

194O BU TO 185O 

07 も ジラ UE は 2 スピ ーー 

1960 CLS: ビ =1 

1970 FOR R=1 TO E2 

1980O ZD=Z(R。10) -Z(R。9) 

1990 IF ZDO_ THEN M(C。O) =RiM(C。1)=(ZD/Z(R。9) ) *10 
0: ビ = ビ +1 

SOOO_ NEXT KR 
"2010 MIDTH49 
マウ = リュ ビー15" 
2020 LUDCATE5。 1 る: PRTINT "UP リリ ノノ チイ サイ ジ " ユン ニニ ナラ へ * カエ 

コウ ざ 

203O "ソー ト 

SO40 BL=1 :H= ビ ー1 : BUSUB ワ 70』 "ソート 

2050 "上 ヒョウ” 

2060 MIDTHBO。 5 

2070_CLSi X= ニ 43:』 XN=6: CC=O 

20 ヨ 0O FUR J=1 TO ビー1 

209O0 R=N (J。O) : CY= ニ 5 ロビ 5= ビ Y 

2100 LOCATE XN。1: CHLUR7gFRINT Ri "EVEN まあ (R)5 リ 0 ("IM 

(d』1)8 752 

2110 BUSUB690』 ルフ ミ / 

2120 XO=X+55: BUSUB720 ェ "の "ラフ 

ぞ で 1 さ O X ニ X+0 日 ま XN=XN+ つ 6』 ビビ = ビビ +1 : IF X ジ 460 THEN HD=2 
: GBDSUB610』 X=43:』 XN= ニ 6』 ビビ =O ェ デリ 。 ビ 
、 140 NEXT 


215O BUSUB610:” リ 。 ビ 
に 






















LUCATE 紀 。 10』 COLUR: PRINT" く テ "ー タ ー 

























160 GU TO 163O 

2170 " 男 還 男 ハン コウ 男 本 

2180_ MIDTH40。 20: LUCATE き 。 さ = TINFUT "パウ コウ ヌル トウ ロ 2 No : 
は 

2190 IF R>E2 THEN BEEP:BOU TO 2180 

2200 LUCaTE10。7: FDLUR6: PRINT N$(R) 

2210 LOCRTE5。 1 ヨ : CHLUR6』 INPUT "カフ ニ フ 。 UK つ (Y・ り /N) 
"まま CULUR7 

2220 1 エ F 唱和 ま = リ YU UR 品 委 ="0 THEN 2240 

22 ミ 0 IF 品 和 ま ="N" THEN CLS:BU TU 218O ELSE 2210 

2240 CLS:LUCATEO。 Os PRINTUSTNG" 韻 韻 培 : % "saR。N 

も (R) 

2250 Y= ミ : FUR J=1 TU 10:LUCRTEO。Y: PRINTUSTNG " 提 間 韻 

草 拉 拉 拉 "ミロ 。Z( 民 。J) : Y= ニ Y+1:NEXT 

2260 LUEATEO。17: INPUT "けつ フロー フッ ー/ DaTR ラ 
(OiEND)= "、BzLOCATEO。17:PRINTSFC(3 日 ) 

2270 ITF =0 THEN 60 

2280 LODCATEO。 17: CHLUR 紀 : FRINT "イッ 7 DaTR 2 GQ)s 

LUCATE2O。 17: CDLDR7:TNFUT "9" シイ DaT = "。Z(R。 Q) iL 

DCRTE4 。 ロナ で CULUR6: FRTNTUB TNG " 韻 拉 拉 幸 持 "3Z(R。G) iLOCRT 

EO。17: PRINTSFC (3 日 ) : CDLUR7:BH TO 2260 

2290 "回 是 題 り : カ 画 較 

3OO WIDTH40。 25: E フ コー ビ 2+ 1 : ドニ E2: DE コー ビタ 

5310 GUSUB2 さ 0 "トウ ロフ 

BOD TO 69 

” 古 題 サ 2:/ コ 男 是 間 

O MIDTH40.2O 

'O LCATE、 さ : INFUT "サフ ミド ョ スル トウ ロ 2 No。 = "。R 

O IF R>E2 THEN BEEP:BU TU 2350 

Q_ LUCATE10。7: CDLUR6: PRTNT N ま (R) 

2sBo LOCATE5。 10: CDLDR7 ェ INPUT "サパ ョ ニー ジ シテ OK の (Y・ り / 


ハフ コウ シマ スカ 


N)  "。 避 計 

2390 1TF 品 和 ="Y" OUR ロ D ま =" リ 0 THEN 2410 

2400 IF ロロ ま ="N" THEN PLS:GD TU 2350 ELSE 23B0 
2410 。 N 呈 (R) = リリ 

2420 LOCATE。 15: INPUT "リキ "カカ アリ ッ ス タカ マー (YZN・ り ) "4 
生 


24 さ O IF ロ ま ="Y" THEN CLS:GU TO 2350 

2440 IF ロ ま ="N" DR ロ ま = リリ THEN 60 ELSE 2420 
2450 ” 還 本 是 年 NO. ファ "リント 本 本 還 

2460 WIDTHBO 。25: HD=0 

2470 BUSUB560』 "ミタ" ジ 

24 ヨ 0 X=Oi Y| COLOR7 

2490 FUR ド R=1 TOE2 

2500 LUCATEX 。Y:』 FRINTUSTNG" 揚 拉 村 。 多 
(R) 

2510 Y=Y+1 : IF Y>17 THEN Y= さ : X ニ X+20s TF X:60 THEN 

BODSUB 610:CLB: BUSUB560』 X= ニ Oi リ 。 ビ 

2520 NEXT 

2530 BUSUB610 7 リ .C 

2540 GO TO @6O 

2550 * 還 還 DQT キロ 回 還 較 

2560 MIDTH40。2O 

2570 LOCATE5,5: COLOR5PRTNT"DaTA テー フ 2? "ss CHLOUR7 ョ s 
PRINT " ヲ セ ゅ ト テリ 

25B0 LUCATE10。7: COLOR6: PRTNT " ロ 2 ォ オフ "ig CEOLOR7:FRTN 
T 交 テグ の か れる 

2590 LUCATE。 12:FRINT"( オハ NT "3 ECOLOR6s FRINT "RE 
TURN キー "igCEOLURZ7:PRINT" ヲ オタ 。 )『" 

2600 ITF INEEY ま =CHR ま (1 さ ) THEN 2610 ELSE 2600 

2610 CLBi LUCATE7。 12 3 CDLHR: PRINT "ーー キロ ま チュウ ーーー 

2620 DFEN" ロリ" 。 2 "CASO ェ 年 DaT" 

26 さ 0 FUR R=1 TO E2 

2640 IF N ま (R)=""! THEN 26 ヨ 0 

2650 PRINT #2。N ま も (R) 

2660 FRINT 2。HI(R) LU(R) 

2670 PRTNT 提 2。Z(R。1)3Z(R。2) 27(R、 さ )iZ(R。4) 1Z7(R。5) 
3 Z(R。6) s Z(R。 フ ) 3 Z(R。 日 ) *Z(R。9)』Z(R。10) 

26 ヨ 0 NEXT R:CLUSE 拉 2 

2690 LOCATE155。 15: COLOR4:PRINT "カフ リョ ウ 110sCHLOR7sF 
UR !=1 TU 2OO0 NEXT 

2700_BOD TO _60 








"IaR。N* 
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F M-8 活 用 研究 で 既に “拡張 K に コンパイラ? を 発表 し ま 
し た が , その 後 『FM-7 用 に K コ ン パ イラ は な いか ? 』」 と か 
『 コ ン パ イラ を リロ ー ケ ー タ ブル に で き な い か ? 』 と の 問 
い 合 わせ が 多く あっ た た め , ここ で 再び 発表 する こと に し 
また に 

上 述 の 活用 研究 で は K コ ン バ パイ ラ の 特徴 , 展開 され る オ 
プ ジ ェ クト な ど に つい て 述べ まし た が , ある 程度 マシ ン 語 
を か じ っ つっ た 人 や コン パイ ラ に 慣れ て いる 人 で な けれ ば 理解 
で き な か っ た の で は な いか と 思い ます . ここ で は , 実際 に 
どう や っ て 使う か と か , 効率 的 な デバ ッ グ な ど に つい て 記 
し て みた いと 思い ます . 











多く の コン パイ ラ が そう で ある よう に , K コ ン パ イラ も 
コン パイ ラ 本 体 と ラテ ンタ イム ・ ル ー チ ン を 持っ て いま す . 


コン パイ ラ 本 体 は 実際 に ソー ス ・ プ ログ ラム か ら CPU が 
実行 で きる オプ ジェ クト に 委 換 する た め の ブ ログ ラム で す . 


ご の オプ ジェ クト は その まま 実行 で きる わけ で は な くぅ 。 入 
出力 (画面 表示 , キー 入力 な ど ) や 演算 に 関す る も の は 大 
部 分 が サブ ルー チン ・ コ ー ル の 形 (J SR $ ) 


に 変換 され ます . この サブ ルー チン 群 を ラン タイ ム ・ ル ー 
チン と 呼び ます . 

コン パイ ル 後 の オプ ジェ クト は 一 般 に リロ ケー タプ ブル ・ 
バイ ナリ と 呼ば れ , これ に ラン タイ ム を 付け て 実行 で きる 
よう に なっ た オプ ジェ クト を エグ ゼ キ ュー グ ブル マッ イナ 
リ ま た は ロー ド ・ モ ジュ ー ル と 呼び ます . 大 型 計算 機 な ど 
の コン パイ ラ は リロ ケー タプ ブル ・ バ イナ リ か ら エ グ ゼ キュ 
グプタ ウレ パパ バイ 5 だ りり だ お る だ な め に リンク カペル ンク デー ジー 
ディ タ を 備え て いま す . 


KK コン パイ ラ は それ 自身 で 記述 され た コン パイ ラ な の で , 


コン バイル する と き は ラン タイ ム ・ ル ー チ ン が 必要 で す . 

また , リロ ケー タブ ル ・ バ イナ リ は その 名 の と お り リ ロケ 
ー タ ブル な の で , ラン タイ ム ・ ル ー チ ン さ そえ あれ ば メモ リ 
上 の どこ へ 置い て も 実行 で きま す . ラン タイ ム ・ ル ー チ ン 
は オプ ジェ クト か ら 一 定 の 番地 を コー ル さ れる た だ た だめ, リロ 
ケー ド 人 性 でき ませ ぜ ん, これ を り 豆 人 ケー タダ 光信 二 る な だめ に 
は 前 述 の よう な リン カ や リン ケー ジ ・ エ ディ タ が か が 必要 と な 
りす 

以上 , コン バイ ラ の 概要 に つい て 述べ て み ま し た が , ち 
まっ つど 其 か し か っ だ で し ょ うか 7? た だ,、 コ シィ シ 1 に つい 
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較 COMPAC 筆 暫定 ぶ ド | 


て 述べ る の が 目的 で は な いし , 詳し く 説 明 し よう と すれ ば 
か な り の 量 に が が の で ここ で は これ ぐら い に し て お きま す . 











較 プロ グラ ム の 作成 


K コ ン バ パイ ラ の プロ グラ ム は BASIC プ ログ ラム と 同 
じ よ うに 作成 し ます . た だ , この と き REM 文 の 形式 ( 行 
番号 の 後に “)? を 付け る ) に し な いと コン パイ ル で きま 
せん . ま た だ た, プログ ラム を 打ち 込む と き は コン パイ ラ は 必要 
あり ませ ん . で き 上 が っ た プロ グラ ム は すぐ に コン パイ ル 
せ ず ,。 カセ モッ ト や ディ スク に セー プ し て お いで くだ さい . 


還 コ ン バ パイ ル 


コン パイ ル し た い プ ログ ラム を 入れ た 状態 で CLEAR10, 
を HI1FEE と し て くだ さい . ここ で ,“Out of memory” と 
いう エラ ー が 出 な けれ ば その まま コン パイ ル で きま す . リ 
UI ド 1 の の ロジ ンジ と シン ツレ は ウラ ー チ シンジ が ロッ ー 由 
し , EXEC 半 H2000 と し て コン パイ ラ を 起動 し て くだ さい . 
正常 に コン パイ ル で きれ ば , オプ ジェ クト の 大 き さ を 16 進 
で 表示 ます か 。 ここ で 一 時 2 巡 の ま の ほじ で 導 王 宛 し で 
くだ さい ・ 


SAVEM Np &H4D00, HH5000 キ オブ 
ェクト の サイ ズ , ぐ を H5000 








実行 アド レス は オプ ジェ クト の 先頭 アド レス で す . 通常 
は 5000 番 地 で す が , オブ プ ジ ェ クト は リロ ケー タ の 
他 の 領域 に 移す こと も で きま す . また だ , 表 1 に も ある 
に 207D.E 番 地 の 内 容 を 変え れ ば 他 の 番地 に も オプ ジェ 3 
ト を 作れ ます . た だ し , この 番 図 1 メモ リ ・ マ ッ プ 
地 の 内 容 を 変更 する と き は 図 1 る 
の メモ リ ・ マ ッ プ を よく 見 て 他 
の 領域 と 重 な ら な いよ うに 注意 

て リロ 2 当 2 プ リ ) 


じ し て ぐ ください. 
ジコ 
丁 千 六 交 語 ク 


ログ ラム が 1FFF 番 地 を 越え | 9FF 
レル ン ル ペロ ワー ショ ンク 


4CFF 
ホブ ンジ エン ツ の (トド ト 
(リロ ケー タプ ル ) 








2000 





な い 場 合 の コン パイ ル 方 法 で す | 4FrE 
が 。、。 こ の まま で は あま り 大 き な 
ブロ グラ は 作れ ませ を. - ご れ 
穫 上 天 き な プロ グラ バボ 生 コ シ フッ パ 











イル する た め に は , FM-8 で は ファ イル 版 へ の 変更 , FM 

7 で は 胡 RAM を 使う 方 法 が あり ます . 

2 (F M-8) 
ァイル 版 と いう の は ソー ス ・ プ ログ ラム を 外部 ファ 

ル 0 に ッ ト や ディ スク な どの 記録 媒体 ) に 入れ て , 0 

か ら 1 行 ず つ 読 み 込ん で コン パイ ル し よう と いう も の で す .- 


こう する と 図 ,1 の 妥 守 Us 二 タ ッ プ ほ ある ソー ス ・ プ ログ ラ 
ム の エリ ア は 必要 な く な り ま す . 
まず , リス ト 3 の ファ イル 版 メ イン ・ プ ログ ラム を 打ち 


込ん を で セー ブ プ し て くだ さい ・. 次 に リス ト 1 の コン パイ ラ を 
ナス RY42(S0B つ 2625 記 IE に 人 の よう (に じ で セー デブ じ で ぐだ 
さい . 





[ と K | 
| SAVEM ^KF*。 &H2000, を HH41FF, &H2000 | 





次 に リス ト 2 の ラン タイ ム ・ ル ー チ ン を リス ト 5 に 従っ 
て 変更 し , 次 の よう に し て セー し SC くだ さい - 





妥 SAVEM RTE/、& を H4D00, 錠 上 H4FFEF、 和 を H4D00 | 





カセ ッ ト を 使っ て いる 
ラプ コト ンジ 2N0 ッ グー クト バク 2 
モット を 作れ ば 後々 便利 で し ょ う 

さて , 実際 に コン パイ ル す る 手順 で す が , 始め に コン パパ 
イラ も ラン タイ ここ ルー ナン も メモ リ 上 に ロー で いな 
い 状 態 で ソー ス ・ プ ログ ラム を 打ち 込み ます . 入力 が 終わ 
っ た だ たら, カセ ッ ト や ディ スク な ど に ASCII 形式 で セー ブ し 
ます . 実際 に は 次 の よう に し ます . 


方 は , ファ イル 版 メ イン ・ プ ログ 
ルー チン の 順 で 1 本 の カ 





SAVE ヾ ファ イル 名 ?、A 








次 に 。 ファ イル 版 メ イン ・ プロ グラ ム を RUN し ます -. 

最初 に “HOT OR COLD?2? と 開い て くる の で , 
コ 。 ン イラ と ラン タイ ムル ニー ナン が 既に ロ ド され. て い ュ 
れ ば ぼ ば *H? を 入力 し ます ( 央 交 字 で 入れ る こと を 忘れ ず に ) . 
*H? 以外 を 入力 する と 外部 ファ イル か ら コ ン パ イラ と ラ 
ンタ イム ・ ル ー チ ン を ロー ド し ます . 

次 に , パ "FILE NAME?2? と 聞い て くる の で , 先 
に ASCII 形式 で セー ブ プ し た ディ スク また は カモ セ モット を 準備 
し , その ファ イル 名 (必要 が あれ ば デバ イス 名 も 付け て ) 
を 入力 し ます . この 後 , ソー ス ・ プ ログ ラム を 読み 込み な 
が ら コ ン パ イル を 始め ます . 

を 衰 RAM を 使う 方 法 (F M-7) 

FM-7 は ソフ ト で BASIC ROM と 裏 RAM を 切り 
換え る こと が で きる の で , この 裏 RAM へ コン パイ ラ を 移 
動 し て , 大 き な ソ ー ス ・ プ ログ ラム を コン パイ ル す る こと 
の OS まあ に ヨン の 0 ロロ ゲ ー タ ブル で すず ) 。 

まま 9 リス WEEON Aa が の よがり ログ ケーク と コン PE ラ ーー 
タ を 作り , コン パイ ル し ます . リロ ケー タ は コン パイ ラ を 
裏 RAM へ 移動 する た め の も の で . エグ ゼ キ ュー タ は 移動 
され だ た コン パイ ラ を 起動 する た め の も の で す . コン パイ ル 
は 次 の 手順 で 行なっ て くだ さい . 
⑯ リロ ケー タ を 使っ て , コン パイ ラ を 裏 R AM へ 移動 し ま 

す . ア ドレ ス の 入力 は 必ず “$” 記号 を つけ て くだ さい . 

例 START ADDR=$2000 


END ADDR ニ $41FF 
DEST ADDR=$C000 








_ 特に 。 


差し 計 えな けれ ば 上 記 の よび に 入力 し て くだ さい , 
シー スガ ログ ラム を ロー ド じ ます : 
エグ ゼ キ ュー タ を 使っ て コン パイ ラ を 実行 きせ ます . 





例 START ADDR= $C000 
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ぁみ その 他 の 方 法 

ァイル 版 へ の 変更 や 裏 RAM を 使う 方 法 に つい て は 理 
解 で きた で し ょ うか . どちら も ディ スク を 使っ て いる 人 
は あま り 不 便 を 感じ し な いで し ょ う が , カセ ッ ト の 場合 は 多 
少 , 面 便 で す . 次 に その 欠点 を 挙げ て み ま し ょ う - 
ファ イル 版 で コン パイ ル 中 に エラ ー が 出る と , ソー ス ・ 
プロ グラ ム を ロー ド し て 手直し し て セー プ し た 後 , メイ 
ン ・ プ ログ ラム と コン パイ ラ を 再び ロー ド し な けれ ば な 
ら ない. 
4 人 導い も て スー 


ラー が 出 た 場合 、 再度 ロ ー ド し 実行 し な けれ ば な ら な 

も ちろ ん , この 2 つの プロ グラ ム が 他 の 問題 の な 本 
(た と えば S7C00 番 地 や $4000 番 地 な ど ) に あれ ば いい の 
そこ で , FM-8 で も 和典 RAM を 使う 方 法 と マシ ン 語 で 記 


述 し た り ロ ケー タ , エグ ゼ キ ュー タ を 紹介 し まし ょ う . 

リス ト 8 は FM-7/8 両 用 の リロ ケー タ と エグ ゼ キ ュー 
タ で す . プロ グラ ム は リロ ケー タブ ル で す が 。 特 に 問題 な 
けれ ば リス ト ど お り の アド レス で か まわ な いで し ょ う . 

先頭 の アド レス を EXEC で 実行 すれ ば K コンパ イラ を 昌 
RAM へ リロ ケー ト し ます .FM-8 で は "ディ ッ プ ・ ス イッ チ 9 
OFF/ と ディ ッ プ ・ ス イッ チ 9 ON" と メ ッ セ ー ジ が 表示 さき 
れる の で , 指示 に 従っ て くだ さい . 次 に ソー ス ・ プ ログ ラム を 
入れ て , コン パイ ル す る と き は EXEC 先 頭 ア ドレ ス 寺 DO0 
(ここ で は EXEC &H7CD0 ) と し て くだ さい . FM-7 で は 
メッ セー ジ は 表示 され ませ ん . これ は ディ ッ プ ・ ス イッ 
チ を 切り 換え る 必要 が な いた めで す -. 

途中 で 禁 走 し て リセ モッ ト し た と し て も 裏 RAM は クリ ア さ 
れ な い の で ,K コ ン バ イ ラ を 再び ロー ド す る 必要 は あり ませ ん . 
本 書 の ファ イル 版 で し か コン パイ ル で き な い と いう プロ グラ 
ム は 大 部 分 、 こ の プロ グラ ム で コン パイ ル で きる は ず で す . 
な お , この プロ グラ ム を 使う と き は 一 応 ,CLEAR10 , &H41 





















































FE と し て か ら , ソ ー ス ・ プ ログ ラム を 入れ て くだ さい . 
表 1 拡張 コン パイ ラ ・ エ ント リ ・ マ ッ プ 
アド レス 内 主神 胃 | 3 能 
2001 _ 4C コン バイ ル 時 作業 エリ ア ・ ア ドレ ス の 上 位 2 バ イト 
20C0 4C 実行 時 変数 エリ ア ・ ア ドレ ス の 上 位 2 バイ ト 
20CE 4C 実行 時 U り スタ ッ ク ・ エ リア 最終 アド レス の 上 位 2 バ イト 
2073.4 | 4300 ブロ グラム 1 行 入 力 バッ ファ ・ ア ドレ ス 
207D,E 5000 オプ ジェ クト 作成 アド レス 
2082.3 _4400 ラベ ル ・ テ ー プ ブル ・ ア ドレ ス 
208E, ビ 4AFE コン バイ ル 時 スタ ッ ク ・ エ リア の 最終 アド レス 
209A. 日 4B00 作業 用 テー プル ・ ア ドレ ス 
4186 サ プ ブルー チン | コン バイ ラ 1 行 入 力 ル ー チ ン 
41E2 MD コン バイ ラ OPEN ル ー チ ン 
41EE 7 コン パイ ラ CLOSE ル ー チ ン 
4F80 ル ラン タイ ム 1 壇 字 入力 ルー チン . エ コー バッ ク な し . 
4F9 量 MD ラン タイ ム 1 訪 字 出 カ ルー チン . 
4FB5 ラン タイ ム 1 行 入 力 ル ルー チン. エコ ー バ ッ ク あ 
| り . バッ ク ・ ス ペー ス あ り . 
表 2 エラ ー メ ッ セ ー:> 





| DOUBLE DEF ERROR 


| ラベ ル の 二 重 定義 が ある . 





ELSE WITHOUT IF IF 文 が な い の に , ELSE が きた . 





FIWITHOUT IF IF 文 が な い の に , FI が きた . 





ILLEGAL ARGUMENT 手続 , 関数 の パラ メー タ に 誤り が ある . 





ILLEGAL EXPRESSION 許さ れ な い 式 で ある . 





ILLEGAL NESTING FOR, IF , REPEAT. WHILE 名 の 対応 


が お か し い . 





NEXT WITHOUT FOR | FOR 廊 が な い の に , NEXT が きた . 





SYNTAX ERROR 構文 に 誤り が ある . 





| TOO MANY VARIABLES 


変数 の 数 が 多 す ぎる . 





| UNDEFINED LABELS 


未定 義 の ラベ ル で ある . 





UNTIL WITHOUT REPEAT | REPEAT 廊 が な い の に , UNTIL が きた . 














WEND WITHOUT WHILE WHILE 文 が な い の に ,WEND が きた -. 
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置い に コン バイ ラ の プロ グラ ム を 入力 する と き の 注 意 


K コ ン バ パイ ラ で は コン バイ ル 時 に 完全 な 構文 チェ ッ ク を 
し て いま せん . で すか ら , 変数 な ど を 使う と き は プロ グラ 
マー の 資 任 で 管理 する 必要 が あり ます . 特に 入力 時 の ミス 
で 多い の は TI7 と さ 12、 07 と 0? と ぬっ だ 脂 栓 的 
な も の で す . 特に 変数 名 で こう いっ た ミス を 犯す と , K ュ 
ン ぷ イラ で は まっ た く エ ラー を 出し ませ ん - し か も , その 
0 2 
グラ パ 既 入力 する と き は 特に 次 の 点 に 注意 し て くだ さい . 
⑯ 変 数 名 は 特に 注意 し て 入力 する こと . 
@ サ プ ブルー チン や 関数 呼び 出し の パラ メー タ は , 個数 が 足 


りな か っ た だ たり し て も まっ た く エ ラー を 出さ な い の で 気 を 
付け はるこ と . 

CODE 廊 に 続く 数 値 は , 間違え る と 確実 に 禁 走 す る の で 
正確 に 入力 する こと <. 


| 半 還 ET 








説明 が 不 充 分 で わか り に く か っ た 点 も ある と 思い ます が 
本 書 と 『F M-8 活 用 研究 』 を 併 読 し て いた だ けれ ば , K コ 
ン パ イラ が か な り 応 用 の 利く コン パイ ラ で ある こと が わか 
っ て い だ だ ける で し じょう ・ 


> 




































































ぁ 定数 と 変数 
要 素 書 式 補足 
| 定数 | 1 壇 宇 定数 |' で 囲っ た 1 文字 @ 演 算 の 中 で 使用 する . の 
文字 列 定数 ? で 囲っ た 文字 列 @ 関 数 手続 き 引 数 中 で 使用 する . 
: | @PRINT 廊 中 で , 交 字 列 出力 と し て 使用 する 
10 進 定数 | 数 値 @ 32768 一 32767 の 数 値 
了 @ 負 数 は パー” を つけ る . 
| |16 進 定数 | $ 数 値 。 ・ @$0000- $FFFF の 数 値 8 
変数 | 単純 変数 _ | 英字 で 始ま る 英 数 字 列 | 人 8 文字 まで 識別 する . っ 壮 の こい パ 
| | 2 バイ ト 配 列 変数 | 単純 変数 ( 式 ) @ 単 純 交 数 の 値 を 配列 の 先頭 アド レス と し て , 式 の 値 * 2 を 加え た アド レス 
に バト 72 由 沙 7 
1 バイ ト 配 列 変数 | 単純 変数 : 式 ) @ 単 純 変 数 の 値 を 配列 の 先頭 アド レス と し て , 式 の 値 を 加え た アド レス の 1 
Sa > 本 _ | バイ ト を 指す . を 叶 さ * 
変 数 多数 値 | @ 関 数 , 手続 き の 引数 の 参照 に 用 いる . 
@ 数 値 は 引数 の 順番 を 示す . 
、。 | @ 局 所 的 に 領域 が 利用 され る . 4 に 3 
ラベ ル 英字 で 始ま る 英 数 字 列 | @ 8 文字 まで 識別 され る . 
p 壇 
処 理 書 式 補 足 
変数 = 式 代入 
デポ 四則 演算 BAS1C に 準ずる . 
一 般 処理 >,。 >=,。 < く ,。 <=,。 = テ 。 く > 関係 演算 | 演算 子 の 優先 順位 は 乗除 , 加減 関係 , 論理 
AND, OR 論理 演算 
H 5 @ 壇 の 区 切 は `: ” を 使う . 
1F 条件 THEN 処理 1 @ 条 件 は 式 ま た は 廊 で 記す 
ELSE 処理 2 @ 条 件 が 満足 され た と き , THEN に 対す る 処理 を 行ない , 条件 が 満足 さ 
判断 FI れ な いと き , ELSE に 対す る 処理 を 行なう . 
@EL SE 部 分 は 省略 し て よい . 
⑯|F 文 の 終了 は , F | 文 に よっ て 示す . 
FOR 制御 変数 三 初 期 値 @BAS1C に 準ずる . 
TO 終了 値 
for ル ー プ STEP 増分 値 @ 初 期 値 > 終 了 値 の と き は , 処理 を 実行 し な い . 
処理 
NEXT STEP を 省略 する と 1 と みな す . 
| STEP は 正 ま た は 負 の 定数 . 上 
WHILE 条件 @ 条 件 は 式 ま た は 文 で 記す . 
while ルー プ 処理 @ 条 件 が 満足 され て いる 間 , 処理 を 実行 する . 
WEND 
repeat 一 REPEAT @ 条 件 は 式 ま た は 文 で 記す . 
| until ル ー プ 処理 @ 条 件 が 満足 され る まで , 処理 を 実行 する . | 
UNTIL 条件 
サブ ルー チン | GOSUB ラベ ル 名 ラベ ル 名 の サブ ルー チン を 呼び 出す . 
ラベ ル 名 〔 引 数 列 〕 @⑯ ラ ベル 名 の 関数 , 手続 き を 呼び 出す . 
@ 引 数 は *,” で 区 切っ て 指定 する . 
関数 , 手続 き @ 関 数 手続き 側 で 引数 を 参照 する と き は , 多 変 数 を 用 いる 
@ 関 数 と し て 使用 する と , 関数 側 で 最後 に 実行 し た 値 を 持ち 帰る . 
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y 文 
処 理 | 書式 | 補 足 
復帰 RETURN @ サ プル ー チ ン , 関数 , 手続 きか ら 戻 る . 
飛び 先 GOTO ラベ ル 名 @ ラ ベル 制御 を 移す . 
コメ ント (* コメ ント ま ネ *) @ い (*? と “*)? で くく っ た 部 分 は 実行 し な い . 
PRINT 出力 要素 並び 人 @ 出力 要素 は ~, ” て 区 切っ て 指定 する . 
人 @ 出 力 要素 に は , 変数 , 式 , 文字 列 定数 フォー マッ ト 関 数 , 改行 子 が 書 
出力 ける . 
人 @ 改 行 さ せる に は “/? を 使用 する . 
@ 桁 数 , 変数 また は 式 ” で , 桁 数 分 右 づ めで 10 進 数 に し て 表示 する . 
フォ ー マ ッ ト 関 数 ($ が つい て いる ) が 使え る . 
変数 1 NPUT @ 10 進 数 、 16 進 数 (数 値 の 前 に "$” を つけ る ) を 値 と する . 
入力 変数 GET @ 押 され た キー の ASC1I 1 コー ド を 値 と する . 
キー が 押さ れ て いな いと き は , 0( ゼ ロ ) を 値 と する . 
終了 END @ 実 行 を 終了 する . ・ の 
CONST 名 前 定数 , @ 定 数 に 名 前 を つけ る . 宮 を 3 
宣言 DEF ラベ ル 名 = ニア ドレ ス , @ ア ドレ ス に ラベ ル を つけ る . 
@ この ラベ ル 名 に 対し , 関数 , 手続 き 呼 び 貼 し が で きる . 
POKE アド レス , 式 @ ア ドレ ス に 値 (1 バイ ト ) を 書く 〈. こ 
CPOKE 変数 名 , 式 の 例 @ 変 数 の アド レス か ら , 式 の 列 を 書き 込む . 
@ 変 数 の 値 は , 書き 込ん だ 分 増加 され る . 
@ 式 は ~, ” で 区 切っ て 書く . 通常 は 1 バイ ト と し て 書く が , 式 の 後に 半 
その 他 ] を つけ る と 2 バイ ト と し て 書く . 1 
CODE 値 の 例 @ 値 の 列 を プロ グラ ム 中 に 展開 する . 
@ 値 は ", ” で 区 切っ て 書く , 通常 は 1 バイ ト と し て 書く が , 値 の 後に 
を つけ る と 2 バイ ト と し て 書く 〈. 
3? CALL アド レス 』 @ ア ドレ ス を 直接 サ プ ブルー チン ・ コ ー ル する . 
ぁ 関数 フォ ー マ ッ ト 関 数 
処 理 | 語 :9 | は | 
絶対 値 AB S( 式 ) @ 式 の 絶対 値 を 値 と する . に な 和議 還 上 CHR$( 式 ) | @ 式 の 値 を 文字 (ASCII コ ー ド ) と し て 出力 . 
アド レス 値 | ADR( 単 純 変数 名 ) | 変数 の アド レス を 値 と する . 16 進 4 桁 HE X $( 式 ) | @ 式 の 値 を 16 進 4 桁 と し て 出力 . 
上 位 バ イト | HIGH( 式 ) | 但 式 の 上 位 バ イト を 値 と する . 、 16 進 2 桁 _ HE X2$( 式 ) 式 の 値 を 16 進 2 桁 と し て 出力 
下位 パイ ト | LOW( 式 ) @ 式 の 下位 バイ ト を 値 と する . | 空自 SPC$( 式 ) @ 式 の 値 の 空白 を 出力 . 
論理 否定 NOT( 式 ) @ 式 の 論理 否定 を 値 と する . 
は 1. は 80. 
アド レス 内 容 | PEE K( ア ドレ ス ) | @ ア ドレ ス の 内 容 ( 1 バイ ト ) を 値 と する . 
乱数 RND( 式 ) @0- 式 - 1 の 一 様 乱数 を 発生 する . 
負数 拡張 | SE X( 式 ) @ | バイ ト の 負数 を 2 バイ ト の 負数 と する . 
符号 S G N( 式 ) @ 式 の 符号 に より , 1, 0, 一 1 の 値 を と る . 
スト 1 コン バイ ララ ダン プ ・ リス | ト EE 
dd +O +1 +2 + さ +4 + ロ +6 + プ + 日 +9 +Q +B + ビ +D +E +F Sum 21EO BD 4D 17 ED 4D OB 55 4E 44 45 46 49 4E 45 44 20 :EB 
2000 C6 4C 1F 9B CE 44 00 BD 0O7 C6 QQO 1F 9B 7E、4F FOQJz F 21FO 4C 41 42 45 4C 5 さく 20 さ Q QQO BD 4D 17 BD 4D QB 20 :e6 さ 
2O10 條 日 D す 4 8Z9BD 当 40 軸 O 日 を 4 日 反 な OILSW4E よ 4D5O4 ワ 大 4 選 所 人 : | | マロ マー ジロ ーー ビー モロ ー ゴ ーー ニコ ーー ニーーーーー ニ ー フ ニーーーー ニ ニー ニニ ーー ュ ご ニコ コニー マニュ コ こ ン だ 
2020 20 56 45 52 5 さ 49 4F 4E 20 さ 1 2E ミ 2 0Q BD 4D 17 :18 Sum: BE DE C7 1 B さ 2Q QAE BA BR 44 12 Da DS 9D a2 05 : ミ さ 
203 さ QO BD 4D OB 43 4F 5O 59 52 49 47 4 54 20 さ 1 39 3 :90 
2040 さ 2 20 42 59 20 4 さ 4F 4D 5O 41 4 さ 2E OO BD 4D 17 :OF Add  +O +1 +2 + さ +4 +5 +6 + フ +B +9 + 人 +B + ビ +D +E Sum 
205O BD 4D 17 BD 4D 17 BD 4D OE 43 4F 4D 5O 49 4C 49 :64 | | 2200 QO CC OO Q4 DD 1C CC QQO QR さ 6 Q6 DC 1C 16 QQ :FBH 
2060 4E 47 2E 2E 2E QO BD 4D 17 BD 4D 17 BD 4D 17 17-:99 | | 2210 DC 1C 9E 1 E6 BB 4F BD 4E DE DC 1C CS QQ Q1 jFO 
207O 21 7O CC 4 さ OO DD 0QQO CC OO O1 DD 0Q2 CC 5O OO DD =:22 | | 2220 1C a さ C4 2F EB さく 42 CC QQ Q1 DD 1a DC 1B C ミ :BD 
20BO O4 CC 44 OO DD 06 CC OO FF 9E Oo6 EZ 4 CC 4 FE :E5 22 さ O OC DD 1 16 FF B7 BD 4D 17 BD 4D 17 ED 4D QB : 4 さ 
209O DD QB CC FF QO 9E QB ED 4 CC 4E QQ DD Qa CC QQO 91 2240 42 4 45 4 さ 54 20 50 52 4F 47 52 41 4D 20 5 さ :5C 
20AQ OO DD OQC CC OO OD DD QE CC QO 7F DD 10 CC OO OO :B1 2250 5Q 45 20 さ Q QOQO DC 04 3 4F FF DD 1E DC 1E BD 1 
20BO DD 12 CC OO OO DD 14 CC 12 12 9E Oo4 ED B4 CC C6 :41 2260 BO BD 4D OB 20 2B 24 QQO DC 1E BD 4E BF BD 4D :OA 
20CO 4C 9E O4 ED O2 CC 1F 9B 9E O4 ED O4 CC CE 4C 9E :7a 2270 29 OO BED 4D 17 BD 4D 17 BED 4D QBE 4 さ 4F 4D 5o :FB 
20DO Q4 ED Q6 CC QQO QQ 9E QO4 E7 QB DC Q4 C ミ さ QQ Q9 DD :DD 2280 4C 45 20 4 4E 44 2E OO BD 4D 17 39 17 12 ささ OR 
20EO 04 17 20 QA2 9E 16 4F E6 B4 9 さ 10 1Q0 26 O1 9D 17 :DB 2290 16 4F E6 B4 さ 6 Q6 CC QQ さ B BD 4D B9 さ 6 06 9E iC 
20FO 20 FC CC C6 OO 9E 04 ED B4 CC 1F 9H 9E Q4 ED 02 :DB-| | 22Q0 4F E6 B4 36 Q6 CC QQ さ E ED 4D BE9 aa CO EA CO 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 22EO 27 QO QA DC 16 CS OO QO1 DD 16 16 FF CF 9E 16 
Sumi FO C1 BZ 60 D5 2D 91 さ 9 1 さ BE6 E5 Q4 BE 54 BB さ D :FO 22CO E6 4 9 さ OE 10 26 00 03 16 FE 16 DC 14 36 0Q6 
!ー 22D0 OO Q1 ED 4D B9 さ 6 06 さ Q BC Q2 20 0S 2 2 QQ 
dd  +O +1/+2 コ + さ + 人 4 + 口 +6 + フ + 日 +9 +Q +E + ビ +D +E +F Sum 22EO 10 17 1O EE 32 62 an CO EA CO 10 27 QQO 5D CC 
2100 CC 7E、4FJ9E 04 ED Q4 CC QQOIFO) 9E Q4 E7 Q6 DC Q4 :57 22FO O1 DD 14 DC 16 C ミ QO QO1 DD 16 9E 16 4F E6 1F 
2110 C ミ QQ QZ DD Q4 9E QB EC B4 BS FF OO 10 27 QQ 94 :QE 
2120 17 20 CC BD 4D 17 BD 4D OB 49 4C 4C 45 47 41 4C : さ さ 
21 さ 0 20 4E 45 5 さ 54 49 4E 47 2E QO BD 4D 17 BED 4D QE :9C 
2140 4C 49 4E 45 OO CC QO 06 さ 6 06 9E QB EC QB BD 4E :DB dd +0 1 + エ 2 + さ 4 +5 +6 + フ +B +9 +6 4B +C +D 4E +F Bum 
215O BA 9E QB EC 4 日 さ FF FF 1Q0 26 0Q0 OB BD 4D QB 20 :94 2 さ QO_ Q6 CC QO 2 BD 4D B9 さく 6 Oo6 9E 16 4F E6 日 4 さ 6 06 :a4 
2160 46 4F 52 OO E QB EC 4 BS FF FE 10 26 QQ 07 BD :7Z 2 さ 10 CC QO 29 BD 4D B9 a4 CO E4 CO 36 06 9E 16 4F E6 :E5 
2170 4D OR 20 49 46 QO 9E QB EC 4 B ミ FF FD 10 26 QO =D2 2 さ 20 1F さ 6 Q6 DC QE BD 4D B9 aa CO EA CO 27 C5 9E 16 :BC 
218O OB BD 4D QB 20 52 45 5Q 45 41 54 QQO 5E OB EC 4 =17 2 ささ O 4F E6 1F 9 さ OE 10 26 QO O ミ 16 FD a5 DC 16 CS QQ :9R 
2190 B さ FF FC 10 26 QQO QA BD 4D OB 20 57 4 49 4C 45 :e6C っ さ 40 O1 DD 16 CC OO OO DD 14 16 FF 41 ミ O BC Q2 20 06 :EB 
21A0 OO ED 4D 17 DC OB C ミ QQ Oa DD QB 5E QB EC 4 BS :SQ 235O_ 50 52 49 4E 54 OO さ 4 10 17 10 77 さ 2 62 さ 6 Q6 さ O 6F 
21BO_FF 00 26 9 DC Q6 DD 18 CC QQ QO DD 1 9E 1 4F =:4D 2 さ 60 BC QO2 20 Q2 さ F QQO さ 4 10 17 10 67 さ 2 62 aa CO EA :a9 
21CO E6 4 日 く OO FF 10 27 OO 6D 9E 1 EC 4 ミ QQO Q1 : さ a 2 っ さ 70 CO 10 27 0Q1 BF 17 11 4Q 9E 16 4F E6 4 日 ミ QQ 2C 45 
21DQ 10 26 OO 5 DC 1 昌 さ QO QQ 10 26 QQ 1F 17 20 OF :a2 2 さ BO 10 26 OO OQ DC 16 C さ QQO Q1 DD 16 16 FF E7 9E 16 :99 
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りく ヨン が イラ ダン デジ ・ リ スト 
2 くさ 9Q 4F E6 B4 B ミ QQO 2F 1Q 26 QQ 14 CC 4D 1 フ 7 28CO 27 QO 1F ED 4D 17 BD 4D QB 55 4E 54 49 4C 20 57 :7F 
23 さ 0 10 B4 さ 2 62 DC 16 ビ ミ QQ O1 DD 16 16 FF 2BDO 49 4 4 4F 55 54 20 52 45 5O 45 41 54 2E QQ 16 :Q2 
2 さ BO 4F E6 4 B さ QQO 2 さ 10 26 OO さ E DC 16 ヒ ミ 28EQ FB ささ 17 QOC 4 17 17 FO 9E QB EC QO2 9 さ Q4 昌 ミ FF :6D 
2 さ CO 16 17 11 75 9E 16 4F E6 B4 B さ QQ 2C 1O 28FO 1 10 2F QQ 1 DC 2C 9E 0Q4 E7 4 DC Q4 ビ さ QO Q2 s94 
23D0751 ム 電 ま BS5BISEESG' GOGOE 04:EDS 晶 4WDEO4RGSIKOODKOPSMDD 人 SCOYS| まこ ビ ニー ニニ ーー ニ ビ ーーーーー ニ ーー ニーーーー ニ ーー ニニ ーー ビニ ーー ウニ ーー ご ーー ニー ニーーー ニ ーー ニニ ーー ニー 
23EO Q4 DC 16 C ミ QQO Q1 DD 16 17 11 4E CC 4E Sum: QC 65 BA ED 1F SE CE 6Q D2 E1 6 さ FB 2C E さ QA C4 :7E 
ささ 32 62 16 FF 7D 9E 16 4F E6 84 
YE ちり SiS SF に 5 Add  +O +1 +2 + さ +4 + キ 5 +6 + フ + 日 +9 + +B +C +D +E +F Bum 
E さ 1E 66 9E 95 F6 a1 a3 EE a5 DB 2900 DD O4 9E OB EC Q2 9 さ Q4 9E 0Q4 EZ7 1F 16 QQO 17 DC :ED 
2910 2C 9E Q4 ED 4 DC Q4 C ミ QQO 04 DD Q4 9E QB EC Q2 :5B 
人 dd  +O +1 +2 + さ + 人 4 + ロ ロ +6 + フ + 日 9 + 人 +B +C +D +E +F Sum 2920 9 さ Q4 9E Q4 ED 1E DC QB CS QQ Oa DD OB 16 F9 SC :45 
2400 10 26 QQ 61 CC 4D OR さ 4 Q6 17 10 1Q さ 2 62 DC 16 :EC 29 さ 0 さ Q BC Q2 20 07 57 4B 49 4C 45 20 QO さ 4 10 17 OaQ :E さ 
2410 C さ QO Q1 DD 16 9E 16 4F E6 B4 9E Q4 E7 B4 DC Q4 :11 2940 91 さ 2 62 10 27 QO さ 6 DC QB 日 さ OO Oa DD QB DC 12 :D6 
2420 C さ QQO O1 DD Q4 9E 16 4F E6 4 さ 6 06 CC QQO 22 BD :F9 2950 9E OB ED OB CC FF FC 9E OB ED B4 DC Q4 9E QB ED :EC 
24 さ 0 4D BE9 さ 6 Q6 9E 16 4F E6 B4 36 06 DC OE BD 4D E9 :g8 2960 Q2 17 QB D5 17 17 71 DC 2C 9E Q4 ED 4 DC Q4 CS :B6 
2440 QR CO EA CO 27 CB CC QQO QQ 9E Q4 E7 1F 9E 16 4F :7Aa 2970 QO Q4 DD QO4 DC Q4 9E QB ED 0Q4 16 F9 QF ミ O BC QO2 3 日 
2450 E6 4 9 さ QE 10 26 QO CO ミ さ 16 FC 6 DC 16 ミ QO Q1 :92 29BO 20 O5 57 45 4E 44 OO さ 4 10 17 OA 46 さ 2 62 10 27 :C9 
2460 DD 16 16 FF 10 さ Q BC QO2 20 06 4 く 4 52 24 28 QO :25 2990 QO 5B 9E OB EC B4.B さ FF FC 1Q 27 QO 1D BD 4D 17 :e1 
2470 さ 4 10 17 OF SD さ 2 62 1Q 27 0Q 10 17 10 9F CC 4E :B2 29a0 BD 4D OB 57 45 4E 44 20 57 49 4 4 4F 55 54 20 :B7 
24B0 DE さ 4 Q6 17 QF AO さ 2 62 16 FE EQ さ Q BC O2 20 06 :54 29BO 57 4B 49 4C 45 2E 0Q 16 F7 BB CC QQ 16 9E Q4 E7 :7A 
2490 4B 45 5B 24 28 OO さ 4 10 17 QF ミ フ 7 32 62 1Q 27 QO =9D 29CO 4 DC O4 C さ QO QS DD Q4 9E QB EC Q2 93 Q4 9E Q4 iDB 
24Q0 10 17 10 79 CC 4E BF さ 4 Q6 17 OF 7 32 62 16 FE :OB 
24BO C4 さ O BC Q2 2Q 07 4 45 5B 32 24 2 QO さ 4 10 17 :6Z 
24CO OF 10 さ 2 62 10 27 QQ 10 17 10 52 CC 4E C5 ミ 4 0O6 :BC 
24DO 17 QF 5 ミ さ 2 62 16 FE 9D さ Q BC Q2 20 06 5 ミ 5Q 4 ミ :B8 
24EO 24 2B QOO さ 4 1Q 17 QE EA さ 2 62 10 27 QQ 10 17 10 :a1 
24FO 
ーー ニーー ニ ーー ニー ニー ニー ニー ニー ニーーーーー ニ ーー Add  +O +1 +2 + さ +4 +5 +6 + プ 7 + 日 + ウ 9 +Q +E +C +D +E +F Sum 
Sum: 2Q00 日 17 16 D4 さ QO BC 02 20 05 54 4B 45 4E QQO 34 10 :BF 
2A10 17 Q9 EF さ 2 62 DC OB さ QO QA DD QB DC 12 9E QB :5D 
220 ED QB CC FF FE 5E QB ED B4 DC 2C 9E 04 ED 4 DC :CC 
28 さ O 04 C さ QQO 04 DD Q4 DC Q4 9E QB ED Q2 CC QO QQ 9E :BB 
2Q40 QB ED Q4 16 F 46 さ Q BC 0O2 20 O5 45 4C 5 さ 45 OO :59 
2A5O さ 4 10 17 0Q9 ZD さ 2 62 10 27 QQO 4 9E QB EC B4 さ :BF 
2n60 FF FE 10 27 OO 1 BD 4D 17 BD 4D OB 45 4C 53 45 :aD 
2Q7O 20 57 49 54 4 4F 55 54 20 49 46 2E OO 16 Fo6 95 iD2 
2ABO 9E OB EC 02 DD 2E CC OO 16 9E O4 E7 B4 DC 04 3 =: さ 1 
2A90 OO 0 さ DD 04 DC O4 9E QB ED 02 DC 04 9 さ 2E 9E 2E :C6 
2QAO ED 1E 16 F7 EZ さ O C 02 20 03 46 49 0O0 さ 4 10 17 sCA 
2ABO 09 20 ミ 2 62 10 27 OO さ B 9E OB EC 4 B3 FF FE 10 :D5 
2ACO 27 OO 1 BD 4D 17 BD 4D OB 46 49 20 57 49 54 4 =:6O 
2QDO 4F 55 54 20 49 46 2E QQ 16 F6 さ A 9E QB EC Q2 DD :BC 
2AEO 2E DC Q4 9 さ 2E 9E 2E ED 1E DC QB CS QQ Qa DD QB : さ C 
2AFQO 16 F7 99 さ Q BC QO2 20 0O5 46 4F 52 20 00 さ 4 10 17 』EB 
Sum: E9 aE 2F a2 2 71 C1 55 CD 7 QF 62 BC SQ 5B 4B :5 さ 
dd  +O +1 +2 + ミ +4 + ロ +6 + フ 7 + 日 +9 + +B +C +D +E +F Sum 
2BOQO QB DO さ 2 62 10 27 QO F4 17 Q7 BB 9E 16 4F E6 B4 saAQ 
2B1O ヨミ 0OQ さ D 10 27 OO Q ミ 16 Q7 62 DC 22 8 さ QO GS さ 10 』OD 
Add 。 +O +1 +2 + さ +4 +55 +6 +F Sum 2H2O 26 00 20 CC Q1 QQO 9E 1 ED 4 DC QC 9E 18 ED 02 :CZ 
2600 BB さ O BC Q2 20 06 47 QD : さ oO 2E さ O DC QC C さ QQO Q2 DD QC DC QC ミ Q1 Q2 10 26 QO QOS :S3D 
2610 C1 さ 2 62 10 27 QO 1 フ 7 E7 :Aa 2B4O 16 15 7B 9E 1 EC Q2 DD 3O DC 16 CS QQ Q1 DD 16 :FD 
2620 B4 DC Q4 CS QO 0S DD BC :Ooa 2B5O 17 09 E6 さ Q BC O2 20 0S 54 4F QQO さ 4 1Q0 17 QB 72 :5F 
2630 Q2 20 07 47 4F 5 さ 55 32 :F6 2B60 さ 2 62 日 ミ OO QQO 1O 26 OO 0 16 07 1Q CC QQO DD 9E :C4 
2640 62 10 27 02 00 17 0C QB :57 2B70 Q4 EZ7 B4 DC さ Q 9E Q4 E7 Q1 DC Q4 CS OO 02 DD 04 sBB 
2650 3 QO Q4 DD QB DC 18 ED :oB 2BBO DC QB B ミ QOO QQ DD QB DC 12 9E OB ED OB CC FF FF 』aA9 
2660 02 CC OO OO DD 26 9E 2 っ 6 :5 っ 2B9O 9E QB ED B4 DC さ Q 9E QB ED Q2 17 Q9 9C CC 36 Q6 :7C 
2670 Q1 4B 9E 16 4F E6 01 16 :45 2BAO 9E Q4 ED 4 CC QO DC 9E Q4 E7 Q2 DC さ Q 9E Q4 E7 :DB 
2680 C さ QO Q2 DD 16 16 OQO1 DC : ヨ 6 2BEBO Q さ CC QQ 16 9E QO4 EZ7 04 DC Q4 CS QQ Q7 DD Q4 DC :D9 
2690 26 C さ OO QO1 DD 26 9E 26 :35 2BCO Q4 9E OB ED Q4 さ O BC 02 20 Q5 5S 54 45 5Q QO さ 4 siEE 
26Q0 OO A5 CC さ O BC 9E Q4 Q2 :EF 2BDO 10 17 0Q7 FE さ 2 62 10 27 QO 18 17 Q9 SC DC 1 BS :Q4 
26EQO DC 04 CS 0O Q5 DD 04 2 :41 2BEO QO Q1 10 27 0Q OS 16 06 93 DC 24 9E QB ED 06 16 :99 
26CO DC 16 CS OO Q1 DD 16 16 :2E 2BFO OO Q7 CC QQ Q1 9E QB ED Q6 16 F6 90 さ Q BC Q2 20 :E7 
26DO 4F E6 B4 9E Q4 E7 4 ーー コー ニー ーー ニー ニー ニー ペー ニー た ーー ニー イー ニー ニー エーーー ニー ニー トー ニニ ーー 
26EQ 4F E6 B4 36 06 CC QO 4F :E5 Sum: 1F EQ FF 18 95 E4 1C 67 さ 7 27 CaQ F5 D7 5F D4 7 :B1 
26FO E6 B4 36 06 DC QE ED DC :2B 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 dd +O +1 +2 + さ + 人 4 + 口 +6 + フ プ + 日 149 +Q +B + ビ +D +E +F Sum 
Sum: DF 54 54 F9 35 EQO 51 66 5C 28 DS 52 9 5Q B1 eB :C ヨ 2COO Q5 4E 45 5B 54 QO 34 10 17 Q7 C7 32 62 10 27 QQ giSB 
2C1O ED 9E QB EC 4 日 ミ FF FF 10 27 QQ 1E BD 4D 17 BD :B4 
Add  +O +1 +2 + さ +4 +55 +6 + フ + 日 19 +a +B +C +D +E +F Sum 2C2O 4D OB 4E 45 5 54 20 57 49 54 4B 4F 55 54 20 46 :51 
2700 2 さ 6 Q6 CC QO 7F BD 4D a9 さ 6 0Q6 9E 16 4F E6 B4 :QD 2C さ O 4F 2 2E QQO 16 F4 DE CC QQO DC 9E Q4 E7 4 9E QB :12 
2710 さ 6 06 DC OE ED 4D B9 Aa CO EA CO 10 27 QQO QS 16 :4D 2C40 EC Q2 9E 04 E7 Q1 CC QO CS 9E 04 E7 Q2 CC QO DD : さ FE 
内 1F DC 2 9E 28 EZ 1F CC :29 2C5O 9E Q4 E7 QO5 9E QB EC Q2 9E Q4 E7 06 CC QQ 3 9E 』BE 
27 さ 0 さ 6 10 9E 04 ED 4 DC 16 CS 0QO Q1 DD 16 DC Q4 CS :a5 2C60 Q4 E7 0Q7 CC QOQO C4 9E Q4 E7 QB DC Q4 CS QQ0 Q09 DD :9C 
2740 QO_ 02 DD 04 16 QQO 11 17 QD EF CC さ 6 06 9E Q4 ED :B4 2C70 O4 9E QB EC Q6 9E Q4 ED 1 9E QB EC 06 BS QO QQO :6Qo 
2750 4 DC Q4 C ミ QQO Q2 DD Q4 9E 16 4F E6 B4 日 ミ QQO 2C :26 2CBO 10 2F OO QB CC 1Q 2F DD さ ミ 2 16 QO Q5 CC 10 2C DD 61 
2760 10 27 FF 24 9E 16 4F E6 B4 3 OO 5D 1O 27 QQ OS :E1 2C9O 32 9E QB EC Q4 DD 2E DC Q4 3 QO Q2 93 2E SE 2E :C5 
2770 16 19 2D DC 16 C ミ OO Q1 DD 16 DC 26 B ミ QQO QQO 10 9a 2CQO ED 1E 9E OB EC O4 9 さ 3 Q4 ミ FF B1 10 2F Q0QO 24 DC si78 
27BO 2F QO ミ 7 CC OO さ 4 9E Q04 E7 1E CC QQO Q2 DD 1C DC :Bo 2CHO 32 9E Q4 E7 4 9E QB EC 04 9 さ Q4 3 OO 02 9E Q4 :9 ミ 
2790 26 さ 6 06 DC 1C 16 0Q 1C CC さ 7 10 9E Q4 ED 4 CC :7E 2CCO E7 Q1 CC ささ 42 9E Q4 ED Q2 DC Q4 CS OO 04 DD Q4 :42 
270 さ 4 10 9E QO4 ED Q2 DC Q4 CS 0QQ 04 DD Q4 DC 1C CS :18B 2CDO 16 QQO 21 DC さ 2 9E Q4 ED B4 9E QB EC 04 9 さ Q4 さ :QB 
27BO QQO_Q1 DD 1C a3 C4 2F EO 3 ミ 42 CC QQ 17 9E Q4 EZ :51 コ 0 0 
27CO 84 DC Q4 C ミ OO Q3 DD Q4 9E QB EC B4 DD 18 9E QB :BC 
27DO EC 0Q2 DD 22 DC QB CS QO Q4 DD OB 9E 1 4F E6 4 :EC 
27EO B さ OO Q2 10 27 QQ 0O6 17 OC EF 16 0Q OF CC QQ BD :B2 
27FO 9E 04 E7 1D 9E 1 EC Q2 9E 0Q4 ED 1E DC 26 3 QO :7C 
ーーーーー ニ ーー ニー ニーーー ニ ーーーーーーーーー ニ ーーーーーーー ニ ーー ニー ニー ニー ニニ ーーーーーーーーーーーーーーーーー. dd 。 +O 〇 +1 +2 + さ +4 + 品 +6 + フ 7 + 日 +9 +A +BH 
Sum: 7 さ 3 11 DE 7F C1 FC CE 17 4C 09 BE 昌 さ 99 F フ 7 D フ 7 FO : さ Aa 2DOO Oo2 20 Q5 50O 4F 4E 45 QQO さ 4 1O 17 Q6 
ら QB 2 さ 9E 16 4F E6 B4 
Rdd  +O +1 +2 + さ +4 + 呈 +6 + フ + 日 +9 + +B +C +D +E +F SBum O 7 DC 16 C ミ QQO Q1 DD 16 
2B00 QQO 10 2F OO さ F CC QO さ 32 9E 04 E7 B4 DC Q4 CS OO :2C 0 QQ DC Q4 B ミ QO Q3 DD 04 
2810 Q2 DD Q4 DC 26 8 ミ OO QB 10 2C Qoo 12 CC OO 6Q 36 20 2D4QO 1 日 さ Qo QO2 10 26 OO Qa CC Qoo 9E 9E 
2820 Q6 DC 26 5B 49 E さ C1 9E O4 E7 1F 16 QO 16 CC OO :ED 2D5O oo QE CC さ 6 06 9E 04 ED B4 DC O4 ビ さ 
2B さ O E9 9E O4 E7 1F DC 26 5B 49 9E O4 ED B4 DC Q4 CS :EA 2D60 DC QB ミ QQO O4 DD QB DC 1 9E QB ED 
2840 QO_ 02 DD Q4 さ 9 さ O BC Q2 20 07 52 45 54 55 52 4E :E1 2D7O QB ED Q2 17 Q7 CS E QB EC B4 8 Qo 
2B5O OO さ 4 10 17 QE 7C さ 2 62 10 27 OO 11 CC QQ さ 9 9E =:61 2DBO 19 CC QO F7 9E Q4 EZ B4 DC Q4 CS QQ 
2B60 Q4 EZ7 4 DC Q4 CS QQO Q1 DD 04 16 FA 1F さ Q BC QO2 :E1 2D90 QB EC 02 9E Q4 ED 1E 16 Q0O 2 9E QB 
2B70 20 07 52 45 5QO 45 41 54 OO さ 4 10 17 OB 4 32 62 :36 2DQO Q2 10 26 00 11 CC E7 B4 9E Q4 ED 4 
2BBO 1Q 27 QQO 1D DC QB 日 ミ QQO Qa DD QB DC 12 9E QB ED :2B 2DBO Q2 DD Q4 16 QQO OE CC E7 D1 9E Oo4 ED 
2B90 QB CC FF FD 9E QB ED 4 DC 04 9E QB ED Q2 16 F9 :G6BH 2DCO QQ Q2 DD Q4 DC QB C ミ QQ 04 DD oB 16 
2BAO ER さ Q BC QO2 20 07 55 4E 54 49 4C 20 QOQ さ 4 10 17 =:DZ 2DDO QO2 20 06 43 5Q 4F 4E 45 OO 34 10 17 
28BO QB 2Q0 さ 2 62 1O 27 0Q フ 78 QB EC 4 B さ FF FD 10 :1 さ 2DEO 10 27 OO 76 17 OB 7F DC 1 日 ミ QO Q2 
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リス i ト -1  K コ ヨン バイ ラ 。 . ダ ジブ リズ ji 
+OQ +1 +2 + ミ +4 + 口 +6 + プ + 日 +9 +A +BH +C +D +E +F Sum 
日 ミ oOQ QB 10 SC _ 00 1C QQ さ 1 QB 9E 16 』29 
4F E6 4 さ 4 06 1 プア a4 DC 22 C さ QQ sz6B 
O1 DD 22 DC 16 FF AF CC QQ QO =:39 
DD 22 DC Q6 DD 3 QQ FF 10 26 giFD 
QQ _ 48 CC QQ _QQO Q6 DC 1C 16 QO =:26 
1D DC 1C C さ QQ さ 1 aH 
QA 5 49 EC BE Q1 DD 
2F DF ささ 42 CC CC QQO 
EZ7 QC CC QQ Q ミ QQ _QO 
= と 1C C さ QO 04 9E DC 1C 
2E60 41 4C 4C QOO 34 10 17 05 69 32 62 10 27 QQO 2E 17 :B2 ささ aQ BB 4F BD 4D C1 C3 QQO QC DD 18 s9E 
2E7Q_ 06 C7 DC 1 日 3 QO Q1 10 26 QQ Qa CC QQ BD 9E 04 :B2 ささ BO 16 QQO 1 DC 1 ビ 1C 日 さ QQ_ QB 26 : 昌 Z 
2EBO EZ7 1D 16 F4 0Q7 CC 1F O1 9E Q4 ED 4 CC QD 4 9E zaF さ 3CO CE CC QOO Q1 DD 10 2F FF 67 16 siD6 
2E9O Q4 ED Q2 DC Q4 C さ QO Q4 DD Q4 16 F ミ EF 3Q BC Q2 : さ 1 ささ DO OO FQO EC 62 DD DC 1C 9E 2E E6 BB 
2EAO 2O 05 4 さ 4F 44 4 OO さ 4 10 17 05 26 32 62 10 27 =:91 ささ EQ OO_QQ 9E 2E E6 B 4F :46 
2EBO _QO_ 60 DC 16 B さ QQ Q1 DD 16 DC 16 CS QQO Q1 DD 16 72 ささ FQO rex 双 -) コ 17 0QO 97 32 62 s24 
2ECO 17 05 FF 17 QQ AO DC 1a 日 QQO Q1 10 27 QQO _QS 16 =:a6 
2EDO _Q3 AA 9E 16 4F E6 4 日 S QQ 2 さ 10 26 0Q0 17 DC Q4 >:ED 
2EEO BB さ 00 Q1 DD Q4 DC 24 9E Q4 ED 1E DC 16 CS QQ _Q1 szC 
2EFQO DD 16 16 QQ QD DC Q4 日 ミ QQ Q2 DD Q4 DC 24 9E Q4 :FE dd  +O +1 +2 + ミ +4 + ロ +6 + フ 7 + 日 +9 +Q +B +C +D +E +F Sum 
ーー ニー ニニ ーー テー ニニ ーー ニー ニニ ーー ニー ニー ニニ ーー ニー ニー ニ ニ ー ニ ニー ニニ ーー エー ニ マ ーー ビー ニー ニー ニー ニ さ 40Q0 BD 4D C1 10 27 OO Q6 CC QO QQ DD 2E さ 9 DC 1C CS :D ミ 
Sum: CB D2 QAQ D9 F4 Bo6 BE 5C BO 1B BE CF 9D F6 15 F9 =:44 さ 410 OO Q1 DD 1C 16 FF C4 DC 16 DS 1C DD 16 17 QQ 2 sz60 
さき さ 42Q CC QO Q1 DD 2E 39 CC QQO BED 9E Q4 EZ7 4 DC Q4 CS 4 
Add  +Q +1 +2 + さ +4 + 呈 + ら 6 + フ + 日 +9 + +B +C +D +E +F Sum さ 4 さ O_QQ_Q さ DD Q4 EC 62 9E Q4 ED 1E 39 EC 62 さく 6 Q6 CC se6E 
2FQQO EZ7 1F 17 05S BD 9E 16 4F E6 4 日 S OO 2C 27 Aa 16 zE2 さ 440 OQ さ Q BD 4D 99 36 06 EC 62 36 0Q6 CC QO 39 BD 4D za 
2F10 F3 7 さ Q BC 02 20 04 45 4E 44 OO さ 4 10 17 0O4 B2 : さ Z さ 45O B1 QA4 CO E4 CO DD 2E 39 EC 62 さ 6 06 CC QO 41 BD :51 
2F20 32 62 10 27 QQ 26 CC C6 QQ 9E Q4 ED 4 CC 1F 9B si1C さ 460 4D 99 さ 6 06 EC 62 さ 6 Q6 CC QQO 5 BED 4D B1 QA4 CO ziF1 
2F さ Q 9E Q4 ED Q2 CC 7E*4F 9E Q4 ED 04 CC QQ FO 9E Q4 gi1B さ 47Q E4 CO さ 6 Q6 EC 62 36 Q06 CC QQ 61 BD 4D 99 36 Q6 si76 
2F40 E7 Q6 DC Q4 C さ 0Q Q7 DD Q4 16 F ミ 40 9E 16 4F E6 saa さ 4BQ EC 62 さら 6 Q6 CC QQO 7 BD 4D BE1 a4 CO E4 CO aa CO szFD 
2F5SO 4 さ 4 06 17 Q5 02 さ 2 62 10 27 02 9C 17 Q さ さ 4 9E 31 さ 490 ER CO DD 2E 39 EC 62 さ 6 Q06 CC QQO 60 BD 4D 9 36 ziBD 
2F6O 16 4F E6 4 日 さ QQ 5B 10 26 0Q Q6 17 F6 EQ 16 FS siDF さ 4AQ_Q6 EC 
2F70 1H 9E 16 4F E6 日 4 日 OO さ B 10 26 QO 6F DC 22 BB さ ze6C さ 4EBO 27 Q0O 
2FBO _QO_Q さ 10 26 QQ 10 CC QO QQO 9E 1B ED 4 DC Q4 9E :BA さ 4CO 40 さ 
2F9Q 1 昌 ED 02 16 F2 F6 9E 1 日 4F E6 O1 日 ミ QO QQ 10 26 gaA さ 4DO_ CS QO 
2FAO OO 1B BD 4D 17 BD 4D OE 44 4F 5 紀 42 4C 45 20 44 :70 さ 4EQ_QQ 15 
2FBO 45 46 20 45 52 52 4F 52 2E OO 16 10 BB 9E 1 EC =sB6 さ 4FO DC Q4 9E 1 ED Q2 39 9E 1 日 4F E6 Q1 日 さ QQ QQ 1Q si さ D 
2FCO 0Q2 DD さ 6 CC 00 QO 9E 18B EZ7 Q1 9E さ 6 EC 1E DD 2E 』6 日 | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 
2FDO DC 04 9 さ 36 9E さ 6 ED 1E DC 2E DD 36 DC さく 6 日 ミ Q0 si さ 人 Sum: 4D DE ED HB 47 4 70 6 さ Q2 4 0 99 21 Ba 4C 77 i16 
2FEO_QO 26 E7 DC 04 9E 1 日 ED 02 16 F2 QAQ DC 22 さ QO zBB 
2FFO_Q さ 10 26 QQ 20 CC QO1 QO 9E 1 ED B4 DC QC E 1 sERE dd +O + キ 1 +2 + さ + オ 4 
CS さ 5QO 26 QQO QOE 9E 18 
Sum: 4 BE E7 54 D9 9D F6 DF D1 DO BA さ 2 BS 1O FS 9B s4 さ 51O EC QO2 9E Q4 ED 
さ 52O 9E 16 4F E6 B4 
Add  + 〇 +1 +2 + さ 3 +4 +5 +6 + プ 7 + 日 +19 + 人 +B +C +D +E +F Sum さ 53Q 16 C さ QO Q1 DD 
さ QOQO ED Q02 DC QC CS さ QQ Q2 DD OC DC QC B ミ Q1 02 10 26 :29 さ 540 16 4F E6 4 DD 
さ Q10 QO 0 くさ 16 10 Q6 9E 1 EC Q2 DD さく 日 9E 16 4F E6 4 :F5 3 さ 55O _ 10 17 FE 7E 32 
さ Q20_ B さ 0Q さ Q 10 26 0O 5 DC 16 C さ QO 0O1 DD 16 17 05 si10 さ 560 さ 4 10 17 FE 6D 
さ Q3Q QB DC 1Q 日 さ QQO O1 10 26 0OQ OH CC OO EZ7 DD さ @ 16 saQO さ 57Q_QB 日 ミ OO Q2 DD 
さ O40 OO QE CC QQO 9E 9E Q4 E7 4 DC さ B 9E O4 EZ7 Q1 CC szBF さ 5BO O4 ED 4 DC Q4 
さ O5O さ O BE 9E Q4 ED Q2 CC さ 36 10 9E Q4 ED Q4 DC Q4 CS si94 ミ 590 B4 DD 2E DC QB 
<Q60 QO 06 DD 0O4 DC 16 CS さ QQ Q2 DD 16 17 Q4 CB CC E7 si2 さ 5AO 26 QQO QB CC OO 
さ O7Q D1 9E O4 ED 4 DC Q4 C さ OO Q2 DD Q4 16 F2 QOD 9E 1D さ 5EO DC 2E C さ OO 20 
さ QBO 16 4F E6 4 日 さ OO 2B 10 26 Q01 40 DC 16 ビ さ QQ 01 sa7 さ 5CO DC 2E C ミ oO eo 
さ Q9O DD 16 17 0Q4 a4 DC 1Q さ QO Q1 1Q 26 QQO QE CC QO si3C さ 5DO DC 04 C ミ OO 04 
さ QQO ED DD さ DC 24 5 49 DD 24 16 00 44 CC SB 49 9E :OB さ 5EO FE EO 17 FE DD 












FD DD 
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10 





























り 2XWE 十 還 K ョ ジン フラ ォ ミ タダ ンジ 4・1 り ET ド 
さ B さ Q DC 16 C ミ 3 GQ Q1 DD 16 CC さ 6 06 9E Q4 ED B4 DC Q4 :a4 さ DZ7Q 9E 16 4F E6 4 E ミ C1 日 ミ 
3 さ 40 C さ QQ Q2 DD Q4 17 Q1 1E 9E QB EC 4 DD 2E DC QB gzE1 さる DBO Oo1 DD 16 9E 16 4F E6 4 
さ B5Q C さ QQO_Q2 DD GB DC 2E 日 ミ OO 2 10 26 0Q BQ DC 1 :QOD さ DO OO QO 26 DO CC QO CC 9E 
さ B60 36 Q6 CC QO QO1 BEBD 4D B9 36 06 DC 24 36 Q6 CC QO zi10 さ DAO DD Q4 DC 24 9E Q4 ED 1E 
さ B70 Q2 BD 4D B9 36 Q6 DC 24 36 06 CC QQO Q4 BD 4D B9 gzDO さ DEQ 9E 16 4F E6 日 4 日 さ QQ 27 
さ BBO_ AA CO EA CO さ 6 06 DC 24 さ 6 Q6 CC QQ QB BD 4D B9 :2 さ さ DCO O1 DD 24 DC 16 CS QO Q ミ 
さ B90 AA CO EA CO さ 36 06 DC 24 36 06 CC QQO 10 BD 4D BE9 :2B さ DDO E6 4 さ 4 Q6 17 F6 日 1 2 
さ BaO AA CO ER CO 4 CO E4 CO 1Q0 27 QQO 25 DC Q4 日 さ QQO gzDE さ DEO 9E 18 4F E6 4 日 QQ Q ミ 
3 さ BBO Q5 DD Q4 CC 5B 49 9E Q4 ED 4 DC QO4 CS QQ Q2 DD :EB さ DFO DD 24 16FF 5F E 16 4F 
BEOXO40DE お 2 人 2K45 ひ IDD24DC 400BS3(OO(OTI2GIESMTGIGO ま 47 (ニニ ーー ニー ニー ニー ビー ビニ ニン ニー ジニ ニニ ビー ニー ニーー ニ ーーー ニー ニ ピ ー コ ヒー コニー ニニ ー ニ ーー ニニ ニニ ーー 
さ BDO QA CC 4D 1F さ 4 Q6 17 FBH 4D 32 62 16 QO 7D DC 1 sFB Sum: EB EQA 9 さ OE 7 BE E さ Q 4B 14 F2 E5 75 ED D2 32 :A5 
さ BEQ さ 6 06 CC QO _Q1 ED 4D BE9 ミス 6 06 DC 24 さら 6 06 CC QOQ 10 
さ BFO O2 BED 4D B9 さ 6 06 DC 24 36 06 CC OO Q4 BD 4D B :DO dd  +O +1 +2 + さ +4 + 呈 + ら 6 + プ + 日 +9 +Q +B +C +D +E +F Sum 
ーー さ EOO _QE CC OO 17 DD 2C 17 E 45 CC OO 0O6 DD 1 39 DC si1C 
Sum: 79 An5 日 1 6 9E 12 1E aE FF O1 96 18 DF 16 aB 4C sz1F さ E1O 22 B さ OO 0Q さ 10 26 0Q 20 CC 01 QQ 9E 1 ED 4 DC :CE 
さ E20 OC 9E 1 日 ED Q2 DC QOC C ミ QOQ QO2 DD QC DC OC 3 Q1 :BS 
add  +Q +1 +2 + さ +4 +5 ロ +6 + ブ 7 + 日 +9 +Q +B +C +D +E +F Sum さ E さ O _Q2 10 26 QO QS 16 02 日 ミ 9E 1 EC Q2 DD 2E 9E 16 :39 
さ ?00 QR CO ER CO 36 Q6 DC 24 さ 6 06 CC QO QB BD 4D B9 :2 さ 3E4Q 4F E6 4 日 OO さ Q 10 26 Q0 91 DC 16 C さ QO Q1 DD DO 
3910 AR CO EQ CQ 36 06 DC 24 36 06 CC QQO 10 BD 4D B9 :2H さ ES5O 16 DC OB 3 00 02 DD QB DC 2E 9E QB ED 4 17 F6 :92 
さ 920 AR CO _ EA CO _ A4 CO E4 CO _ 10 27 QQ 25 DC 04 日 S QQ iDBE さ E6O DB 9E OB EC 4 DD 2E DC OB C さ QQO Q2 DD QB 9E 16 :i3H 
さ 930 Q5 DD Q4 CC 47 56 9E Q4 ED B4 DC Q4 C さ QO 02 DD :E4 さ EZ7Q0 4F E6 B4 日 く S 00 29 10 27 QQ QS 16 01 B1 DC 16 CS gi1C 
3940 Q4 DC 24 47 56 DD 24 DC 24 ヨミ OO Q1 26 E5 16 QQ :47 さ EBO QO Q1 DD 16 DC 1 日 さ OO Q1 10 26 Q0Q 26 CC QQO_QS gi99 
3950 QA CC 4D さ B さ 4 Q6 17 FA CD ミ 2 62 CC QO _Q5 DD 1 iD2 さ E90 DD 1Q DC Q4 さ OO 0Q3 さ DD 04 CC QQ 9E 9E Q4 E7 4 :B5 
396Q 16 FE 99 16 FH 5C さ Q BC Q2 20 06 49 4E 5Q 55 54 :BE 0 
3970 QO さ 4 10 17 FA BC さ 2 62 10 27 OO 12 CC 4D E2 さ 4 siBD 
さ 9B0 06 17 FA QA2 さ 2 62 CC QQ 03 DD 1 16 FE 34 3Q BC 14 
さ 990 Q2 20 Q4 47 45 4 QO さ 4 10 17 FA さ 6 32 62 10 27 s5C 
さ 9AQ_QQ 12 CC 4D D6 さ 4 06 17 Fa 7C 32 62 CC QQ 0QS DD zo 
さ 9BQ 1 16 FH QE さ Q BC Q02 20 05 41 42 53 2 QO 34 10 siS5E 
さ 9CO 17 FA OF さ 2 62 10 27 QOQ 15 17 FB 51 CC 4D 95 34 s45 
さ 9DO 06 17 FQ 52 32 62 CC QO 0Q ミ DD 1 16 FQ E4 3Q BC ビ :7 ミ 
さ 9EO _ 02 20 QS 4E 4F 54 2 OO 3 さ 4 10 17 F9E532 62 10 sz1D 
さ 9FO 27 QO 15 17 FB 27 CC 4D CD 34 Q6 17 FA 2 32 62 s62 Add  +O +1 +2 + ミ +4 +5 ロ +6 +7 + 日 +19 +Q +B + ビ +D +E +F Sum 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーーーーーー 一 さ FOO EC 4 DD 2E DC QB C さ OO QO2 DD OB 9E 16 4F E6 4 :76 
Sum: BF 7 C4 BD 26 19 C さ :7E さ F10 日 さ 0OQ 29 10 27 0O 03 16 O1 14 DC 16 CS ミ QO QO1 DD ia4 
さ F2Q 16 DC 1 日 S OO 01 10 26 00 BE CC QQ QS DD 1 DC :26 
Rdd  +O +1 +2 +C +D +E +F Sum さ F さ O_Q4 日 さ OO O4 DD 0Q4 CC QO 9E 9E Q4.E7 Q1 DC 2E 9E QB 
さ aOO CC OO 0 ミ 05 41 44 52 :4 さ F40 O4 E7 0O2 CC OO EC 9E Q4 E7 Q さ DC 24 5 49 DD 24 :DS 
3 さ A10 28B QO 34 2C。 17 FA FD 33C さ FS50O DC 24 昌 ミ QO QQ 10./26 QQO QF CC QQO B4 9E Q4 EZ7 04 iA 
さ a2Q DC 1 BB る CC OO Q さ DD gzBF さ F6O DC O4 C さ QO Q5 DD Q4 39 DC 24 36 06 CC OO 10 BD :97 
ささ O 1A CC QO 04 ED 4 DC :E5 さ F7O 4D 1 さ 6 06 DC 24 さ 6 06 CC FF EF BD 4D A9 4 CO :3Z 
さ A4Q0 Q4 C さ OO 20 06 4 49 za さ FBO E4 CO 10 27 QO 17 DC 24 36 06 CC QQO 1F a4 CO E4 :G61 
さ ASO 47 48 2 QO 34 10 17 F9 79 32 62 10 27 QQO 20 17 6 さ F90 CO 9E O4 E7 04 DC Q4 C さ OO 05 DD Q4 さ 9 DC 24 36 45 
さ Q60 FQA BE CC 1F B9 9E Q4 ED 4 CC QQ 4F 9E Q4 E7 02 :E2 さ FAO Q6 CC OO BQ BD 4D A1 36 Q6 DC 24 さ 36 06 CC FF 7F siBF 
さ a70 DC 04 ビ さ に O 0Q 
さ QBO BC 02 20 
3 さ A90 10 27 QQO 
3 さ AaO_ CS OO Q1 
さ ABO 20 05 5 ミ 
さ ACO_QO 19 1 フ 7 
さ aDO QO1 DD Q4 
さ QEO 53 47 4E 
3 さ QFO 17 FQ 2 
Sum: F5 15 7 
Add  +0 +1 +2 
3 さ BOQ_QQO 27 9E 
3 さ B1O 9E Q4 ED 
さ B2O ED QA CC 
3 さ B3O DC 0Q4 C ミ さ 
さ B4Q_ QO 2D 10 
さ BSO_DC 1A 
さ B6Q0 DD 24 DC 
さ B7ZO ED BB4 CC 
3BBO_DC 04 C さ 3 
さ B9QO BC 02 20 
さ BAO_ 62 10 27 
さ BEO 17 DC 094 
さ BCO 24 9E Q4 
さ BDO _ 18 CC QO 
さ BEO 0O4 C さ QO 
さ BFO_CC 4F E6 
Sum: FA 96 4D 
Add  +O +1 +2 
さ COO C さ QO_ 05 
さ C1O 3 QO 25 
さ C2QO 4 DC 1 
3CSO_QQ Q1 DD 
3C40 24 DC 24 
さ C5QO_Q4 EZ7 1F 
3C60_ 04 E7 4 
さ C7O FB SO 3Q 
さ CBO 51 さ 2 62 
さ C9QO F7 94 さ 2 
さ CaO_ B4 日 ミ QQO 
さ CBO FB 日 7 ?E 
さ CCO 6D DC 16 
さ CDO 3 0QO 24 
さ CEO 24 DC 2E 
さ CFO 2E DC 24 
Sum: B5 3B D6 DS BD 42 2 26 57 FZ7 C1 C1 Sa BB 
人 Add +Q +1 ユ 2 + さ +4 + +6 + フ + 日 +9 +aQ +BEH + ビ +D 
3 さ DQO 16 C さ QQO Q1 DD 16 9E 16 4F Eo6 日 4 日 3 QQ 30 
3D10 DC 2E さ 6 06 CC QO_ 09 BD 4D a9 36 06 DC 2E 
さ D2O CC QQO 11 BD 4D Q1 4 CO E4 CO 36 06 DC 2E 
さ D3O CC OO OQ BD 4D a1 QAQ CO EA CO さ 6 Q6 DC 2E 
さ D4Q CC QO 16 BEBD 4D a9 aa CO EQ CO 27 95 16 QO 
さ DS5O 16 4F E6 4 さ 4 Q6 17 F6 E2 さ 2 62 10 27 QQ 
3 さ D60_ OO OO _DD 24 DC 24 さ 6 06 CC OO0 Oa BD 4D 1F 
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還 還 スト フッ ウッー ラン タイ ム ・ ル ー チ ン ダン プ ・ 





4EAO SF 6 CS 
4EBO 33 5E BD 
4ECO_ 04 ヨ D Q4 
4EDO 9 4 QF 
4EEO 20 
4EFO 日 9 


Rdd 。 +O. +1 + す 2 キ さ 4 + +6 +7 + 日 +。 キ る BB 
4DOO 16 02 3 16 02 79 17 Q2 99 20/ QE 
4D1O EF 6 80 So FR 6E 
4DSO 06 6 43 3D 34 06 
4D3O EO 
4D4O0 さき 
4D5O_ 49 2 FB 44 56 ED 
4D60 60 2B 1E 5 49 2 人 
4D7O FB E ミ 3 64 1C FE 2BH 
4DBO EC EC 62 ら 6D 61 3 





は ESEEE 1 
OS2 BD sBG 
E1 36 :F ミ 








Sumi 4 1 QD 42 3C E6 





AdG。。+O ギ 1 よる つ + さ +4 + 
4FOO 45 3D EH 41 9 0O 
4F1O_ 09 36 16 8D CD EC 
4 10 36 16 8BD BD 
4F コ フ 7C CF さ 4 3B BC OO 
4F4Q0 10 BE FC 
4FGO 05 F6 FD 
4F6O_ 40 F ア FD 
4FZ7O Oo BZ FD 
4FBO _ 05 C6 12 
4FSO D5 BD 02 
4FRO_ 20 D9 34 





4DDO 27 F7 CC_OQO』00 39 17 FF 2 1F 9 
4DEO_FF Q7 BE QO4 3D 17 FF 1E 6 BOO 1 
4DF' 


コ ゃ HB ひよ ロロ OO や や 





Sums 





+Q +B +C +D 
49 ES 6 58 


+O +1 + ク る 4 
Q9 22 14 7Z 4 











4FEBO CE 11 OZ 
BO 8B9 QO ED 60 20 QO OO 34 O6 4FCO_ FC 4 マフ 

B2 3QO 2EB FS 1 09 2 Q 22 E9 7 BO SA 

EC 6 5B 49 5B 49 5 49 5B 49 ER BO ED eo E5 BD Bo B6 OC 
BE OO OO 6 10 36 10 36 10 36 10 4D 20 05 


4FFO Bo6 FD O1 1 FF 27 
7 0QO D7 SB _ 49 ED 46 BE QO OF C6 05 1C FE ーー cpio 26 
49 22 04 1C FE 20 O4 B2 OQ 1 QO1 8Z 
4-) ・47 69 46 24 02 6C 45 3 さ O 1F 26 DC 
人 6 05 SE PC1 OS 26 F7 さ 9 BD B4 ミ 4 04 
C2 02 BD 20 35 O4 6D 40 28 Q5 6 2D 


Sums 62 C4 〔 





日 2 1 3 ア 










1 BD 3 


bx 仙人 ッ ー 
ED C4 39 34 
48 ビ 

S さ 2126 
OO OO SO OS 
Q1 F 1 7Z 
FR BZ FD Q1 
34 Q2 Eo6 FD 
05 2A FB 3 紀 
DF CC 29。O9 
BO_B6 FC 日 き 
ヨ D EC 
BD aC 






BD ビ 


1 5 2Z-OD 16 


Co6 OoD E? 
全 D じ 有る 
06 7D FD) OF 


4 


*O 






47 EE 





RE aD 6 さ 























10 CLEAR100。 SH6FFF 

11 INFUT"HOT OR COLD"』 人 も て 

123 IF $="HV THEN 40 

20 LOADM"RTF 

さ Q0 LOUADM"KF 

40 INFUT"FILE NAME"』 人 

50_ OPEN" T" 。 拉 1 。 介 

55 IF FEEK(&H2DC) =O THEN PRINT"** NHT ASCII FILE **":CLHSE 手 1:END 
56 PRINT"FILE IS ロ FENED" 

60_ EXEC&H2OQO 





スト GO フン アイル 皮 メ イン ・ プ ログ ラム 、 EE 還 還 還 還 還 昌 還 








画 是 較 リス ト 4 ファ イル 版 に コン バイ ラ 変 更 箇 所 環 還 還 還 陣 軍 リス ト 5 ファ イル 版 ラ ンタ イム ・ ル ー チ ン 変 更 箇所 画 





Add 。 +O +1 +2 + さ +4 + 日 +6 +7 + 日 49 + 人 +H +C +D +E +F Sum 


41BO CC 10 27 DD 2C 3③9 34 4 BD 4D 06 B6 OD 10 9E 00 
4190 7 4 10 BE 00 0QO EC 4 10 ヨミ 7F QD 27 28 A6 B0 s 
41A0 日 1 OD 27 さく 1 1 27 27 1E BO SO 2BE F2 B1 39 22 EE : 
41EO 34 02 1F 20 34 06 5 日 49 5 49 ES E1 5 49 EB EO 





41CO 9 QO 1F O2 20 DB さ 4 20 10 9E OO 6 BQ 7 AO B1 
41DO OD 26 FB 35 20 1O 9F 12 9E oo 9F 16 35 CB 12 DD 
41EO 16 さ 9 CC OO さく DD 46 9E 46 EC 4 DD 46 39 BD D1 
41FO 45 39 29 3D 24 44 44 20 59 さ Q 36 29 さ D 53 28 00 


Sums 19 5B B9 3O_.7 6F FC 23 F2 OD EC 28 45 B5 EB 7D saA5 


0 ひび ひ 
1 や ご いと や どけ ロ け 


























10 "FRINT "RELUCaTER 





"UKE ま $FDOF。O 





*P 
20 PRINT A=TNFUT 日生 

3O "FRINT EQ=INFUT AA 85 
40 *PRINT A=TNFUT 





50 *MHILE SQ O) : DA=DQ+1 : 5Q= ニ Sn+ 1 s MEND. 








: SA=INFUT 


1NT "EXECUTOR "iFPHKE まま FDQOF 。Q 


mm リス ト 6 リロ ケー タ ・ プ ログ ラム ・ リ スト 時 還 m 昌 昌 リス ト 7 エグ ゼ キ ュー タ ・ プ ログ ラム ・ リ スト 加 
を 








男 昌 昌 昌 ト B リロ ケー タ & エ グ ゼ キュ ー タ ダンプ ・ リス ト EE 





ーーーー 
+ ワ 9 + 代 +H + ビ +D +E +F Sum フ CEO OO 
フ F FD OF D ミ C 7D FD フ CFO 

QO さ 2 ED BD Q1 25 BD ーー 
20 56 ED D Q1 
45 フ 7F FD Qo5 35 


Add 。+O で 1 .+22 よさ 4。 不 旨 
7COO さ 4 7F B6 90 QO 1 
7C10 OF 35 FF 8BD 7 ミ 7F 
7C2O さ Q ヨ D 4 7F FD 05 
7C3O 1 さ BD 2 ヨ D 4 ミ 7| 








Sums 





フ 7C40 FF 7F 90 QO B6 9o ュ 9 oo Co Add  + り +1 +2 + ネ +4 + ら 
7C5QO_ OO _a6 BO 7 ao BC ビ F フ Z さ F フ 7DOO EF 

7C60 BBD QQO C2 BE FC BD 0 さ ? 7D10 FF 

7C70 C さ 6 QO 7 BO 26 8D > BD 7D2O ミ 5 

7CBO 90 00 _B6 90 00 7 せら 2 7D さ QO 

7C9O_ QO_ 10 RF 1 10 BE RF E ら 

フ 7CAO_ FB 1Q 5O 6 8O BZ 大 世 FD 

7CBQ 2A に と 4 日 人 フ 

7CCO 2 ら 6 1 0 E1 





7CDO 34 7F Bo6 90 Q0O 8B1 7F さら 5 








+ ら 6 + プ + 日 + マ 











+ +E + ビ +D +E +F Sum 
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K コ ン バ パイ ラ の 画面 表示 は PR INT 文 の み し か 扱っ て 
いま せん . そこ で , いま まで 発表 され た グラ フィ ッ ク ・ サ プ ブ 
ルー チン を 使い や すい よう に 整理 し て み ま し た . 

以下 に その 文法 を 書き ます ("FM 活 研 ? に ある 本 来 の 文 
法 は 省略 し ます )、. 


ステ ー ト メン ト の 文法 


*CLS 〔 消 去 寺 囲 , 表示 色 , 背景 色 〕 
機能 : 画面 を 消す . 消去 範囲 は 0 が 全 画 面 。 1 が スク ロ 
ー ル 画面 。 2 が ペー ジ 1 画面 。 3 が ペー ジ 2 画面 . 
例 S@ 選 SC0。 7。 0] 
*SCREEN 〔CX 座 標 , CY 座 標 ま !〕 
機能 : 指定 座標 の キャ ラク タ ・ コ ユー ド を 返す . 
例 : A= ニ SCREEN 〔18, 6〕 
*POINT 〔GX 座 標 , GY 座 標 。 カラ ー〕 
機能 : 指定 座標 の 指定 色 の ドッ ト の 有無 を 返す . 
且 -1, 無 三 0 
例 : A ニ POINT 〔600, 172, 6〕 
* ま LINE 〔GX 座 標 , GY 座 標 , G X 座 標 , GY 座 標 。 機 
能 コ ー ド まき 2?, カラ ー, オプ ショ ン ・ コ ー ド まき 3] 
機能 : 線 ま た は 四角 を 描く . 
例 :LINE 〔100, 20, 450。 60, 0, 6, 2〕 
*CLINE〔CX 座 標 , CY 座 標 , CX 座標 , CY 座 標 , 文字 コ 
コー ドド 吉 カウ テル ポジション コピ ド ] 
機能 : 文字 に よる 線 , また は 四角 を 描く . 
2 入ら G 思 INEStO2005 0 ZOS 時 計 ま 5 本 
*CONNECT 〔 カ ラー, 機能 コー ド , 指定 座標 数 。 GX 
座標 , GY 座 標 , GX 座 標 , GY 座 標 , …… 〕 
機能 : 指定 座標 を 線 で 結ぶ . 
例 : CONNECT〔4, 0, 3, 100, 60, 200, 30, 500, 180〕 
* SYMBOL 〔GX 座 標 , GY 座 標 , 縦 倍 幸 , 横 倍 幸 , カ ラー, 
機能 コー ド , 角度 コー ド , 表 字 文字 数 , 文字 列 (文字 列 
の 格納 アド レス )〕 
機能 : 文字 を 拡大 表示 する . 
例 : SYMBOL 〔 0,20,5, 3,4,.0,0, 3,"/O”"〕 
*PSET 〔GX 座 標 , GY 座 標 ,。 カラ ー〕 
機能 : ドッ ト を 指定 し た 色 で 表示 する . 
例 : PSET 〔200, 50, 6)〕 
*PRESET 〔GX 座 標 。GY 座 標 〕 
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機能 : 点 を 消す . 


例 : PRESET 〔300, 100〕 
*PAINT 〔GX 座 標 , GY 座 標 , カラ ー, 境界 色 数 , 境界 色 
1 , 境界 色 2, 境界 色 3, …… 
撲 能 : 指定 座標 か ら 境 界 色 の 内 部 を ぬる . 
例 : PAINT (100, 50, 6, 2, 3, 4〕 
*KANJI 〔GX 座 標 , GY 座 標 , 漢字 コー ド )〕 
機能 : 漢字 を 表示 する . 
例 : KANJI 〔320, 100,。 $3E55〕 
*LOC (CX 座標 , CY 座 標 〕 
機能 : PRINT す る 位置 を 指定 する . 
例 : LOC 〔10, 15〕 
* ネ COLOR [カラ ー〕 
機能 : 色 を 変え る . 
例 : COLOR 〔 2 〕 
* WIDTH 【 横 文字 数 , 縦 行 数 〕 
検 能 : 画面 の 初期 設定 を や する. 
例 : WIDTH 〔80, 25〕 
* ま CONSOLE [スク ロー ル 開 始 行 , スク ロー ル 行 数 , 横 文 
字数 , 縦 行 数 〕 
機能 : 画面 の 初期 設定 を する . 
例 : CONSOLE 〔10, 5, 80, 25〕 
* ま INKEY [ 〕 
機能 お され た キー の 内 容 を 返す . 
例 : A= ニ INKEY[ 〕 
注 : AGET の GET 廊 は キー が 押 き れる まで 待ち ます が , 
INKEY〔 〕 で は 待ち ませ ん . 
*SETTIME (時, 分, 秒 〕 
機能 : 時 間 を 設定 する . 
例 : SETTIME [0, 0, 0J〕 
*TIME〔 〕 
機能 : 時 間 を 返す . 
例 : A ニ TIME〔 〕 
注 : 時 , 分 , 秒 の み を 知り た いと き は , 
時 TH, 分 = ニ TM, 秒 三 TS で ある . 
*HARDC 1 〔 濃 淡 。 濃 湊 , …, 濃淡 〕 
機能 : ハー ド ・ ユ ピー を と る (大 )、. 
カラ ー コ ー ド 0 か ら 7 ま で の 色 の プリ ント され る 
と き の 濃 深 を 0 = 無色 , 1 三渓 い , 2 = 濃い で 指 
定 し ます 。 
*HARDC2[〔 〕 








機能 : ふ ー ド ・ コ ピー を と る ( 小 ). 


例 : HARDC2〔 〕 


リス ト は FM-8 用 な の で FM- 7 の と き は .,1110 行 一 1130 
行 の ま $F2D8 半 を $F17D 間 に 変え て くだ さい . 


本 来 の 婦 法 と 上 記 の 女 法 は FM- 8 FM 


ン 6(GNC 
音 の 出 な いむ FM-8 の た 
で 戦 せ て お きま す . 





め に 。 次 の サブ ルー チン を お まけ 


* ま SOUND [〔 音 の 長 さ , 音 の 高 さ 〕 


機能 : スピ ー カ ー か ら 洗 


音 の 長き は 1 か 


何 倍 の 長き さか と 
長き で す . 


き を 出す . 
ら 255 ま で で 指定 し ます . 長 さ は, 
いう 指定 で すか ら 16 は 2 の 8 倍 の 


音 の 高き は , 指定 する 数 が 小さ きい ほ ど , 高く な り 
ます . つま り 指 定 す る 高き は, の 周期 みた いな 


も の で す . 


表 1 に 音階 デ ゲー タ を 載せ て お きま す . 
例 : SOUND 〔4, 35〕 
*ANPORT 〔 チ ャ ン ネ ル , レン ジ 


機能 : 指定 し た チャ ン 
タ を 読み と る 
レン ジ は 0 一 


ネル 。 レン ジ か ら ア ナグ ロ ・ デ ー 


2.5V は 'H' ($48)、 0 一 5/8V は 


346G あ GOD ECS 
例 : A ニ ANPORT 〔 0 , '"H〕 


注 1 : CX, CY 座 標 
GX, GY 座 標 は 
注 2 : 機能 コー ド 


は 





10QO 
1010 


FCBO。 
103O 


104Q0 
105O 
106Q 
2 提 。 ん 1 


キャ ラク タ 単 位 


ドッ ト 単 位 

0 PSET 
Js PRESET 
レン 抽 Nu 

3 : AND 


"ラム ・ リ スト 


』O 















































4 : XOR 
5 : NOT 
注 3 : オ プシ ョ ン ・ コ ユ コード 0 : ノー マル 
1 :B 
2 : BF 
= ロ 表 1 
| 00wkeRP ey FEWUNESES| 
陣 ま > 2 | 」 02 で PAN に GRY 本 東 本 明 
ーC*/Ds | 218 107 5 が 2 
| p 205 i01 | 49 22 
に -D*ZEe*_ | 3 95 46 | 。2 
ais | 183 89 43 19 
し - 一 人 ] 172 | 84 40 18 
F*/G | 162 | 3 | sm 12 束 抽 | 
コー | 153 辺 に 9 16 
|  @*/Ae | 14 | 7 805 
_A | 3 | 。 本 5ECaI 14 
_A*/Bv 。 | 128 62 29 13 
人 トニ ェ -R ま "| 人 200- | 682 [市 麗 が | 














※ 有 箇 無 象 より 引用 させ て いた だ きま し た 。 


最後 に 


これ で FM- 8 と FM- 7 は , BASIC と EK ユン パイ ラ ( 一 
部 の サブ ルー チン を 除く ) で コン パチ に な っ た わけ で す 。, 

な お , ファ イル 版 で コン パイ ル し た あと は CLOSE を 忘 
が いよ うに た 。 
参考 文献 

^FM-8 活 用 研究 ?。 工 党 











> ( 氷 FーBASTIC SUBRUUTINE *) 


*CLS』HLT[ ]: CPUKE ADDR。 ま 0Q2。 ん 1 ん さ 。 ん 2 SUBE ]:RETURN 
1020 * SCREEN:HLT[ ]:CPDKE ADDR. ま Q6、 ん 1 、2。 ん 1 2 ェ SUB[ ]:HLT[ ]』 DMY=PEEK($FCB4) *POKE も 


ま B0』 SUB[ ] : DMY=DNMY RETURN 
*FUINT:HLTE 1] 








?CLINEsHLT[ ]: CPUKE DDR.$20。 


: CHNNECT 』HLTE ]』 CPUKE ADDR 。 ま 16。 ん 1 。 ん 2。 


さ #』 SUB[ ]:s RETURN 


1070 ” SYMBOL : DMY1=Z9』HLTL]: CPUKE ADDR、 ま 19。5、%6。 ルフ 。 ル さん 4 。 ん 1 欄 、 ん 2。 BsFUR DMY=QO TO 


FUKE ADDR。$ ま 1 日 。 ん 1 提 。 メ 2 匠 。 
) : POKE $FCBO、 ま Oi SUB[ ]: IF DMY>$7F THEN DMY=-1 ELSE DMY=OiFT: DMY=DHY iRETURN 
*LINEsHLT[ ]: CFOUKE ADDR 、 ま 15。 ん 6。 5 ん 1 欄 。 ん 2 提 。 く 神 4 手 。 ん 
ん 6 。 ロ ん 1 析 。 ん 2 暫 相補 。 


ん 1 間 。2 間 1 、 さ 』 SUB[ ]sHLT[ ]: DMY=PEEK ( ま FCB4 


』 SUE[ ]: RETURN 
SUB ]』 RETURN 
メス さ 。 4 間 、。 錠 6 提 。 プ 欄 日 村 。 錠 9 村 。 久 10 提 。 錠 1 1 音 。 錠 1 





8-1 s ADDR: DIY ) =DMY1 : DMY ) : NEXT: SUB[ 1]: RETURN 
1QBO FPSET:HLT[ ]』CPOKE ADDR。 ま 1 フ 。1 。 ん 1 半 。2 柏 。 さ 。0s SUB[ ] RETURN 
1090 *PRESET:HLT[ ]: CPUKE ADDR. も 17。1 1 音 。2 間 。1 1:SUBL ]sRETURN 








EsFOR DMY=O TO さ 1:ADDR: DMY ) =DATA: DMY) : NEXT: SUB[ ]』 RETURN 


URN 


FRN 


1100 ”PAINT:HLT[ ]:CPOKE ADDR、 ま 1 ん 1 半 。 錠 2 提 。 当 さ 45 ん 6。 7 。 日 。 9 ん 10』 SUBE ] RETURN 
1110 "KANJTI : DDR= ま 04 さ Di CPUKE ADDR.$1600 半 。 ま 044 さ 本 。 錠 さ 革 CHDE ま BE 。 ま O4 さ D 村 。 和 も BD 。 ま F2D 日 本 ょ 日 
LT ]: ADDR=* ま FCB2』 CPUKE ADDR。 ま 1 じ 。 ん 1 間 。22 間 1 1 王寺 2+1 ロ 村 。7。O。 さ 2 DATA= ニ ま O44 さ : DDR=*FC 昌 


1120 *HQRDC1 』 DMH=Os DML=O』HSL 錠 1 、1 1:HS[X2、2]:HSLX さ 。4]sHSLX4 。 日 ]:HSLX5。 16]:HSFX6。 さ 2] 
sHSLZ ア 。641:HSLXB。 12 昌 ]: ADDR=$O4 さ D : CPDKE ADDR 。 ま OFOF 御 , ま O44 さ 間 。 DMH。 DML : CODE $BE。 ま 04 さ D 
本 ED 。 ま F2D 日 社 : RETURN』HS』 ITF ん 1=1 THEN DC こ DGG F 1: IF ん 1=2 THEN DMH=DMH+Z2 ェ FT:RET 


11 さ O “HARDC2: ADDR= 和 ま も O4 さ D: CPUKE 99054 $BE 。 ま O4 さ D 杜 。 も BD 。 $F2D 日 峯 RETU 


1140 
115O 
116Q 
117Q0 
1180 


119Q 
1200 


?LOCHLTE ]』 CPUKE ADDR。 さ 。 さ 。 ま 12。 ん 1 。 ん 2 
: COLOR: HLT[ ]: CFPOKE QADDR、 さ .2。 ま 11 ん 1 =SUBE ]:RETURN 


?MIDTH:HLTF ]s CPUKE ADDR。 1 .0。Z1 
* CUNSOLE ょ HLTE ]: CPUKE ADDR.。 1.0。% さ 。 た 





> TNKEY:HLT[ ]: CPUKE ADDR . ま 29、0s SUE[ ]:HLT[ ] : DMY=PEEK( ま FC くさ ) : PHKE FCBOQ 。 日 Os SU 
B[ ]: DMY=DNY : RETURN 


MODs DMY= ん 1 一 ん 1 722*Z2。 RETURN 


: SUEE ]: RETURN 







2.0。1.0: SUEE ]:RETURN 
1.Z2.0.1.0: SUBE ]: RETURN 





?SETTIME:HLT[ ]:CPOKE ADDR。 ま さ D 。 2.。0。 ん 1 2。 ん さ 。 O+ SUB[ ]: RETURN 


1210 *TINMEsHLT[ ]: PUKE ま $FCB2.。$ さ E: SUE[ ] s HLT[ ] : TH=PEEK ( ま FCB5 ) : TW= ニ FEEK ( ま FCB6 ) : TS=FEE 


K( ま FCB7 ) : PUKE *$FCBO 。$ ヨ 0』 SUB[ ] : DMY=TH* さ 600+TM*60+TSs RETURN 


2: RETURN 

12 さ O "SUBsPUKE ま FDO5。OsRETURN 
1240 ? 

1250 * 

1260 "(※ FM-B NLY *) 

127Q 『“ 

1280 * 





まま E6。 まじ O 社 。 まさ 。 ま OOOO# 。 ま OQOO 提 。 も OO 





0001 提 本 FDO4 持 まさ F つ 6 章 。 $ ビ 日 ら 昔 。 鍵 O1 日 プ 音 。 ま FDO さ 草 。 まさ 


1220 HLT: CUDE 和 B6。 ま FDO5# 。 まつ BF 日 3s PUKE ま FDO。 ま Os CDDE ま B6。$FDO 提 。 も 2RFE#: DDR= ま FCB 


1290 "NFIURT : DMY= ル 1 * つ 56+ ン つ ェ CUDE も 7 まじ 1 0 福本 ビブ 。 も 日 COE 幕 。 まさ O 。 名 日 じ O 日 社 。 $HD 。 まつ D 日 持 。 生ま 4F 。 


1 さ OO * SUUND』 DMY= ま 1000/ ん 2 ネン 1 : ADDR ニ 和 まま 04 さ Ds CPUKE DDR 。 2 DMY 菩 CUDE ま 7F 。 ま 0441。 呈 HG。 も 
Q44 1 韻 . ま 日 日 1 幕 、 日 プ 。 ま O44 1 韻 。 ま 日 プ 。 ま FDO さ 章 。 ま F ビ 。 和 ま 0 人 4 さ D 草 。 生日 く 。 ま OOO 1 間 . 和 ま つら 。 も FBFC 持 。 ま O4 さ F 欄 。 も 日 さ 。 $ 


1 さ 10 "BEEP:POUKE $FDO さ 。$ ま 41:RETURN: BEEP1 s PUKE も FDO さ 。 ま 日 1 :RETURN: BEEPO = POKE * ま FDO さ 。 1 


RETURN 
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北 区 県 交 交 世 導 商 半 疾 交 共 人 交 其 此 拓 半 交 導 此 交 符 交 具 共 間 共 半 共 師 加 版 


K コ ン パ イラ 用 グラ フィ ッ ク ・ サ ブ プルー チン 


K コ ン バ パイ ラ 用 グラ フィ ッ ク ・ サ プ ブルー チン は 非常 に 使 
いや すい も の で し た が , 発表 され て な い サ プ ブルー チン を 下 
記 に 書き ます (ゲー ム 中 な ど で は すでに 発表 され て いる も 


の も あり ます ). 
文 法 


@ CPUT1 〔CX, CY, CX, CY, デー タ の 先頭 アド レス , デ 
ー タ の バイ ト 数 〕 

機能 : 対角線 座標 に 示さ れる 枠 内 に 廊 字 を 表示 し ます . F- 
BASIC の PUT@ の 形式 1 に 対応 し ます . た だ し , デー タ 
の バイ ト 数 は 1 一 119 の 間 で な けれ ば な り ま せん . 

例 : CPUT1 〔10, 10。 19。 14、 $6800, 50, 3]〕 

@ CPUT2 (CX 座標 , CY 座 標 , CX 座標 , CY 座 標 , デー タ 
の 先頭 アド レス , デー タ の バイ ト 数 ,。 アト リピ ビュー ト 文 字 
コー ド 〕 

機能 : 対角線 で 示さ れる 粋 内 に アト リ ビ ュ ー ト 廊 字 と 表示 
文字 を 転送 し ます . F-BASIC の PUT@ の 形式 2 に 対応 し 
ます . た だ し , デー タ の バイ ト 数 は 1 一 119 の 問 で な けれ ば 
な り ま 中 を 。 

例 : CPUT2 〔10, 10,。 19。 14、 $6800, 100〕 

@PUT2 〔GX 座 標 ,。 GY 座 標 , GX 座 標 。 GY 座 標 , デ ー タ の 
先頭 アド レス , デー タ の バイ ト 数 , カラ ー コ ー ド , ファ ン 
クシ ョ ン ・ コ ー ド 〕 

機能 : 指定 し た わく 内 に 指定 色 で パタ ー ン を 書き 込み ます . 
F-BASIC の PUT@ の 形式 3 に 対応 し ます . た だ し , デー 
タ の バイ ト 数 は 1 一 114 の 問 で な けれ ば な り ま せん . 

例 : PUT1 〔100, 100, 131, 115, $6800, 64, 2, 0〕 

@ PUT2 〔GX,GY, GX,GY, デー タ の 先頭 アド レス, デー 
タ 数 。 ファンク ショ ン ・ コ ー ド ]〕 

機能 : 指定 し た わく 内 に 3 原色 の 画面 デー タ を 書き 込み ま 
す . ただし, デー タ の バイ トト 数 は 1 一 114 の 間 で な けれ ば な ら 
ず 。 ファ ンク ショ ンジ < コー ド は 0 記 2257G TGBRIEISET) 
の 指定 は で きま せん . 

例 : PUT2 〔100, 100, 123, 107, $6800, 72, 0〕 

@ CHANGE 〔GX, GY, GX, GY, 旧 カ ラー コー ド 1, 新 カ 


較 茶 合 公 之 





ラー コー ド 1 , 旧 カ ラー コー ド 2,。 新 カ ラー コー ド 2, 上 
カラ ー コ ー ド 3, 新 カ ラー コー ド 3〕 

機能 : 指定 し た 枠 内 の 色 を 変更 し ます . 一 応 こ の 命令 で は 
3 色 だ け 変 更 で きる よう に な っ て いま す が , わずか な 操作 
で 変更 させ る 色 の 数 を 1 色 一 8 色 ま で 自由 に 変え る こと が 
で きま す (FM-7 シ ステ ム 仕 様 書 参照 ). 

例 : CHANGE 〔100, 100, 200,、 150, 3, 5, 4, 7,1,2〕 

以下 。 FM-7 の み に つ いて 有効 な サブ ルー チン で す . 

@ SCREEN2 [アク ティ ブ VRAM コ ー ド , ディ スプ レイ V ソ 
RAM コ ー ド ]〕 

機能 : アク ティ ブ 画 面 と ディ スプ レイ 画面 の 設定 を 行ない 
ます . FM-7 の SCREEN 文 と コン パチ に な っ て いま す . 
例 : SCREEN2 〔4, 0] 

@ COLOR2 [バレット コー ド , カラ ー コ ー ド )〕 

機能 : カラ ー パ レッ ト の 定義 を 行ない ます . FM-7 の COL 
OR= テ の 文 と コン パチ に な っ て いま す 。 

例 : COLOR2 〔2, 4〕 

@ SOUND 〔PSG の レジ スタ 番号 , デー タ ]〕 

機能 : FM-7 の SOUND 文 と コン パチ で す . 

例 : SOUND 〔7, 0〕 

以 芝 すず 6PUWIL GEUO2 PUT 月 が の に 503 で 人 は 
デー タ の バイ ト 数 に 制限 が あり ます が , 少し の 改良 で 制限 
バイ ト 数 以上 で も 可能 に な る の で , 各自 必要 に 応じ て 変更 
に で で 7 だ きり 5: 

また だ た, GET, GCURSOR に つい て も サブ ルー チン 化す る 
こと が で きま す が , 私 自身 が ほとん ど 使 わな い コ マン ド な 


の で , まだ 作成 し て いま せん . な お , サブ ルー チン は リス 
ト 1 の 通り で す . 

3 参考 文献 

1) FM-7 ユー ザー ズ ・ マ ニュ アル シス テム 仕様 


2) FM-7 E-BASIC 文法 書 

30 の EN ンジ ペ 272 ス HIM2Z 2 の in 2 が ブリ ジジ) 
1/O 83 年 4 月 号 

4 ) FM-8 活 用 研究 , 工学 社 


ラン イッ ク ・ サ プリ ルレ ー チ ン ・ ソ ー ス ・ リス ト 昌和 





1000 『? 
1010 * 


(* BRAPHIC SUE RUTINE *) 


Ei ADDR: MKI ) =DTD: KT ) :NEXT: SUB[ ]: RETURN 
103Q0 * 


s DDR: KT ) =DTD: KT ) : NEXT: SUB[ ]: RETURN 
105O * 


1070 ” 
10BQ 


109O * 
110QO 
URN 
ま TO 3 
1120 
・ も 02 ェ PUKE ま FDOD. ま OO』 RETURN 
113O * 

1140 
115O 
116O * CULUR2:FUKE ま $FD さ B+ ん 1 。23RETURN 
3 は 70" テ 


2: RETURN 





1 


1190 "SUEsFUKE ま FDO5。O ェ RETURN 


1020 * CPUT1 3 ロ E=Z6ー1 HLTE] CPUKE ADDR。 ま 07、 ん 1 2。% さ 。 4 7。 6: DTD=Z5sFHR MKI=O TO Q 
1040 "CPUT2* ロ E=X6ー1sHLT[ ]: CPUKE、 DDR 。 ま 0O9。 1 2。% さ 4 。 0。 6』 DTD=Z5sFUR MKT=O TO BE 
1060 ?PUT1 3 BE=X6ー1 sHLTE ]: CPUKE ADDR。 ま 1 ビ 。 ん 1 持 。 つ 持 。 錠 さ 幕 。4 提 日 、 当ら 6s DTD=5 ロ FUR MKI= 
O T ロ CEi ADDR: KT ) =DTD: MKTI ) :NEXT: SUB[ ]: RETURN 

* PUT2: DE=X6ー1 HLT[ ]:CPOKE ADDR 。 ま 1E ビ 。 ん 1 提 。 2 揚 。 さ 提 4 拍 。0。 7。 ん 6 DTD=5。 FR MKI=O 
TO GE:aDDR: MKT ) =DTD:WKTI ) :NEXT: SUB[ ]: RETURN 

* CHANGE 』 HLT[ ]: CFDKE ADDR , ま 1 人 0。 ん 1 音 。 錠 2 補 。 さく 攻 。 錠 4 提 。 さ 。 5 ん 6。 プ 。 日 。29。 ん 210: SUBT ]: RET 


* SHUND : POKE ま FDOE ん 1 sPUKE ま FDOD 、 ま O さ 。 PUKE ま FDOD 。 ま OOsPUKE ま FDOE 。 22 PUKE ま FDOD 


7 SCREEN2: DTD=AES (ん 2ー ア ) ) #16+ABG (ん 1 一 7) : FUKE ま FD さ 7。DTDiRETURN 


11BO HLT:CUDE まま Bo 。$FDOG ロ 昔 。 まつ RF 時 s FUKE ま FDQ5 。 ま 日 0』 CUDE HG。 ま も FDO 持 RF 時 DDR=$FC 日 
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UL 2 


ゲー ム を 作ろ うと する と , まず 必要 に な る の が キャ ラク 
タ . 最近 は 640X200 ドッ ト が あたり まえ に な っ て , キャ 
ラク ター ドッ ト ・ パ ター ン で 作る の が ほとん ど で す ね . そ 
れ も , だ ん だ ん アニ メー ショ ン の よう に リア ル な 動き に な 


っ て , 1 つの キャ ラク タ で も いろ いろ な 方 向 の パタ ー ン が 


使わ れ て いま す 
こう いう 傾向 は ゲー ム を する 方 の 側 に と っ て は 楽し いこ 
と で す が , 作る 方 の 側 に な る と 大 変 な こと で , それ ら の バ パ 


ター ン を 1 つ 1 つ 作る の で は いく ら バ ター ン ・ エ ディ タ が 


あっ て も 面倒 な こと で す . 
そこ で お 助け マン 登場 / こ の スー パー パタ ー ン ・ エ ディ 
タ は その 面倒 な 作業 を ドン と 引き 受け て くれ ます . 


MODE 一 
PEN_ 一 
COLOR- 


(89x49) 


ソル ] ER 
HOME 


写真 2 BASIC の デー タ 廊 を 作成 


0 UL JIN1X(599) :MESTORE 5916:FOR !=9 10 999:REND DAINX(1) : 工 NT:RETURN: REN 


0 Mi 2675.8.08-182760.80 も - 5639,-32600,6.6,3 

59 AI -27777,-14464.6.6,7,326,31948,6,9,14,192,6279,9,8,28.8 

9 IA 3194,12260,0,56,1,24271,-1924,8,112,2,29575,-31232.8,192.8.3 
940 DAT 769.6,394.4.1,-32384,6,768,6,1,-325766,1536,16,7.64 

5 WI 6072,32,12,%,6,3672,64,24,566,1792,128,49,12.6 

8 MTN 3⑳4,256,96,6,6,384,512,192,2,6,768,1624,384,6,8,384 

578 MAT 2848,768,12.6,224,4096,1536,8.6,32,8192,7169,24.9,32,16384 

96 JNIO 496,48,6,48,-32769,12289,96,6,24,8192,24576,192,9,12,12269,-16384 
9 MIN 394.6.6,6145,-32769,769,6,33973,6,1536,8,1,-31744.6,3972 

S1 交 JIN 6.8,-16398,6,6144.8,9,24832,9,12289,9,9,12528,1564,24576.8 

S119 MTN 6,5246,-12496,-16384,9,9,3269,-1565,-32768,6,6,1999,2481.6,9.8 
3129 IA 12.6.6.6.8, 用 月 月 月 月 用 月 」 

DK 有朋 有 月 24576,6,6,9,6,-1824,769 

S146 MA 0.8,1.- 9.9,3-27777,-14464,8,6,7,325,31948,8 

3199 MT 6,14,192,6222,6,6,28,6,2,12288,9,56,9,3,-1924.8 





一 市川 浩 志 


作成 で きる パタ ー ン の 大 きき さ は, 最大 80X40 ド ッ ト . 
1 つの キャ ラク タ に つい て 8 つの 方 向 の パタ ー ン ・ デ ー 

タ を 一 度 に 作成 する . 
デー タ の 形式 は BASIC の DATA 廊 と マシ ン 語 の デ 

ー タ の どちら か を 選べ る . 
デー タ を 作成 する フリ ー エ リア が 広い (16K バ イト ) の 

で 上 肛 信 だ くさ ん の デー タダ る 作れ る (ディ スク の の 完 

ム で も 同じ ). 

FM-8, FM-7 ど ちら で も 使え る . 
何と いっ て も 高速 / 

図 1 の よう に 画面 の 右側 に は 8 つの わく が あっ て , 左側 
の 拡大 パタ ー ン を キー 操作 で 作っ て いき ます . この と き 右 
側 の わく の 中 に 8 方 向 に 向き を 変え た 実物 大 パタ ー ン が リ 
アル タイ ム で 出力 され る の で , それ ら を 見 な が ら 気 に 入る 
まま CE イッ ト で きま まず , 

人 ドッ ト を セッ ト 
し な が ら カ ー ソ ル を 移動 する な どか な り 遅 く な っ て し 
まう の で す が , Ca : の で 操作 性 
は バツ グン で す . そし て 剛 コ マン ド に より それ ら の デー タ 
を 一 度 に 作成 で きる の で す . デー タ を 作成 する 速 さ も BA 
S 1 C の 100 倍 と いう 超 ス ピー ド で すか ら , BASIC で 

5 分 か か る も の が わずか 3 秒 で で き 上 が っ て し まい ます . 


オプ ジェ クト ・ プ ログ ラム を LOADM パフ ァイル 名 7。」 
R ま た は ロー ド し た あと EXEC HH5000 で プロ グラ ム が 
スタ ー ト し ます . CLEAR 命令 を 実行 する 必要 は あり ませ 
ん . この こと に つい て は あと で また 説明 し ます . 

図 1 エディ ッ ト 画 面 











(バタ ー ン 番号 ) 

- 蔵本 パタ ー ン 

. 1 を 左右 反転 し た パ バターン 
、 1 を 上 下 反 転 し た バタ ー ン 
. 3 を 左右 反転 し た パ バターン 
. 1 を 填 90* 回 転 し た パタ ー ン 
5 を 上 下 反 転 し た パター ン 
1 を 一 90' 回 転 し た バタ ー ン 
- 7 を 上 下 反転 し た バタ ー ン 





で 





3 
d | 
II 軸 
区 | 


oO いい の の お oO DO 一 
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&O 


(OPTION 有 選択 ) 


画面 を イニ シャ ライ ズ し た 後 で OPTION : 90* 
(Y/N) ? ” と 聞い て きま す が , これ は パタ ー ン 番号 5 一 
8 の パタ ー ン を 作成 する か どう か を 選択 する も の で す . 陣 
を 入力 する と 1 一 4 まで の ヾ ター ン を 作成 し ます . これ を 
Ei ド と 区 ま 3 | 層 を 次 力 す る と 凡 で 8 ま RG の PS ュー シン 
を 作成 ます 。 て 宰 を 走 寺 だ お L と ます 、 

な ぜ こ ん な 選択 を する の か と いう と , パタ ー ン を 土 90* 
回 転 す る に は 横 方 向 と 縦 方 向 の 1 ドッ ト あ た り の 長 さ が 等 
し く な けれ ば な ら な いか ら で す . 640X200 ド ッ ト の グラ フ 
ィ ッ ク で は 横 と 縦 の ドッ ト の 長 さ の 比率 が 1 対 2 で すか ら 
この まま 土 90” 回 転 す る と 縦長 の パタ ー ン に な っ て し まい 
玉 計 3 

これ を 避け る に は 横 方 向 の 2 ドッ ト を 合わ せ て 1 ドッ ト 
と すれ ば いい わけ で , 実際 モー ド II で は その よう に し て い 
ます . つま . り , モー ド II で は 実質 的 に 320X200 ドッ ト の 
グラ フィ ッ ク と な っ て ドッ ト が 少し 荒く な り ま す . 
(パタ ー ン の 大 きぐ 入力 ) 

作成 で きる パタ ー ン の 大 き さ は モー ド 1 で 横 が 1 一 80 ド 
ッ ト , 縦 が 1 一 40 ド ッ ト の 範囲 で す . モー ド II で は 横 が 1 
ー40 ド ッ ト と な り ま す が , ドッ ト の 幅 が 2 倍 に な っ て いる 
の で 最大 パタ ー ン の 大 きき さ は モー ド 1I と 同じ で す . この 制 
限 を 越え た 数 を 入力 する と BEEP 音 が 鳴っ て 再 入力 に な 
が ます: 

(パタ ー ン ・ エ ディ ッ ト ) 

図 2 の キー を 操作 し て パタ ー ン を 作り ます . パタ ー ン が 
完成 し た ら [ 剛 を 押し て くだ さい . する と “コレ デイ イデ ス 
カ ?(Y/N)/ と 半 い て きま すか ら も う 一 度 作成 し た パタ ー 
ン を 点検 し て くだ さい . な に も 修正 する 必要 が な けれ は II 
また は [RETURN | キー を 押し ます -. 


(パタ ー ン 番号 入力 ) 

次 に どの パタ ー ン の デー タ を 作成 する の か を 閉 い て きま 
すか ら , マタ ー ン の 左側 に 付い て いる 番号 で 入力 し て くだ 
さい T1920355 に coW の よう の !( 避 連続 じ で 火力 で きま 3 ま 
7 な 25 才 2 の 35T5PN2 の さよ の 選 問 に 20 で を 5 れる 
か まい ませ ん , パタ ー ン 番号 以外 の 数 字 や 女 字 は 無視 され 
ます . 入力 し た 数 字 を 訂正 し た いと き は スペ ー ス ・ キ ー を 
押し て くだ さい . [RETURN | キー だ け を 押す と すべ て の ノ マ \ 
ター ニン (で 三 ド LT. の 宮 き ば 1 ビビ 40ICG) の デー タ を 作成 も 
まお 

図 2 操作 キー 


2 パタ ー ン 番号 を 入力 し た 後 は , カラ ー モ ー ド の デー タ を 
作る の か , モノ クロ ・ モ ー ド の デー タ を 作る の か を 選択 し 
ます . カラ ー モ ー ド は PUT@A で 表示 する た め の デ ー タ を 
作り ます . モノ クロ ・ モ ー ド は PUT@ 用 の 単色 デー タ で 
す . カラ ー モ ー ド の デー タ 量 は モノ クロ ・ モ ー ド の 3 倍 に 
な り ま すず す 。 


(デー タ 形 式 入力 ) 


BAS1IC で 使う デー タ を 作成 する 場合 は [| マシ ン 語 
また は K コ ン パ イラ 用 の デー タ を 作成 する 場合 は [ 和 ] を 入力 
し て くだ さい . “Are You Sure(Y/N) ?” と 聞い て く 
る の で 近 し 間 違え て も 訂正 で きま す . 


(BASIC デ ー タ ) 


BASTIC の デー タ を 選択 する と “ヘン スウ メイ ?? と 
聞い て きま すか ら , 15 文 字 以内 で デー タ を 読み 込む 配列 の 
変数 名 を 入力 し て くだ さい . 最初 が 英字 で な いと エラ ー で 
再 入力 と な り ま す . 入力 し た 廊 字 の 訂正 は スペ ー ス ・ キ ー 
を 使い ます . 15 文 字 よ り 長 い 変 数 名 は 入力 で き な い よう に 
な っ て いま すか ら , いち いち 数 える 必要 は あり ませ ん , 15 
文字 以内 と いう 制限 が ある の は , 3 の だ ボ " つ (に 2 べ カ し だ 突 
数 名 の 最後 に 自動 的 に パタ ー ン 番号 を 付け 加え る よう に し 
て ある か ら で す . つま り 15 文 字 の 変数 名 を 入力 し た 場合 
作成 され る デー タ 中 の 変数 名 は 16 廊 字 に な り , これ は F-B 
AS IC が 変数 名 を 区 別 で きる 最大 の 長き さ です . で も そん 
な に 長い 変数 名 を 付け る 人 は まず いな いで し ょ う . 

較 3 作成 され る DATA 文 の 例 





入力 し た 変数 名 パタ ー ン 番号 


5000 DIM AKINA 3 %(31) : RESTORE 5010 : FOR | 0 TO… 
5010 DATA 一 1, 255, 13028, 3, 一 15, …… 
5020 DATA…… 











IM SET/RESET モ ー ド 切り 換え . [1| … [7 ア | ドッ ト の 色 指 定 . 
ペン UP. | カー ソル 位置 に ドッ ト を セッ ト . 
ペン DOWN. | カー ソル 位置 の ドッ ト を リセ 
カー ソル 位置 に ドッ ト を セッ ト . ッ ト . 
カー ソル を 1 つ 右 へ . [R| パタ ー ン ・ デ ー タ を 作成 する . 
カー ソル 位置 に ドッ ト を セッ ト . | HOME | カー ソル の 色 で すべ て の 
カー ソル を 1 つつ 左 へ . ドッ ト を セッ ト . 
区 | カー ソル 位置 の ドッ ト を リセ ッ [ CLEAR | すべ て の ドッ ト を クリ ア . 
ト . カー ソル を 1 つ 右 へ . 
IZ| カー ソル 位置 の ドッ ト を リセ ッ 

ト 。 カー ジ ユ を 1 つ 左 へ . 
會 | | [件 呈 カー ソル 移動 . ペン DOWN の と き は ドッ ト を セッ ト ( ま 
た は リセ ッ ト ) し な が ら カ ー ソ ル 移 動 (セッ ト ・ リ セッ ト の 切り 換 
え は MM コマ ンド に よる )、. 




















[wl 避 | | 





トコ 
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その よう な わけ で , 変数 名 の 最後 を 見 れ ば その デー タ の 
パタ ー ン 番号 が わか り ま すか ら と て も 便利 で す . 変数 名 の 
入力 終了 は [RETURN | キー で す -. 

作成 さき れる DATA 廊 の 行 番号 は 5000 か ら 始 まり ます . あ 
ら か じ め BASIC の プロ グラ ム や DATA 文 が メモ リ に 入 
っ て いる 場合 に は それ に アペンド し ます . そし て も し その 
最終 行 番号 が 5000 よ り 大 きけ れ ば , アペンド され る デー タ 
の 行 番号 は それ より 10 大 きい 数 か ら 始 まり ます . 

デー タ の 作成 時 間 は 長く て も 3 秒 以 内 で す . 小さ な パタ 
レス 2c: ら (HRCeC き に の た つ 3 で 人 ま (US ま 432E(B4 民 信 6 沿 らち 
ベル が 鳴っ て メモ リ の 残り の バイ ト 数 が 16 進 数 で 表示 され 
る と 作成 完了 で , ^Continue ?(Y/N)” と 聞い て きま す . 
これ 以上 の デー タ を 作ら な いと き は も ちろ ん [を 入力 し て 
くだ さい .[ 療 を 入力 する と 次 に \Same Character 2?(Y/ 
N)?/ と 聞い て きま すか ら , また [Y| か INI を 入力 し て くだ さい . 
[を 入力 すれ ば いま の 画面 が その まま 残り ます か ら , 同じ 
キャ ラク タ で 違う ポー ズ の パタ ー ン を 作る と き は 大 変 楽 で 
すま 

な お , 残り バイ ト 数 が マイ ナス に な っ て , “Memory 
Over ! ? と 表示 され た と き に は も ちろ ん それ 以上 の デー タ 
は 作成 で きま せん . そ の と き に は リス ト を と っ て , で き 上 上 
が っ た DATA 廊 の 最後 を 点検 し て くだ さい . も し Memory 
Over!/ と 入っ て いた だ た ら そ の 部 分 の デー タ は 使え ませ ん . 

デー タ を 作る た め の フ リー エリ ア は 約 16K バイ ト も あり 
ます が , それ で も 最大 の 大 きき の パタ ー ン ・ デ ー タ を カラ 





モー ド で 8 つ 作 る と , 16K バ イト を は る か に オー バー し て 
し まい ます . た だ し , た と え そ の よう な こと を し て も 保 座 
対策 が 万 全 で すか ら こ の プロ グラ ム 自 体 が 破壊 され る よう 
な こと は あり ませ ん . 試し に 一 度 最大 パタ ー ン の デー タ を 
カラ ー モ ー ド で 作っ て みて くだ さい . その デー タ の 大 き さ 
に に きっ と びっ くり し ます よ . 

(マシ ン 語 デー タ ) 

マシ ン 語 の デー タ を 作る 場合 に は `ADDRESS ($1000 
ー) ?? と 聞い て きま すか ら , デー タ の 先頭 アド レス を 入 
カカ し て くだ さい (16 進 数 で 入力 する と き に は ^$” を つけ る 
の を 忘れ な いよ うに /).$1000 よ り 小 さい 数 を 入力 し た り , 
デー タ の 最終 アド レス が $4AF0O を 越え て し まう 場合 に 
は 再 入力 と な り ま す . ロー ド す る と き の オ フ モ セッ ト で 自由 
に アド レス を 変え られ ます か ら , $1000 か ら 作 る の が いい 
と 思い ます . 

マシ ン 語 の デー タ は メモ リ 効 率 が いい の で , 最大 の 大 き 
さ の パタ ー ン で も カラ ー モ ー ド で 8 つつ 一 度 に デー タ を 作る 
こと が で きま す . アド レス を 入力 する と , アッ と いう 間 に 
デー タ が 作成 され て バ パターン 番号 と アド レス が 出力 され ま 
す . 忘れ ず に それ を メモ し て か ら 何 か キー を 押し て くだ さき 
い ゝ . 

この あと の 手順 は BASIC デ ー タ の 場合 と 同じ し です. 


プロ グラ ム に つい て 


プロ グラ ム は K コン パイ ラ で 書か れ て いま す . BASI 
C と ほぼ 同じ 廊 法 で す が , ラベ ル が ある の で むし ろ BAS 
IC よ り も 解読 し や すい の で は な いで し ょ うか . 

最後 に ある COD 選 文 は 6809 の マシ ン 語 サブ ルー チン で 
BAS1IC デ ー タ の 作成 が その 役目 で す . 本 当 は この 部 分 
も K コン パイ ラ で 書け る の で す が , 勉強 を 兼ね て マシ ン 語 
に 挑戦 し て み ま し た . 

何 を や っ て いる か は アセ ンプ ブル ・ リ スト を 見 て くだ さい . 
コメ ント が ある の で 解読 は や さ し い と 思い ます . た だ , ア 
セン プル ・ リ スト の アド レス は 実際 の アド レス で は あり ま 
せん か ら 注 意 し て くだ さい . この マシ ン 語 は 完全 に リロ ケ 
ー タ ブル で す . K コンパ イラ に 戻る 直前 に D レ ジス タ に デ 
ー タ の エン ド ・ ア ドレ ス を 入れ て いる の で , 作成 し た デー 
タ の エン ド ・ ア ドレ ス を 値 と する 関数 に な っ て いま す . 


コン パイ ル の 方 法 


FM-8 を 使っ て いる 人 は , ファ イル 版 の KK コン パイ ラ で 
コン パイ ル じ で くだ さい カセ yhs で も れ ズ ス 必 KG も ラシン 
パパ イル で きま す . 

カセ モット を 使う 場合 は ソー ス を いく つか に 分 け て オン ・ 
メモ リ 版 の コン マイラ で デバ ッ グ する と いい で し ょ う . F 
M-7 の ユー ザー な ら ば pr126 の 『 拡 張 版 表 コ ン パ イラ 』 の 
記事 を 見 て コン パイ ラ を 変更 し て , フル RAM で コン パイ 
ル し て くだ さい . FM-8 で も 1I/O'82 年 11 月 号 の 独立 モニ タ 
を 使え ば フル RAM で コン パイ ル で きる は ず で す が , まだ 
試し て いま せん . 


0 


国 4 メモ リ ・ マ ッ プ 



















ー$38,$54 の 内 容 


$0C07 
(FM-8 の ROM シ ステ ム で は $083C に な る ) 


フリ ー エ リア 





〆$4630 
| BASIC の デー タ を 作る と き の ワ ー ク エリ ア 


ラン タイ ムリ ワー クエ リア 
ンス ンコ レン 
(本 体 ) 


| ウー ク ・ エ リア | 


S4D00 





DISK BASIC 


| 


CODE 文 の マシ ン 語 は 当然 1 つ で も 間違え る と 禁 走 の 危 
険 が あり ます . アセ モン ブラ を 持っ て いる 人 人 は アセ ンプ ブル ・ 
リス ト を 入力 し た 方 が いい か も し れ ま せん . その 場合 は KK 
コン パイ ラ の ソー ス ・ リ スト の 最初 に DEF WORK ニ $6A 
90 を 追加 する だ け で リン ク で きま す . 


シス テム ・ ス タッ ク 
《CLEAHR 命 令 ? に つい て 


この プロ グラ ム の メモ リ ・ マ ッ プ を 図 4 に 示し ます . $ 
C07 ($33, $34 の 内 容 ) か ら $ 4 B00 ま で の フリ ー エ リ 
ア の 中 に BAS TIC ま た は マシ ン 語 の デー タ を 作成 し ます 
か ら , この エリ ア の 中 に シス テム ・ ス タッ ク が ある と 襲 走 
し て し まい ます . シス テム ・ ス タッ ク は 必ず $ 6 D00 よ り 
上 の アド レス に 置い て くだ さい . 

一 番 安 全 な の は CLEAR, 名 H7FFF (ディ スク ・ シ ステ 
ム で は CLEAR, 層 H6FEE) と する こと で す . つま り ス イ 
ッ チ ・ オ ン 後 , 何 も せ ず に この プロ グラ ム を ロー ド し て 替 
ら せ れ ば いい の で す . 

コン パイ ル 直 後に 走ら せる と き は , 事前 に 必ず CLEAR, 
& H7FFEE( ま た は CLEAR, 層 H6FFE) を 実行 し て くだ さい . 


この プロ グラ ム の 使い ご こち は いか が で すか . いま まで 
の パタ ー ン ・ エ ディ タ よ り は ずっ と 便利 に な っ た と 思い ま 
す が . 

それ と コマ ンド は すべ て 大 文字 で 入力 し て くだ さい . 
参考 文献 

1) パカ ラー パタ ー ン ・ エ ディ タ /。1/O782 年 3 月 号 

2) FM-8 活 用 研究 
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1 * (※ーーーーーーーーーーーーーーーーーーー \) 
2 :(* PATTERN EDITOR *) 
3 26 Ver。 2.0 *) 
4 "(* "日. さ by ITwLUM *) 
5 * (*※ーーーーーーーーーーーーーーーーーー 一 *) 
1 


0 F= 呈 6CO ェ ロニ F+1 日: X ニ ロ + 1 日: Y ニ メ + 1 日 : D= ニ Y+ 1 日: HE=D+ 1 日 』 ド = ニ HE ビ +D ェ CUDE まま 140 拉 
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20 "BEBIN』 CHL=7』CUX=O ょ CUY=0』 SET=O INIT[ ] 
30 "LHCEO。21]3? "HPTTON: +90? 、-907 (YY/N)?" 


40 
50 
60 
70 
8BO 
90 
100 
110 
(7) 
120 
13O 
14O 
15Q 
160 
170 
180 
190 
200 
210 


220 


23O 
240 
250 
260 
270 
2BO 
290 
さき 0Q 
さ 10 
さ 20 
さ 30 


340 
さ 5O 
さ 60 
さ 70 
380 
さ 390 
400 
410 
420 
43Q 
440 
450 
460 
47Q0 
4BO 
490 
OO 
10 
GS2O 
30 
54Q0 
55O 


5709 
SBQO 
59Q 
600 
6109 
620 
6 さ 0 
640 
650 
660 
670 
680 
690 
700 


7320 
730 
740 
75Q 
7 プ 6Q 
77Q 
78Q0 
79Q 
BQ0O 
B10 
) =1 
B2O 
3O 
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569 『 


hG: 





7L1: ド K=REYF ]: IF ド K=* YY THEN B=2 ELSEIF ド =*N* THEN B=1 ELSE GUTD L1:FIiFI 
*T=B0/B』 BELF1]:LUCEO。21 ]: で リマ トリ リウ スー サイス 、 や" 、BPC ま (11) 

?LS』 LHCL 2。22]3 で "ヨコ (1。.."、T、") "MX=INPUT 

: IF MX1 ロ R MXST THENBEEF[ ]:BHTH LS:FI 

"上 さ 』 LHCLS、23]』 で" タテ (1、..40) "iMY=INFUT 

* IF MY<1DR MY>40THENBEEF[ ] : BHTU し さ :FI 

?LINE[7。 1 日 。 さ 7 さ 。 102 。O。2] 

?F(1) =440』F (2) =5 ロ 1+MX※B:F ( さ ) =440 ェ F(4) = ロロ 1+MX Hs ( 王 ) =4 さ 9+MY BsF(6) = 呈 1+MY*※H: ビ 


=440』F(B) =552 


* ロ (1) =1: ロ (2)=1: ロ ( さ ) =41+MY: ロ (4) =41+MYsB (5) =B ミ ミロ (6) =BS+MX: ロ (7) =12 さ +MX : ロ (日 ) =124 
7D(1)= 1:D(2)=ー1:D( さ )= 1:D(4)=ー1:D (5) = ニー1 : D(6) =ー1:D(7)= 1:D( 昌 )=1 
* X(1)= Hi+X(2) =ーBs X( さ ) = BiX(4)=ーBs X (5) =ーBs X (6) =-B: X( フ ) = 日 :X( 日 )=BH 
*Y(1)= 1:Y(2)= 1:Y( さ )=ー1:Y(4)=ー-1:Y(5)= 1:Y(6)=ー1:Y(7)=ー1: Y (日 ) =1 
* TF MX>5O/B _ ロ R MY>SG2THEN U=4*B+1: り =4 ELSE U= フ E+1 : = フェ FT 
7ETNET0,0。MXUT4。NYV+2。5。 1』 TENTENCiPURSETC iLTNETO。 166。415。25。0。2] 
MDOx 
? LHCEO。21]: で "コマ フト "の"、BPC も (19) "(の 。 折 G。MX "TU、 半 2。MY、") 
* LOCFO。2 さ ]』?"FA] [上] 上 D] [U] [カー ツル ] [R]"。/。"[Z] [X] LM] [CLEAR] [HOME]" 
>CMD』 PL=7』K=KEYF ] 
* IF KS56 AND K>4B THEN CHL=K-4BLTNE[592, 1 ヨ 4 。 45、7。 CHL 2]s LHCE さ 5、2 さ ]: で COLiC 






URSET[ ]』 GHTU CMDiFI 


* IF KR=2B THEN Chiemi[]sGBUTH CXFL ェ FI 

*. IF KR=29 THEN Chiemi[]sGBUTU CXMIiFI 

IF K=3Q THEN Chiemi[]』GBUTH CYPFLsF1 

IF ドド = さ 1 THEN Chiemi[]iBUTO CYMIiFI 

IF K=*"S*THEN DOTSET[ ]』GBUTH CXPL』FI 

IF K=*A'THEN DOTSETE ]:GHTU CXMIiFI 

IF KRK=*X!THEN DOTQFFE]』GBOTH CXFLiF1 

IF ドド =*Z*THEN DOTOFFE ]』GOTU CXMTiFI 

IF K=?U?THEN KF=1 』CL=6sLUCE さ 5。 221s? "UP "saBHTO CMDiF エ 
IF ド =*D' THEN ド KF=OiCL=6』 LUCE さ 5。 22]』? "DOMN "BUTH CMDiFI 
* IF K=*M7THEN CL=i LHC[ さ 5。 21 ]sTF MF=OTHEN MF=1s? リ RESET "saELSE MF=OI?VSET  "s 





FT:GBOTO CMDiFrI 


* IF R=YR'THEN BHTD MAEE』FI 
* IF =12 THEN CS=OFULLE ]: TENTEN[ ]:CUX=0』CUY=O ェ CURSET[ ] BHTD CHD:FI 
* IF KK=11 THEN CS=COL:FULL[ ] : SET=4 
1=2』MHTLE IT く MXXU+ さ ュ し INET T 。1.0。MY*V。COL 、O]: エニ 1+U: MEND 
=1』MHILE J く MYXV+Ss し LINELS、J。MX*U。O。CUL 。O] =J+Vs MEND 
SET=O』CUX=0』 CUY=0』 CURSET[ ] : BHTU CMD』Fr 
IF K="+* THEN DOTSET[ ]:BDTD CMDiFI 
IF ドド =*ー" THEN DDTDFFE ]: BHTH CMD:FI 
TF KR=27 THEN END:FI 
EEEF[ ]: BDTH CMDO 


7 (* Procedur ※) 

中 国 還 ] 

*。 LINEE2。1.MXXU。MYXV。CS。2]。FOR エ =1T ロ 4』L4 さ QO[ ]s NEXT 

) IF B=2THEN SMAF'1[ ]sFUR =5TOB』L43 さ OF ]』NEXTiSMAP1F]:FTsRETURN 

* GMAP1』  DMY=MXsMX=MY 』 MY=DMY』 RETURN 

!L4 さ 0* LINE[P(T) 、(T) 。MX*X(I) 一 D(1 ) 。 (MY-1 ) *※Y(T) 。 ビ S。 8]1』RETURN 

*Chiemi』s IF ド EF=O THENIF _MF=1 THEN DHTHFFE] ELSE DOTSETF]:FIsFIsRETURN 

* TENTEN* 

*。 =1』MHTLE JSMYKV+ す Ss エニ S ェ MHTLE 1T ミ MXXU+ さ 』 FPSET[ T エ 本 ] ミエ = ニ エ + リ = MEND : ゴ ニ ゴ +V』 MEND 

* RETURN 

7EXPLs 

CURUFF[ ] 』 CUX=CUX+1 

IF CUX=MX THEN CUX=O』CUY=CEUY+1 』 1F CUY=HMY THEN CUY=OsF エ FI 

CURSET[ ]: BHTH CMD 

XN 

) CURFFE ]』 CEUX=CUX-1 

* 。 IF CUXSO_ THEN CUX=MX-1 』 CUY=EUY-1 』TF CUYSO THEN CUY=MY-1』F エ TFT 
CURSETE ]』 BHTO CHMD 

CYPLs CURUFF[ ] 』 CUY=CUY-1』TF CUYSO THEN CUY=MY-1』F1TiCURSET[ ]』 GHTH CHD 

RBYNE3 CURUFF[ ]』 CUY=CUY+1 』 ITF CUY=MY THEN CUY=OsF Ti CURSET[ ]: GUTU CMD 

7 CURSET』 CX=EUX WU+ さ ECY=CUYKV+2SaLTNEECX 。CY+ ソ ー1 。 有 U- 全 。0。EHL 。O]』 RETURN 

*CURUFF』 LINEECEX 。CY+ ソ リー1 。 ローS 0。0。01』 RETURN 

* DOTSET』 CB=CHL 』 GHT Hidemi 

*DQTOFF』 CS=QO 

)Hidemits 

LINEEEX.CY。U-2。 ソ ー8。 CS、 人 2]sFHR エ =1TO4sL6 ヨ OF ] s NEXT 

IF E=2STHEN SMAFSE]:FHR 1T=5TUBsL6BO[ ]kNEXT』 SMAPSE ]』FI』RETURN 

7 SMAFSs 。 DMY=CUX iCUX=CUY』 CUY=DNMY iRETURN 

*L680* LINELCUX※X(T)+P(T) 、CUYKY(T)+D(T) (BS) ※D(1) 。O。CS.O]』 RETURN 


> (※ ーー Make Data 一 一 ※) 
* MAEE* 


*BELE1]sLTINEEQ。 166 41 3 

EE yo イイ テテ カ で (Y/N) " ュ CEYF 』 

PTF RESETYP AND 1 さ THEN BOTU CMDO :FTkCLG[ ]』 ロ =H*※ オ 

YYumis LHCEO、S11: で "YY ワーフ No. で "SFC ま (2B) =FDR 1 エ =OT ロ BiR: T) =OsNEXTiJunko[ ]:CLSF ] 

* IF HE:Q) =13THEN FHR J=1TOUB ヨ iR:J)=1:NEXT ミ し = ロビ = BHTH Naoko ロ FI 

*L=0sFOR =O TO 1 ュ ド =HE:J) : IF ド S4 昌 THENIF F ド SB+49 THENIF R: ド ー4 日 ) =OTHEN FR: ドー4 日 
ョ 上 =L+1』FTsFTsFTsNEXT 

* 1 エ F L=Q THEN BEEPF]』GBUTU Yumi FI 

?Naakos_ EL=6s HOEE さ 。2113 で "EDB] カラ ニ モニ トド ” USEHEES。 22] ュ 5 で TEN コ ” モノ ウロ モート ” " 








5。0。2] IXO=MX s MYO= ニ MY 
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プロ グラ ム ・ リ スト 





B40 "AEinas BELE[ ]』 IF ド =* ビ THENLUCE さ 。 SS] ELSEIF ド ="M THEN LUCE さ .21] ELSE BUTO ak 
inasFTsFI 
5Q SURE[ ]』 IF 1 エ ="YPHR エ =1 さ THEN BELE1] ELSE GUTH NaoFEosFI 
60 IF ド ="C' THEN MDE=1 』 =MX※MYKHK さ ELSE MDE=S ュ イニ NXKMY*EiFT 
70 " ビ =T/16』 TF -T/16\16 ぶ OD THEN ビ = ビ +1』F エ 
BBO "Youi CL=7』LHCE さ 。S113 で "上 1] フシ ンコ" " 。SPC ま (15) LHC 上 さ 。2213 で "FEO] Basic DATA" 
B9O "TYO』 SELE[]』 IF ド =" 1 THENLHCE さ 。 SG] ELSEIF ド =" OPTHEN LHCE さ 。S1] ELSE BHTOU 1IYOi 
FtsFI 
900 "SURE[ 1』 IF 1="YYHR エ =13THEN CLS[ ] ELSE GHTH YouiFI 
?7=1sTF RY 1 THEN MACEHINE[ ] ELSEIF ド =*O THEN BASICE ]:BELE10] 』FTiFI 
FT iCL=6 
=*N' THEN BHT BEBINiF1 


















930 7 で Eontinue 全 (YZN) "』 MakoE]』TF ドド ="NY THEN END 
930 "LOC[7。S4]1: で "Game Character ? (YZN) "isMakoE ]』 TF 
940 "MX=MXOk MY=HYOICLSE]』 INITSE ]:BHTH CHDO 

9506.? 

960 " (\ Frocedur 己 ※) 

970 "Makor BELE11』REFEAT』 ド 
80 BEEE*。 CGCEG 人 20R 弘 ま 
990 "BURE』 PSPC ま (14) iLHCE6。241* 
1000 "CCLSB』 BELE11』LINEEO。 166。 
『FATRNs 

) 。 ITF_ NE4 aaND Z THEN SMAaF1[ ]』Z=0』F エ 

"XX1=F (N) 』i XS=MXKX(N) 一 D(N) +X1』 IF X1SX2 THEN DMY=X1』X1=X2』 XS2=DMYiFI 

) YimGQ(N) 』 YS=(MY-1) *※Y(N) +Y1 』 ITF YIYS THEN DMY=Y1 』Y1= ニ YS Y2=DMY』F1 

) 。 IF MDE=1 THEN FGet[ ま 1D] ELSE PBet[ ま 1B]sFTsRETURN 

1060 『 Junkos 

UOZO。" REFEAT』REFEART』 ド = ド EEY[ ]s UNTIL ド に =1 さ ロ R K* さ 1』HE: 1) = に 

1Q080 「 TIF ドド =" "THENIF TEOTHEN エ = エ ー1』FTiFRTE]sELSEIF 1I ぶ 15THEN PRTE]』 エ = ニ 1I+1』FTsF1I 
1090 "UNTIL ド =1 さ 』TF T 芯 1 THEN 1 エ = エ ー1 FT RETURN 

1100 " FRTi LHCE11+T。 選 11』 で CHR ま (R) :RETURN 

11109 " Lums 則 = ル 1/10』 DMY= ニ MM 水戸 6 キメ 1 ユーM※10 二 まさ O さ QRETURN 

1120 *" (※ ーー EasicC DaTQ 一 一 ※) 

113 さ 0 BASICs 

1140 "Seiko』 LHCEE 1 21] の リバ フス ウー メイ の 2 リ BSPE(16) s JunkgE コ 

1150 "F=1iHEs エ +1) =0』 IF HE:O) で 6 OR HE:OQ) >90THEN BEEP[]』 GUTH Seiko 』FIiBELE11 
1160 "FOR N=1 TO G 

1170 "IF RiN) =1THEN 人 = ま 46 さ 0 FATRNE ]』 HE:F ) =N+ ま さ Q』T エ =LumEMXXBH]』 ゴ =LumEMY1 

1180 "LAST=MOREE 代 。 じ 。HE 。 エ 。 ゴ ] コ ュ F エ 

1190 "IF LAST THEN Yoshie[]』EBELE6]k 人 で ! Memory ver!"』BEEF[ ]』END』FI 

1200 NEXT 

1210 * Yoghiei H=( 人 LAST) まで /。/。 リ [上 "iTF HEQOTHEN リ ー リ ョ FT エ ュ の" リ まり 。HEX 和 まま (BS(H) ) 。" ]" 
1220 "RETURN 

12 さ 0 "(*※ - Machine DaTQ 一 ※) 

1340 "MACHINE ェ 

1250 "LHCE。 2 さ ] ョ マ "16 ミ ニス タウ ルリ 上 まま] ラリ ケリ テ (0 ョ sT エ =O 

1260 Miyukis LHCEO。S11』 で "DDRESS ( ま 1000 一 ) 5 リョ QRD1=INPUT 

1270 "IF AD1 和 も 1000_ OUR aD1 和 ま 4QAFOCKLXG THEN BEEPE] ユ GUTO MiyukisFIsCLS[]』LUCEO。21 ユ 
12BO "FOR N=1 TO G 

1290 * IF RsN)=1THEN =QD1』FATRN[ ]』 DS=AD 1 キビ ※ コ ー1 』 エニ エ +1 

1300 7 PUSU IN。 リ 2 まり 4 HEX ま (AD1) 。" 一 まり 。HEX ま (ADS) sTF TSB THEN や " dc91 

1 さ 19 ! AD1=ADS+1sFTsNEXT』BELE101]s IF 1T テ 4THEN EEYE]』CLS[ ]』F1sLOCE.2 さ ] 』RETURN 

kfrt0 居 4 

1 さ 3Q "TNITs 

1 さ 40 CHONEBO』 1 1 CL=7 ョ LINEEO。16 さ 。 417。 1 4. 伺 ] 

1350 "FOR T=OTOU12 さ STEP 41』LTNE[4 さ さ 。 94.41。6。1]sLTNE[E545。 T 94。41。6。1]』NEXT 

1 さ 69 "=2SsFHR エ =1TH4』LHCEG さ 。J]』 や エー1 』 ゴ = ニ ゴ + ロ s NEXT 

1370 "JJ=2sFHR エ =1TH4』LUCE67。 で TX2  』J=J+ ロ NEXT: CS=O』 ゴ =5 

1S さ BO "SYMBHLE10.20。 "SUPER" ユ 

1390 SYMBOLE 7。1 昌 "BUFPER" ] 』 ゴ = ニ 7 ア 

1400 SYMBOLE5O。50。 "FRTTERN" ] 

1410 "SYMEOLE47。48。 "FRTTERN" ] 』 ゴ =6 

1420 SYMBHLE9O.B0。 "EDITOR"] 

1430 "SYMEOLEB7。 7 日 。 "EDITOR"]』 CHNE40.01 

1440 "INITSz MF=1』 ド F=1 

1450 * LOCE2 昌 81]』 や "MODE 一 RESET" 

146Q EGGEE2B2Giwi2APEN 一 UP" 

1470 "CL=7』 LHCE2B, 2 さ ]』 で "COLURー "。COL 

14 ヨ 0 "LINEE5S9S。 184。4 呈 。7。 COL 。 人 6] 

1490 7FUR =1TO7』C ビ L=1』LHCE さ 1+ エ 1. 24] で TINEXT 

15QO "RETURN 

届き Os ゆ 

1520 "(XPFRHCEDURES ※*) 

15 さ 0 "BEEP』 FUHEE ま FDO さ 。6 呈 RETURN 

1540 :BEL』 FOR 1B=1TOX1 ょ MAITE]:FUEE ま FDO さ 。 ま 1 』MRTITE]:FUEE ま FDO さ 。 1 NEXT』RETURN 
1550 "MAIT』 FOR MM ロコ =1TO 2QOOQOs NEXT:RETURN 

156Q "LOCI HLTE]iCFHEE QRD. さ 5。1 昌 1 2。 17。CL+ ま 0 SUEB[ ]: RETURN 

1570 "EEY: REFEAT』iM=GBETi UNTIL MEORETURN 

15BO CHN』 。 HLTE]sCFUEE RD。1.0.Z1.25.、0。25。Q。 ZS 04 SUEE ]』 RETURN 

1590 "PFBets HLTE1iCFHEE AD。 ん 1 。X1 提 。Y1 提 。X2 井 。Y 人 2 韻 。 プ 1 で 。 さ 。 人 4。 呈 。 ら 。 プ フェ SUEE ]: CNT=Q 

1600 " CODE $ 昌 61 日 持 4 。 まで 6 ら FD 欄 

1610 "EYECLg HLTE]:D=* ま FCB4』 史 エ =FEE ド ( ま FCB さ ) 1』FHR 1S=O TU MI : 人 CNT) =AD: 18) : CNT= 
CNT+1』 NEXT 

16EQO " IF FEEE: (FC 日 1 ) = ま BOTHEN FUEE FCBS。10Q0 SUEE ]』BUTU CYCLELSE FUFE FCBO。 ま 日 
Qi SUEE ]』FI 』RETURN 

1639 PLINEs HLTE]iCFUEE DS1。 75, SET。 ん 1 韻 。 ん で 井 。( メ 1 キン さ ) 韻 。( メ で ォ 4 ) 井 。 6 SUEE ] RETURN 
1640 !FSET』 HLTE]: CPUEE QD。 ま 17。 1 。 ん 1 韻 。 ZS 韻 。EDL 。 OSUB[ ]:』RETURN 







FEYE]iUNTIL ドド =*YPUHR に =" NT sa PEHR ま (ドド) :RETURN 
カ ? リュ ドニ に ド EYE ]』 RETURN 

re Yau Sure 宮 (Y/ZN) "iT=KEYE ]』 RETURN 
ュ さ さ 。 0. で] RETURN 
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RETURN 


168Q 


7 人 00 
226」 
1ZSQ? ? 
1740 “ 
山 ZBGY 9 
60. “ 
220 
1780 『" 
は Z の 0 
180O * 
が 日 お 0 る 
ポ 20 
130 『" 
1840 *" 
15Q " 
1860 『 
187Q " 
18BO " 
1890 『* 
1900 『" 
1910 " 
1920 " 
ひき 
1940 『“ 
BOY の 
1960 『" 
kP こ 2 机 
1980 “ 


1650 *HLT: 
1660 ' BUE: 
1670 "BYMBHL:』 CS=CS+1 :HLTE]CPUREE AD. ま 19.CB。O、Q。6。 さ 、Z1 提 。2G 井 。 ミ BE= メ ミュ FHR 1 エ =OTU Jー 
1:QD: 1) =OE: 1) :NEXT: SUE[ ]: RETURN 


1700 "MOREs 


CODE 
CODE 
CODE 
CODE 
CHDE 
CODE 
CODE 
CODE 
CODE 
CODE 
CUDE 
CODE 
CHDE 
CODE 
CODE 
CODE 
CODE 
CODE 
CHDE 
CODE 
CODE 
CODE 


・CODE 


CUDE 
CUDE 
CODE 
CODE 
CODE 


CODE まま RB6。 ま FD。。 ま も SBFE#FUEE ま FDO。 も CHDE ER6。 も FD 。 呈 まで RFH: RDFCBS ェ 


FOEE まま FDGQOG。 QRETURN 


ま EC 。 ま 6 、 ま ED 、 も BD 。 01 。 ま ブフ 4 。 EC じ 。 ま ら 4 。 還 ED 。 ま BD 。 01 、 呈 66。 ED 。 らら 。 呈 ED 。 * ま BD 
01 6 全 。 ED 。 ま ら 日 。 呈 ED 。 日 D 、 ま 01 , ま 66 ビビ 。 あら 6 仙 。 ま ED 。 ま BD 。 ま O1 。62。 ま EE 。 OO 
まさ 。 まさ 0 。 1 ビ 。 人 F 。 市 BD 。 ま 01 。 員 1 , BC 。 OO 。 まさ さ 。 2 ア 16。 ま 1 ロ 。 BE 。 ま OO 。 まさ さ 
10。 AE 。 仙 4 。 あら 1D 。 員 H4 。 あら 。 9 。 ビビ 。 あら 生じ さ 。 あ 00 。 あ 0 全 。 ま 10。 生日 さ 。 和 1 さ 。 92 
まま 2 。 ま 0 さ 。 CC 。 生 1 さ 。 ま BED 。 日 D , ま 01 。 ま 2D 。 まさ 4 。 和 40 。 あさ 0 。 0 で 。 ま 10。 呈 AE 。 ま BD 
01 4。 生 10。 呈 人 AF 。 日 1 、 まさ 1 。 まで 人 10。 あ 人 AF 。 ま BD まあ O1 、1 人 0。 ま CC。 4 。 ま 2O 、 ま ED 
日 1 。 ま BD 。 も 4 介 。 ま 10。 お BE 。 OO 。 まる O 、 まさ さ 。 呈 日 D 。 01 、 ま 17。 まあ E ビ 。 ま BD 。 ま O1 。 ま O さ 。 日 さ 
ま 00。 ま 01 ED も 44 、 ま ED 。 まじ B 、 ま 1E、 ま E ビ 。 まあ BD 。 ま OO 。 ま FE 、 ま ED 。 ま 4 じ 。 ま 日 D 。 まさ BR 。 ま BD 
ま 2C、 ま 10。 ま BE 。 ま 00O 12。 あ ささ 。 呈 BD 。 ま 01 。 ま 19。 ま ED。 まま BD 。 まあ OO 、F1 ED 。 中 4 じ 。 まじ 
ま BD 。 ま OO 。 ま ED 、 ED 、 $4F 、 も BD 。 まつ さま 17。 ま 00 。 まじ 。 ま BD まる 7 。 ま 6F 。 ま BO 。 ま 6F 。 ま BO 
ま BF 。 も OO 。 さあ EF 。 員 OO 。 まさ 。 HBF 、 OO 。 まさ D 。 ま 1F。 ま 10。 ま まさ. 生じ O。 ま EE 。 ま BD 。 ま 0Q 
まま PB 、 ま 人 6 。 まじ O 。 人 7 、 0 。 あら D 。 まじ 4 。 6 。 生日 。 まさ 9。 名 人 6。 あじ O 。 生日 0 。 まさ 1 まさ F 
6 。 $F 日 。 まさ 9 。 ま EE , あ BD 。 ま 0O 。 呈 昌和 ま 10 。 生 AE 。 ま BD 。 ま 0O まあ 人 人 n。 まさ 0。 ま 02 10。 人 F 
日 1 あさ 1 も 。 あさ 4 、 あ 2O 。 も DD 。 日 さ 。 も 20 。 ED 。 日 1 まじ 6 も 10。 ま 日 じ 。 ま 47。 00, 5 
ま OE。 ま 10。 ま BE 。 ま 00 。 あ 0 。 まさ さ 。 生日 D 。 OO 。 あじ 。 日 D まじ F 。 まさ 5 。 GO。 まあ 20。 捉 70。 あさ 4 
04 まさ アフ 。 も 06。 和 あさ 1 まあ 72 。 あら F 。 も 日 。 ま プ ビ 。 あ 10。 ま 日 さ 。 ま OO 。 ま OO 。 27 、 まさ 9 、 も 2 
0 。 まさ 4 。 和 02 。 日 6 。 あ 2D 。 7 。 ま 日 Q。 あさ 。 あ 0 証人 40 。 呈 0 。 日生 0Q。 6F 。 ま B じ 6 人 4 
10。 ま 仙 さ 。 人 4 。 日 07 。 生き 。 証人 4 。 あら じ 。 日 じ 。 あま 2O 。 4 。 まさ 4。 あお 0 。 負 6 。 まじ 
王 さ 、 あ 4D 。 あら 6 。 員 0 。 生 6D 。 あじ 。 ま 4 。 ま コ フ 。 あ 07 。 まま 晶 日 。 まさ 。 ま 人 7 。 生 B0。 和 6 じ 。 ま BC 。 ま 4 所 
あさ コロ 。 も 02 、 まさ 1 、 和 まつ あら D 。 まつ 1 。 らら 。 も D。 まじ BE 。 まさ 0 。 員 ビ ブ 。 日 O 。 まじ 。 ま BC 。 まさ さ 。 日 さ 
0O、 ま 01 。 まで 。 ま 1 晶 。 ま ED 、 あ BC 。 ま SH 。 まさ 。 04 。 呈 谷 まで ら 。 0 プ 。 BDD 。 ま 11 まさ 日 ま 20 
16,FF 。 も フ 9 。 日 6 。 まじ 。 人 7 。 ま O 。 まあ 20 。 あり 6 。 まさ まつ 4 。 ま 10。 呈 人 F 。 まじ 。 あ 17。 あ 6F 
BBO、 ま 人 F 。 まじ 。 ま 14 。 あ AF 。 あじ 。 ま 1 1 。 まさ 9 。 ま コア 。 ま 10。 ホ 0 さ 。 呈 日 。 ま OO。 ま 64 。 呈 OO 。 ま 0 
00。 ま OO 、 ま 00 。 ま 20。 00 。 和 00。 ま 1 さ 。 ま 日 まさ 1 。 和 00 証人 4 日 。 ま OO 。 ま 6 じ 。 ま 10。 ま OO 。 ま 00 
OO 、 00 。 あま 2 、 ま FE 。 ま OG 。 00 。 ま 00 。 あつ 9 、 まさ 介 。 ま 日 人 ある 。 生 FE 。 まで 生ま OO。 和 ま OQO 
まさ 日 1 まつ O 。 ま 49 、$E ム 。 も FE 。 まま 1 。 ま 0O 。 あ 0 。 DD 。 まる 0 も FE 。 02。 も 00。 ま 00 。 まさ 人 
日, あら O 。 あら 5 。 あら 日 、 49 。 9 。 まさり 。 日 まさ 。 日 日 。 まさ まま 日 ま 2 日 。 まる 0。 20 
7 日 , も 20 20 。 29。 4D 、 あら あら 6D 。 ま ら 6F 。 まで あ 79。 ま 2O。 あ 4F 。 ま 7 ら 。 6 昌和 ま 72。 ある 1 

















Ei ト 2 





マシ ン 語 部 アセ ンプ ブル ・ リス ト EE 









OOn01  QQQOO s ーーーーーーーーーーーーーーーーーーーーー 一 
n00O : * Make Basic Data ※* 

5 QOQ0Q 3 ドド" uhDFOu キ in ※ 
Q0Q ロ 4 QQOO ョ 涼 さ by 19LUH \ 
900 OOQ0O ミュ ニーーーーーーーーーーーーーーーーーーーーー 一 
QQ06 。 Q0QQO = 
000 フ 7 ー 69QO DRG ま 6a90 
QQOOB 69O EC62 LDD 24 5 Be ぞ ん 1 < 
O009 6892 EDBDQ174 STD AaDRES。FC 
0010 696 ECG64 LDD 4。8 ュ Bet 2 (C) 
0011 69B EDBDQ166 STD COUNT.,FC 
QQ1 全 689C EC66 LDD 6。5 ュ Bet ささ (HE) 
001 さ 。 69E EDBDO16a STD "HE。PC 
QQ14 6aa2 ECG6 LDD 8。.8 ュ Bet 4 (MX) 
O015 684 EDBDQ166 STD NX。.PC 
QQ16 6aaB ECG6 全 DD 下 よ OS s Bet ZB (MY) 
0017 6aQA EDBDO162 STD MY。PE 
QO1B 6aAE BEQOQ さ 5 LDX QOS35 ュ Bet End of Tex モ 
0019 6aB1 301E LEAX 2。X 
QOSQO 6EB さ aFBDQ151 GiX。 FE PC 
O021 6aBZ BCOO さ さ CMFX ま も 00 さ さ ュ Text exi= モ 
QQSS 6aERA 2716 EEG BL s IF No THEN BLS 

Q 6EC 108EQOQO さ さ LDY 拉 ま OO ささ s 











QQOS4 68CO 10AEA4 GL1s 必 DM saY 
OO2 ロ 6aC さ 6DBE4 St Ed 
6C5S 6F9 ENE GL1 
QOS2 フ 68C7 ECSS に DD 人 25 
OQ02SB 6aC9 C3OQQO 人 Ra 人 DDD 10 
6aCC 108 ピコ CMPD 音 501O 
6aDO SCO BBE GL さ 
6aD2 CC1 さ 8 BL2* LDD 半 5Q00 
6aD5 EDBDQ12D BL さ : IED 当 NEE 
68D9 さ 440 FSHS U 
QQ さ 4 6aDE 日 
QQ35 。 6aDE ささ QOS LEAX 2。X s Set Link PO1inter area 
OO さ 6 6aDD 1QAEBDO124 EDY EzNiP6 ュ Set Line Number 
00 さ フ 7 6aES 1O0aF 晶 1 GTY  。X+ キ 
QOSB 6aE5 さ 12 人 EEAY OSY 
0QO さ 9 6E7 1QaFBDO11 人 Aa STY し L。N。FPC 
QO40 6aEC CCB42QO LDD 持 $B42O s Set "DIM 『 
QQO41 6aEF EDB1 BID 5 
QO4S 6aF1 BD4^a BSR HENSU ョ Set "バッ スウ リ 
QQ4 さ 。 6aF さ 1Q0BEQQO2O LDY  # 邊 20 s Be も "%(  )sREBTORE ___ 
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did ロ † 全 (O) 


Bet し Last Line Number Qf Tex 








5,0O 




















| 


リス ト 2 マシ ン 語 部 アセ ンプ ブル ・ リ スト 
0O44 68F7 33BDO117 LEAU D1.FC ロ "FOUR T=O TO __sREAD 
QO45 6aFE ECBDO1Q さ LDD COUNT 。FC : Set ヒビ in Data 
OO046 6aFF B3OOO1 SUED #1 
OO47 6EBOS ED44 STD 4.U 
OO04B 6BO4 EDCB1E STD 27。U 
Q049 6BO7 ECBDOOFE LDD L.N。FC ェ s Set L.No. in Data 
OO5Q _ 6BOB ED4C GHD 2 
QQO51 6EQOD BDSE ESR TRANS 
OO52 6BOF 8BD2C BSR HENSU Be も 、 "バシ" 
005 さ 。 6E11 10BEQO12 LDY 半生 12 ュ Bet "ん (1) :NEXTsRETURN: REMNK 
た 0 
QQO54 6E15 さ 3DO1 19 LEAU D2。FPC 
O055 6B19 ECBDQOF 1 LDD MX。FC s Set MX in Data 
QQO56 6B1D ED4C BTD 12。U 
OO57 6B1F ECBDOOED LDD MY。PC ェ Bet MY in Data 
QOS5B 6B2 さ ED4F STD 155 軸 
O059 6B25 _BD23 BSR TRANS 
QO6O 6E27 17QQ0C5 LBSR FUSET 
QO61 6B2SRA _BDS7 BSR  D.SET * Bet "Oo0QO _ DATA 。。 ay。 
QO6S 6B2C 日 
0Q6 さ 。 6B2C 6FBO GLR。 。X キ x Set System Pointer 
OO64 6B2E 6FBQO BEDR 、 。X キ 
QQO65 6E さ O_BFOQO さ 5 STX ま QQ さ 5 
OO66 6B さ さ BEFQOOSBH STX ま QQSBE 
0067 6B さ 36 BEBFOO さ D STX ま QOO さ D 
OO6 6B さ 9 H 
QQO69 6E39 1F1O 由記 民 。 oi 
OO07O 6B さ SB さ 5CO FULS U.FC ュ Return モ o 選 ・Compi1er 
QQ71 6BSD 日 
O07 人 2 6B3D 日 
QO7 さ 6ESD 日 
QQO74 6BSD EEBDQOOCB HENSU: LDU HE,FC 
Q07 ロ 6E41 6CQ HLOQF: LDA  。』U+ 
0076 6B4 さ 7BO BE 朋 。 。 湊 中 
Q077 6E45 6DC4 TST  』U 
0078B 6B47 26F8 BNE HLOOF 
QQO フ 79 6E49 39 RTS 
QQBO _ 6E4 人 aa s 
OOB1 6E4 人 Q QA6CO TRANS: LDR  .U+ 
OOBS 6B4C 78O0 ST  。X+ 
QOB さ 3 6E4E さ 13F EE 人 人 Y 一 1。Y 
OOB4 6B5O_26FB BNE TRANS 
QOB5 6EB52 さ 9 RTS 
OO0B6 6B53 ロ 
Q0B7 6E5 さ s BET (1) Q TO COUNT 
OOBB 6B5 さ 5 
00B9 6E5 さ D.GET= \ 
OO09O 6E5 さ EEBDQOE さ LDU  aDRES。FC 
0091 6B57 10aEBDQOOAA DX (に aNiEB 
QOS 6EB5SC さ QQOS HEAD: LEAX 24X : Set PUINTER Rarea 
3 6B5E 1QaFB1 STY 。。X++ sLINE NH. SET 
6E61 LEAY 10.Y ュ sa し L.N=L .N+10 
QQO595 6Be6 さ - FSHS Y 
QO96 6B65 LDD まさ 2O "DaTA " SET 
QO97 6EG6B 中 キモ ギ ュ gE "5QQQ DaTA "1 ュ 
QQ78 6BG6 全 LDE 16 
Q099 6B6C_ BC47Q00 CHMFX 470Q0 s Memory ver 
010QO 6E6F 25OE BCS 人 (1) ュ IF No THEN 谷 (1) 
Q101 6E7Z1 10BEQOOQOC LDY 拉 12 
6B75 ささ 3BDQOCBH LEALU VER. FC 
Q10O さ 6B79 BDCF BSR TRANS 
0104 6BZE 352O RMESiW 
Q105 6BZD 207Q ER _ PFOSET 
Q106 6B7F さ 404 全 (1): PFSHS H 
Q107 6EB1 7Q6 FULU 全 .H s Bet 全 (1) 
0108 6BB さ さ 18C72 LERY DaTA。FC 
Q109 6EB6 6F8BC7C CLR FLAG。 FC 
O110 6BB9 1083O0009 CMPD 持 $OOOO ュ 全 (1)= ニ 9 9 
Q111 6EBD 2739 EEG _ L4 ュ IF (1T)=Q THEN L4 
Q11 人 2 6BBF SaOC EFL LOQOF' ュ IF Aa(I) 0 THEN LOOFP 
011 さ ーー 6B91 さ 4022 FSHS 人 台 
Q114 6B9 さ 3 日 62D LD 人 AA 。 揚 "ー" 
QO115G 6B95 35O02 PULS 谷 
Q116 6E7 4Q0 NEGA 
QO117 6B9B 5O NEGB 
Q11 ロ 6B99 200 BC 半 O 
Q119 6BE 6FBC66 LOOPs CELR < く TIYO。PC 
Q12O 6B9E 10Q さ Ra4 た も EMBED 4Y 
Q121 6BAa1 2509 BE] EE ュ IF (TE) で 1O0000 THEN L2 
Q122 6B 人 a さ Q さ 4 SUBD .Y 
Q12 さ 6Ba5 6C ヨ CC INC TYO.PC 
Q124 6BaAB SOF6 ER  L1 
O125 6BaR さ 40 人 2 2 FPSHS 谷 
Q126 6BaC aa6 ヨ C55 LDA ITYH。FC 
Q127 6BAF 4D TSTaA 
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力 世 ド 2 


マシ ン 語 部 アセ ンプ ブル ・ リ スト 
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09128 
0129 
Q130 
9131 
0132 
013 ミ 
01 さ 4 
0135 
0136 
01 さ 7 
0138 
0139 
Q140 
0141 
Q142 
014 さ 
0144 
01 4 
0146 
0147 
014 日 
0149 


0150・ 


0151 
015 人 2 
015 さ 
0154 
0155 
0156 
015 プ 
015 日 
0159 
0160 
0161 
016 呈 
16 さ 
Q16 人 4 
01655 
0166 
016 ア 
916 昌 
9169 
0170 
0171 
017 人 2 
017 ミ 
0174 
0175 
Q176 
Q177 
Q17 昌 
Q179 
Q180 
01 昌 1 
0182 
018 ミ 
Q184 
0185 
0186 
0187 
QO188 
01 ヨ 9 
Q190 
Q191 
0192 
019 ミ 
0194 
0195 
9196 
0197 
Q198 
0199 
Q20Q0 
Q2O1 
0SBO2 
OSO さ 
QOS2O4 


O205 
Q206 


6EBGQ 
6BB 
ら 6BE5 
6BB7 
6HB 
6BBE 
6HEE 
6BCO 
6BCS 
6BC4 
6BC6 
6BCB 
6BC 人 n 
6BCD 
6BDO 
6BDS 
6BED5 
6ED7 
6BDB 
6BD 全 
6BDC 
6BDE 
6BE 1 
6BE さ 
6BE 
6BE7 
6EE 
6BED 
ら 6BEF 
6BFS 
6BF 
6BF6 
6EF6 
6BF6 
6BF6 
6EF 昌 
6BF 合 
6EFC 
6BFE 
6COQO 
6COS 
6CQ さ 
6EQ4 
6CQ6 
6CO8 
6CO 谷 
6COC 
6COE 
6C1O 
6C10O 
6 ビ 1S 
6C14 
6 ビ 16 
6C18 
6C じ 1 人 
6C ビ 1 ビ 
6C1E 
6C2QO 
6 じ 23 
6CS4 
6E26 
6CS 日 
6 じ CS 谷 
6CSC 
6C2E 
6 ビ さ O 
6E さ 3Q 
6 ビ さ 2 
6 ビ さ 4 
6 ビ さ 6 
6C3 さ 8 
6 ビ さ 介 
6 じ さ ピ 
6CS3E 
6C4Q 
6C4S 
6C4S 


6C4E 
6C4E 


で 6 ロア 
6DBC5Q 
2709 
BB さ O 

人 7 ヨ Q 
6CBC47 
さ 502 

さ 1322 
6D21 
326D7 
CESQO 
E780 
ECBC3 さ 5 
3Q001 
7 
EDBCSD 
さら 0 人 4 
5 
60 ワ 
BD1 さ 

さ 5S2O 
16FF7BH 
B62C 

人 70 
2O98 
3524 
10QFBC19 
6FBQO 

人 FC16 
FBC1 ミ 
さ 


2710 
QOSE 昌 
QQ064 
QQ00 谷 
QO0O 
OO2O 
OO 

9O 

1388 
さ 10O 
4800 
6C10 


252 日 
FEQ2 
QQQQ 
29 さ 谷 
Ba2QO 
FEFS 
QQ0QQ 
さ a81 
2Q049 
E6FE 
010Q 
2Q0CD 
2Q0FE 
QOSOO 
0Q さ Aa 
520 


<52 晶 
4929 
さ 人 QB 
さ aBH 
さ a20 
CS 
2020 
782O0 
2029 


4D656D6F72 
792O4F76655 
7221 


し 21s 


し 4s 


し: 


RETs 


FUSET: 


Data 


ロー* 


人 T 人 sg 


COUNT 
WW 
FLAGs 
に 。Ns 
Fs 
DRES: 
HE: 
MXs 
MYs 


D1: 


ロー 
1 


END 


BNE  L21 

TST FLAG。PFC 
BEQ Lo25 

DD 持 さ O 

BTA  。X+ 

INC <FLAB。PC 
PULB Aa 

LEAY 2。.Y 
BY 

ENE LOOF 
DDH 拉 ま さ 

STB  。X+ 

LDD COUNT。FC 
SUED 1 

BE RET 

STD COUNT。FC 
FUL BE 

DECB 

BNE L5 

BSR POSET 
FULS Y 

LBRA HEAD 

LDA 2 

STA  。X+ 

ERA at) 
FULS B.Y 

BTY <L.N。FC 
CLR  』X+ 


BB 生 X) 。ESEOEG3 
STX < く PQO』PC 





RTS 

re& 

FDE 

FDE 

FDE 

FDE 109 
FDE 9 

FDE  $QOSO 
FEE GQ 

FCB 

FDE 5QOQ 
FDE まさ 100 
FDE 48Q0Q 
FDE ま $6C10 
RMB 人 

RMB 2 


FDE  $2528 


FDE  $FEQS 
FDB ま $QQQQ 
FDB ま 29 さ 人 
FDB  $Ba2Q 
FDB ま FEF2 
FDB ま $QQQQ 
FDB まさ a 日 1 
FDR ま 2049 
FDE ま E6FE 
FDB ま $010Q 
FDE ま $2QCD 
FDB ま 2OFE 
FDE ま Q200 
FDB ま $QQS3a 
FDB  $B520 
FDE 252 日 
FDE 4929 
FDE まさ BS 
FDE まさ BB 
FDB まま さ Q2O 
FDB ま $BCS2B8 
FDB まま 2020 
FDB ま 782O 


FDE ま $2O2 


FCC  /Memgry ver!/ 


IF DaTAO_ THEN LOF 


OU に 1 


Rddre=5 of HEsO) 


ん ( ) iRESTHRE __s 


FOR I=O TO __iREAD __ 


ん (1) :NEXTiRETURNs 


( 


※ 


) 











る FM-7/8 


(Na K コ ン バ パイ ラ に よる ーー 


本 語 リ ー 


ブ プロセッサ 


! 概 妥 


この プロ グラ ム は 次 の よう な 項目 を 実現 し よう と 作成 し 





事 に 5 
か 1 かま る よう 操作 を 簡単 に する . 
カモ セ モット ー ス で も 使え る よう に する . 


[3 6 的 気 に な ら な い 程 度 に 高速 化す る . 
@ 浜 字 プ リン タ を 使わ な いで ., 実用 的 な も の と する 
ロー マ 字 入力 を 可能 に する . 

を 満た す た め 上 下 左右 スク ロー ル を 可能 に し た り , ⑲ 
を 満足 する た め に プロ グラ ム 本 体 を K コ ン パ イラ で 作成 し 
た ほか ,。 サ プシ ステ ム へ 漢字 表示 や スク ロー ル ・ プ ブロ グラ 
ム を 転送 し た り し て いま す 。 埋 に つい て は MP80-II/ 中 用 


/ 
(に つた 


FT プロ グラ ム の 入力 - 


まず , リス トト 1(BASIC),。 リス ト 2 (マシ ン 語 ) を 入力 
し , それ ぞ れ "本 JWP", “JWPM" と いう ファ イル 名 で , 
テー プ 順 に セーブ し ます . 次 に リス ト 3(BASIC)、 リス ト 
4 (マン ジン 計り 記 必 2BRG0S2EIRIT PROEM と いう 
ファ イル 名 で 同様 に セー ブ し ます . 

な お ,。 この プ ブログ ラム を テー プ ・ ベ ー ス で し か 使わ な い 
場合 は リス 9 1 0 人 “ASZ=&H6FFF…" を “ASZ 














ー&H7FEE” に 変更 し で 入力 し て ぐだ さい 、。 
本 操作 方 法 一 一 
1 起動 
図 1 図 3 


GRAPH モ ー ド の キー 配置 (FM-8) 


還 TTC.T.S 





⑩ BASIC 部 分 (ファ イル 名 “JWP”) 
する . 


を ロー ド し て Run 


@ "HOT OR COLD(H/C)" と 表示 する の で , マシ ン 語 部 
分 を ロー ド す る 場合 は “C" を 入力 する 。. 
“DATA LOAD(Y/N)" と 表示 する の で , デー タ を ロー 


ド す る と き は “Y" を 入力 し 続い て ファ イル 名 を 。 で き 





な い 場 合 は “N" を 入力 し 横文字 数 (40 一 60) を 入力 す 
2| 基 本 的 な 使用 











画面 と テキ スト の 関係 は 図 1 の よう に な っ て いま す . カ 
ー ソ ル が 画面 の 外 へ 出 た ら , 画面 の 位置 が 変わ っ て カー ソ 
ル が また 画面 の 中 に 入り ます . な お | RETURN | キー の 入力 
に 関係 な く テ キス ト が 変化 する の で て くだ さき さい. 画 
面 の 説明 を 図 2 に が し ます . 
| 各 キ ー の 説明 
⑯ 英 数 字 , 英 記 号 。 カナ , カナ 記号 。 グラ フィ ッ ク な どの 

キー を 押す と , その まま 入力 され ます . グラ フィ ッ ク の 

場合 、 キー 配置 は 図 3 の と お り . た な た だし, これ は F M-8 の 

場合 で 。 F M-7 で は 若干 異な り ま す . 



























































に Me ・ キ ー( 逢 半 | を | は) で . カー ソル を 上 下 左右 へ 移 
動 し . | SHIFT | て | | SHIFT | は | で カー ソル を 左 
5 2 [ 邊 , | SHIFT | - し | で 画面 
の 左端 へ 移動 し た 後 , 上 下 へ 3 文字 ご と 移動 

図 2 
ロー マ 字 変換 | 
1 文字 目 | 
池 換 | 
"to | 訪 


表示 











(PFB) (PF7〕) (PF8) 
| (STP) (PF1)  〔PF2) (PF3) 














【PF9) (PEF0) 〔EL) 【〔(CL) (INS) (1)  〔DE エ ) 
(PF4) (PF5j (DP) (BMD (で う (3 (3 


( ESC ) し し . 控 ] e 衝 eo で (BS }) Re すこ 

〔 CAP ) 9 ド S PO を まる 交 天 の ( RETURN )}) と ak 回 

OR TI てこ の 首 ま キ 栓 {カナ )} る 4 ず マ 画 

【 SHIET )〕) | 〔 SHIFT )〕) 本 RET) 
〔 G ) (TAB) 〔 ス へ "一 ス ) 
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10 


ファ ンク ショ ン ・ キ ー と [CTRL | -|X| を 使っ て , すべ て 








の フ ャ ンク ショ ン ・ キ ー に 38 文字 まで の 文字 列 を 定義 し 
呼び が 出す こと が で きま す . 
m 定義 の し か た 


(a) 定 義 す る 文字 列 の 先頭 へ ヘ カ ー ソ ル を 移動 . 
(b) [SHIFT | -[X| を 押す . 
(cc ファ ンク ショ シ ・ キ ー の 番号 を 入力 . 
(d) | pUuP | を 押し て カー ソル を 定義 する 文字 列 の 終わ り の 
次 の 文字 位置 へ 移動 . 
(e)| pUP | 以外 の キー を 押す . 
も し 88 文字 以上 に な っ た ら プ ザー が 鳴る の で [| puP | 以 
外 の キー を 押す . 
ョ mm フ ァ ン クシ ョ ン ・ キ ー の 内 容 の 表示 
(a) | CTRL | -[X| を 押す . 
(b)| RETURN | キー を 押す . 
<) 適当 な キー を 押し , テキ スト の 表示 に する . 
m 使用 (呼び 出し ) 
文字 列 の 定義 し て ある ファ ンク ショ ン ・ キ ー を 押せ ば, 
テキ スト に 入力 され る 。. 
| INS | . イン サー ト ・ モ ー ド を ON/OFF する. ON/ 
OFF の 状 遂 は 人 有 下 の 四角 の 合 端 へ 表示 . 
⑯[pEL|. [Bs|. [EL| . [TAB| は F_BASIC と 同じ . 
@⑥ [HoME| . カ クー ソル が 画面 だ 上 上端 に あれ ば .、 カー ソル を 
テキ スト 左上 端 へ 、 そ う で な けれ ば 画商 左上 端 へ 移動 . 
@ | CLEAR (FM-7 で は [| CLS |). 確認 する の で 間違い が 
な けれ ば * 1? を 入力 し ます . 
| RETURN |. カー ソル を 次 の 行 の 先頭 へ 移動 . 
⑨ | puP | 上 上 の 行 の 文字 を 1 文字 ずつ コピ ー. 
| Esc | . 漢字 モー ド を ON/OFT す る . 状態 は 右 下 の 中 
角 の 右 か ら 2 番 め に 表示 . 
⑩[ CTRL | -[B| ロー マモ ー ド を ON/OFF する , 状態 は 
各 下 の 四角 の 左端 へ 表示 . 
⑯[ CTRL |-[NI. ひら が な モー ド / カ タカ ナ ・ モ ー ド を 選択 す 
る . 状態 は 左 か ら 2 番 め に 表示 . 

























































































⑯[ CTRL |-[A|, [CTRL| DI カー ソル 位置 の 文字 コー ド を 
(人: グ Us が トク グリ メジ トレ し まき 

< 例 > 
CTRL | AI の と き “ ひ " は “ び " に な る . 
CTRL | -ID| の と き “ つ " は “っ " に な る 

















⑯| CTRL | [| CTRL | -IQL [の と き 1 行 イン サー ト , [Q 











介 [ CTRL IT カー ソル か ら 全 の 文字 列 を 次 の 行 へ 連結 す 

る . 連結 し て 1 行 に 納 ま ら な いと き は ブザー が 鳴っ て カ 

ー ソ ル が 次 の 行 の 中 途 に 現われ る の で , ここ で も う 一 度 

CTRL | て エ を 押す と 連結 で きる 長き に な る . 

⑯L CTRL |V| カー ソル の ある 行 を セン タリ ング . 

⑯| CTRL | IW. カー ソル の ある 行 の 文字 の 種類 (形状 ) 指 

定 (0 一 4 の 数 を 入力 )、 

@⑯| CTRL IPI プリ ント , タブ 信 止 位置 セッ ト , コー ド 入 
カ , 漢字 入力 方 法 の 指定 の と き 使 用 プリ ント で は 文字 
と 文字 の 間 の 空白, 紙 送 量 (いずれ も ドッ ト 単 位 )。 縦 書 

きか 横 壮 きか を 入力 し ます . 省略 ( RETURN | キー だ け 抑 

す ) し た 場合 は GAP=0, FEED=12、 横書き と 指 

Eb2SE ES り 7) ます 

CTRL | CI ブフ ログラム 終了. 


9】 
4 漢字 の 入力 

⑯ | Esc | で 漢字 モー ド に する . 

@ 音 読み で カナ 2 文字 を 入力 する (1 文字 め を 入力 し た と 





四 ] 
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の と き 1 行 デ リー ト . 動作 で き な い と き は プ ブザー が 鳴る . 


き 圧 下 の 四角 の 中 に 入力 し た カナ が 表示 され る ). 

@ 和 同じ 読み の 漢字 が 複数 ある と き は , 画面 下部 に 表示 され 
た 中 か ら 條 し | は | で 選択 し て | RETURN キー で 入力 する 
(な か っ た 場合 は スペ ー ス ・ キ ー を 押す ). 

た だ し , [CTRL|- 四 で 漢字 の 入力 方 法 を TYPE2 に 指定 

し て いる と @ の 部 分 は 次 の よう に な る . 

@⑥[| SPAcE | キー. で 選択 し [RETURN | キー で 入力 
し ます . (な けれ ば に 団 を 押す )、. 

も し, カナ 1 廊 字 め を 誤っ て 入力 し た 場合 な ど は [SC | 

を 一 度 押 し て 漢字 モー ド を 一 度 OFF に し て 入力 し 直し て く 

だ さい . 
グー が の に 2 ご 緒 パン ら G01 1 

ぞ れ 記号 入力 , ギ リシア 文字 ロシア 文字 入力 が で きま す . 

回 ロー マ 字 の 入力 

⑩ [CTRL |-GI で ロー マモ ー ド を ON に する . 

@ 日 本 式 綴り で 入力 し ます (1 文字 め を 入力 し た と き 左 下 の 
四角 の 中 に 入力 し た 文字 が 表示 ). 
この ルー チン で は 日 本 式 か つ カ ナ 1 文字 に 対応 する も の 

し か 入力 で き な か い ぃ い 。- だ だ し だ ちば ー を な ど は 1- 交 字 と し 

て 扱う の で 入力 で でき ます. また , 母音 また は “N"( ん ) また 

は 』 CTRL | IGG が 入力 され る まで 入力 待ち を 続け る の で , 坪 

守 と その 一 文字 が 正しけれ ば , 何 度 キ ーー を 押し て も よい し 

A"=“ あ "。 "1" ニー“ い " と 対応 する の で 1 文字 め の 入 力 

を 誤っ た 場合 で も 簡単 に 訂正 で きま す . 
漢字 入力 と 組み 合わ せれ ば , アル ファ ベッ ト 4 文字 一 漢 

字 変 換 に な り ま す . 


団 字 する 文字 の 
[_IV 大 きき 方 向 の 指定 


3W の | CTRL | -W で 入力 し た 数 は 印字 する と き の 文 
字 の 大 き さ 層 方向 の 指定 に な る . 
























































0 … 標 準 . 

1 … 縦 横 反 転 . これ を 指定 し た 行 は | CTRL | -IPI の 0 で 横 
書き を 指定 すれ ば 縦 に , 縦 に 指定 すれ ば 横 に 印字 する . 

2 … 紙 送り 方 向 拡大 . 

3…1 と 2 を 同時 に 指定 し た 状態 . 

4 … 倍 角度 指定 . その 行 の 文字 を 倍角 に する . 


ーーV 特殊 記号 一 一 
⑯ 倍 名 記号 … 中 7 

この 記号 に 続く 1 廊 字 を 倍角 . 
@ 改 行 記号 … “ ま " 

この 記号 が ある 行 で は この 記号 の 数 だ け 余 計 に 改行 する . 
@ 改 行 禁 止 記号 … “ 合 " 

この 記号 の ある 行 で は , 改行 . 
@ 改 項 記 号 … を を" 

この 記号 が ある と 改 項 この 記号 の ある 行 は 印字 し な い の 
で 注意 /. 
* の 記号 が 2 つ 以 上 続く と "ERR DATA" に な り ま す . 
*@⑳, の 記号 は 廊 字 列 の 後 端 に し か 置け ず , これ 以外 の 場 
合 の 動作 は 保障 し て いま せん . 
* こ れ ら の 記号 は , 普 通 の 文字 同様 に エディ ッ ト で きま す . 
入力 に は |I@RAPH| -|Z」 [5| [8 9] を 使用 . 
* こ れ ら の 記号 を 印字 する と き は , それ の コー ド に $80 を 
加え だ た も の を コー ド 入 力 を 使っ て 入力 . 

応用 と し て “ 信 ”" を 利用 する と , 疑似 アン ダー ライ ン , 



































出力 例 ( 原 寸 ) 


&O 





1、 概要. 


e、 ロー マ 字 入力 を 可能 と する 。 


の プリ ンタ で も 使用 で きま す 。 


この プロ グラ ム は 、 次 の よう な 項目 を 実現 し ょ うと 作成 し まし た 。 


a. 誰 に で も 使用 で きる よう 、 操 作 を 簡単 に する 。 

b、 カ セッ ト ベ ー ス で も 使用 で きる よう に する 。 

c. 待ち 時 間 が 気 に な ら な いく らい まで 高速 化す る 。 

d. プリ ント は 漢字 プリ ンタ を 使用 し な いで 、 実 用 に 耐え 得る も の と する 。 


a 和 を 満た す た め 上 下 ・ 左 右 ス クロ ー ル を 可能 に し た り 、c を 満足 する た め に プロ グラ ム 
本 体 を 氏 で 作成 し た 他 、 サ ブシ テム に 党 字 表示 や 、 ス クロ ー ル プロ グラ ム を 転送 し た り し 
て いま す 。d に つい て は MP 一 80TYP2 用 に な っ て いま す の で 、LP じゃ エッ ファ ア 
ドレ ス , 文字 間 空 白 ド ッ ト 数 <256+ 出力 文字 数 , 字 の 種類 々 256〕 の 引数 で プリ ン 
ト す る サブ ルー チン を 、$4 150 か ら の 0. 5K へ プリ ンタ に 合わ せ て 作成 すれ ば 、 他 





図 4 メモ リ ・ マ ッ プ 


図 6 清書 プロ グラ ム メ モリ ・ マ ッ プ 

















BADR 
BADR 十 1 





空き (1) 
横文字 数 (1) 











BASIC 























に DR テキ スト 現在 使用 
$1450 K オ プ ジ ェ クト 1 業 特 の セレス 
K ( $29BO) (2) 
$3E00 KK カナ ー 漢 字 BADR 二 4 文字 数 (1 
変換 ($884) BADR+5 空き (1) 





BADR+6 


BADR 十 16 













BADR 十 796 







BADR 十 916 







BADR 二 916 
填 10 十 SN 










ワー ク の 内 容 
INT サ ププ ログ 
ラム 転送 | は と 出る 。 
($14F) 
(カッ コ 内 は バイ ト 数 ) 








| BASIC 、 
エリ ア 、 
K ラ ンタ イム ルー チン 























ラ の ラン タイ ム 


異な る 字 種 の 混合 な ど が で きる . 


し VI プロ グラ ム に つい て 回 


この プロ グラ ム の 主要 部 分 は K コ ン パ イラ で 記述 され て 


更 を 加え て ある の で , 
98 に ACG で SS さ Ma。 


いま す 。 参考 まで に ソー ス ・ リ ス 
ト (一 部 ) を リス ト 5 に 示し て お 
き ポ | すす が 。 この ソー ズー・ ジ アロ ジラ 
ム は FM-8 の カセ モッ ト ベ ー ス KK コ 
ン バ パパ イラ ・ フ ァイル 版 以外 で は コ 
ン パ イル で き な い の で 注意 し て く 
だ さい . また だ た, $ 4 D00 番 地 か ら 
$ 4FFF 番 地 ま で の KK コン パイ 


・ ル ー チ ン は 発表 きれ て いる も の に 一 部 変 
リス ト に 掲載 され て いる も の を 使う 
それ か ら 図 4 と 図 5 に メモ リ ・ マ ッ 
プ と デー タ ・ フ ァイル の フォ ー マ ッ ト を 示し て お きま す . 
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1O 


に VI 清書 プロ グラ ムー 








1 使用 方 法 


⑩ BASIC 部 分 (ファ イル 名 ~PRT") を ロー ド し て RUN 























この フロ グラ ム は 本 ワー ド ・ プ ブロ モッ サ で 作成 し た 複数 1 に ま 
の チキ スト ・ ヲ ァイル を 連続 し て 印字 する と き に 使う も の @ マ シン 語 部 分 を ロー ド す る 必要 の な いと き は “H" を , 
も 図 5 テー プ の フォ ー マ ッ ト 必要 の ある と き は “C" を 入力 し ます . 
1 テキ スト ・ フ ァイル の 個数 を 入力 . 
⑳ テ キス ト ・ フ ァイル の 名 前 を 続々 と 入力 の これ だ け で す . 
リス ト 1 日 本 語 ワ ー プ ロ BASIC プ ロ グラ /、 EE 
1000 CLEAR SO。H144F: DEFINT ZEDIM (GO) :MIDTH 0。 で: CHNSDLE 2 人 4 。 1 : EDR=SH5OaQ7 
1Q10O LINE INFUT"HOT ロ R CHLD (H/ ビ ) "』TN 生 : TF TN ま ="h" UR TIN まま ="H" THEN 10 さ Q 
FRTINT "program 1oading"s:LHRDM"JMP MM":TF FEEE (&zHFEFA ) =XHFS THEN 102 





1050 
1060 
107O0 
108O 
109O 
1100 
1110 
1120 
1130 
1140 
115Q 
1169 
1170 
118O 
1190 
1200 





FOEE HH5170。&H1FEFDREE HE17E 。%H1F 
FRINT:EXEC EADR 

FOREE&H4ERF 。 BADR ギ 2 王 6: FEE&H4EEBO BADR MOD 256 
FOR エ =1 TO 1O:FEEY 1.CHR ま (SH1 昌 ) +CHR 和 も (1) :NEXT 
LINE INFUT"DRTA LURD (YZN) " N 生 : TF IN まま = リッ 








HR ITN ま ="Y! THEN 10 ヨ O 





TNPUT "ヨコ (40。..60) "isEMsIF 0 OR EME6O THEN 106Q_ ELSE GOSUE 122O 
ドーTEXTー ュ エニ EIDR+ 選 ヒー0I GHSUE 1210:BUTO 109Q0 

LINE INPUT"FILE NAME = "』:TIN$:FRINT"data 1oading"*:BUSUE 1160 

FOEE ERDR+1。EM:EXEC &H145O: CHNSHLE 0、2:LINE INPUT"SAVE (Y/ZN) "』TN ま 





TIF IN ま = リ Y リ HR IN も ="y! THEN LINE INFUT"FILE NAME "saTN 和 まま ELSE END 
OFEN" ロ "4。 折 1。 TIN 第 =FRTNT 提 1 。EM: ドーFEE ド (ADR+) * つ 王 6+FEE ド (BADR+ さ ) : エニ TEXT: ゴ = ロ 
MHILE 1 モビ に: ビーロ 

FOR 上 =Q TO EN-1: ロ (L ) =FEEE (エキ し +L ) ※ 品 6+FEE ド (エキ し + し +1 ) = TF ロ (L) 
NEXT:FRTINT 六 1 。FEEE (BU1 +J ) : ゴ = ニ ゴ +1 

FUHR 上 L=Q TH EsFRINT#1. ロ (L):NEXT:FRTNT 后 1 一 1 : エ =IT+EMNG: MEND END 
FEN"T!。 提 1。 IN 和 ま : INFUT 半 1 EM: GHSUE1 SO 1 エ =TEXT: =O 

MHILE_NOT(EOF (1 ) ) :L=0: INFUT1 ドド :PHREE BU1+J。 FE= ゴ = ゴナ 1 
TINFUT#1。 ド : IF ドド = テー1 THEN ド = ニ 0 ELSE GUSUB 121Q= し = し +1: GTO 118 ヨ 0 
FOR L TH _EM-1: BUSUE 1210zNEXT: エニ 1T+ENM 

MEND: ー1: 1= ニ BADR+2 ュ し =0: GHSUE 1210: CLOSE : RETURN 

FORIE (エキ オト ) 。 記 学 2 王 6s FORE (エキ 上 + オ し +1 ) 。 ド MDD 256: RETURN 
RU1=RADR+916s SGZ=&zH6FFF 一 BU1 : EM コ =EMX2』 SN=QSZ\EM2ー10 

IF (ASZ MOD EMS) SN+10 THEN SN=SN-1 

FOURE EDR+4。SNs TEXT=BU1+SN+10:FHR ドド =RBU1 TO BU1+SN+9』PUKE K。O:NEXT: RETURN 





'O THEN E= し 

















E 還 スト 2 日 本 語 ワ ー プ ロダ ンプ ・ 



























Sum 
















+O +1 +2 + オ さ + 人 4 + 品 +6 + プ + 日 +9 +Q +B + ビ +D +E ォ F 16BO DC 24 0 ミ DD oO DD 

3 き 4 7F C6 4C 1F 9B CE 4C OO CC OO 0Q7 DD oo CC QQ 155 16CO 24 Q1 DD QO 16 

1B DD 02 CC 00 26 DD 04 CC 0QO 27 DD 06 CC 22 2C siBD 16DO Q1 EE ビビ CC 00 

DD OB CC 22 2 DD Oa CC 22 2B DD QC 4F F6 4B aF z25 16EQ Q6 さき 6 06 34 0@ 

さ 36 06 CC O1 00 BD 4D 1F さ 6 06 4F F6 4 BO E さ C1 :52 16FGO さき 4 19 10 34 

DD QE DC OE CS QOS 1C DD 10 DC OE CS 03 94 DD 12 :DZ ーー ピー ー に つ セ ーー ニー 
DC _OE C3 QO 04 1F Oo1 4F E6 4 DD 14 DC OE DS 14 :4C Sum: 9E 9 Eo a5 9 EE :EG 
C3 O3 9E DD 16 DC OE C ミ OO 06 DD 18 DC OE C3 OO :aC 

10 DD 1 DC OE CS さ QQO O1 1F QO1 4F E6 B4 DD 1C~DC dd BE も Sum 


は mg 湊 








1700 











・ 0 こ ・ um > 
DC 42 16 OO 16 DC 42 5 日 49 9E 16 30 BB 36 10 CC szBa 
QO OO ED D1 DC 42 C さ OO 0O1 DD 42 Q さ C4 2F E6 さ う =:6E Rdd TE +C ビ +D +E 
42 17 1D 1B 17 26 Ea BD 4D D6 DD 46 17 26 E2 DC :B6 18QQ 3 OO 14 10 26 
00 0 CO 96 CC OO GQ ウ 
DD SB DC 2S 





96 
5Q 


4 
0O 
DC < 
由 之 
24 3 





( 届 に CC 
96 
10 
DC 





721 
10 
OO 
O1 


=。 ちら 


QQ 


1O 
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1E3Q EC BE さ 4 Q6 
1E40 66 DC 44 C ミ 
1E5SO C さ OO Q1 DD 
1E6O 4F 4B 20 3F 


き 4 
























1EZO DD 46 DC 46 59 
1EBO DC 5O ヨミ QO 5o 
1E9O CC 51 DD BE 
1EAO 16 OO 22 DC 4D 
1EBO O1 9E 1 58 1 ア 
1ECO CS OO O1 DD 42 





1EDO 
1EEO 
1EFO 2 


26 OO CO 


Sums 


add  +O + す 1 +2 +3 +4 4 呈 
1FOO 83 OO Q1 10 26 00 
1F10 CC QO 09 36 06 CC 













1F2O 10 37 10 34 10 さ 
+2 + さ 4 + 品 せら 6 +Z + ヨ +9 + 人 +B + ヒ +D +E +F Gum 1F さ 0 DC 44 16 QO 16 
BBH 34 06 17 1B FC 32 62 DC 4 93 1C DD 52 sCO 1F40 CC OO OO ED D1 DC 
93 1C 93.1C DS 4G C さ . OO 02 36.06. DC 2.16 szEB 1F5SO 3 さ 3 42 CC OO OO DD DC 
5 1F6O 16 OO 14 DC 4 9E C 
90 1FZO DC 44 CS oO Q1 DD 
1F8O DD 26 CC OO OO _ DD 


1F?O 24 17 1 さ 5B DC 46 
1FAO 06 CC OO OO BRD 4D 
1FBO_BD 4D 9 an CO _EA 
1FCO DE 22 36 906 DC SB4 
1FDO 2 さ 4 Q6 さ Z 
1FEO 1 ミ aE 32 68 
1FFO 17 16 11 











1ACO 4 D ミ Fi00。 00 は 所 BR DO、 2 は 1 | ニニ ニー ニュー テーー ミ ニー ニニ ニーー 
1QDO OH CC FF FF DD 26 17 16 2F 16 OO 06 DC 22 D さ SE saF Sumi 6C DF 2F 11 
E BB 36 :41 
5 OO 17 :2B Add TO +1 オラ キス +4 + 曲 キ ら 6 





2000 00 12 CC OO0 OO DD 2 
2010 AD 17 QC ED DC 46 5 
2020 06 CC O )O BD 4D B9 
2030 BD 4D B9 4 CO E4 CO 
CC 0 OO DD 26 17 12 
2050 CC oO DD 24 DC 46 
2060 5 人 36 さ 4 06 17 0C 5 
207O0 12 10 26.00 12 17 19 69 DC 3B8 34 06 
2080 62 DD 3 DC 3 DD 3 DC 46 83 OO _ 19 
2090 BD 4D OB 5O 52 49 4E 54 3D さ QO 20 20 
20QO aF C4 3D 32 20 20 BQ EBO C4 DE 3D 34 
20BO BC DE D3 BO C4 DE 3D 38 20 20 Qoo BD 
20CO DC 46 日 3 OO QB 10 26 OO 32 BD 4D QE 
20D0 20 さ 1 20 3D 20 31 20 20 20 54 59 50 
20EQ 3D 20 32 20 00 BD 4D E2 DD 42 DC 42 
20FO 26 OO OB CC FF FF DD 30O 16 QO_ 05 CC 

















dd +O 1 + ユ 2 + ミ 4 +55 + ら 6 + フ + 日 + す 9 +a +H +C +D +E +F Sum 
210O DC 46 ヨミ OO 04 10 26 OO 19 BD 4D OH 43 4F 44 45 :2B 
2110 20 3D 20 00 BED 4D E2 
2120 32 62 DC 46 8B3 00 02 
2130 42 20 3D 20 OO BD 4D 
2140 2C OO 05 CC OO Q2 DD 
2150 05 CC OO 32 DD 42 DC 
2160 26 03 3 BD 4D OBE 4Z 
2170 DD 56 DC 56 36 06 CC 








21 ヨ 0 さ 6 06 CC OO 00 BD 4D 
1C5O 16 FF 06 DC 50 DD 22 DC さ DD 3 16 QO 40 DC 24 :C フ 2190 CC OO O4 DD 56 BD 4D OB 46 45 45 44 20 3D 20 00 g9 
1C60 D3 2 9E 12 E6 BB 4F 3 OO OO 10 27 QO 09 DC 24 s:2E 21Q0 BD 4D E2 DD 5 DC 5 36 06 CC OO 3C BD 4D 9 36 : 昌 人 
1C70 34 06 17 1E 02 2 62 DC 24 D さ 2 9E 12 3O BE 36 sa1 21BO 06 DC 5 36 06 CC OO Q1 BD 4D Aa1 aaQ CO ER CO 10 :12 


1CBO 10 DC 4 EZ D1 DC 24 D3 2 9E 12 E6 BB 4F 日 ミ 09 sDC 321CO 27 0O 05 CC OO QC DD 58 BD 4D OB CO CS 20 3D 2O zi4E 
1C9O OO 1O 27 OO 09 DC 24 34 06 17 1D DB 32 62 DC 46 s: さ SF 21DO さ 1 20 20 D6 Ba 20 3D 
1CQO 日 3 00 1 日 10 26 O1 CH BD 4D OB 46 5 4E 43 54 49 =:7B 21EO 5Q DC 5a 3 OO 01 10 
1CEO 4F 4E 20 4B 45 59 20 4E 55 4D 42 45 52 20 3D 20 szQ0C 21FO 00 QO DD 48B CC QO 09QO 








1CDO 36 06 DC 46 36 06 CC OO OO ED 4D 9 a4 CO E4 CO gz21 Sumi 1B 55 6 D4 EE 3F F3 90 BQO 4 F7 QE 7E D4 Do s1C 


1CFO 17 OF CB DC 46 3 OO 11 10 26 QQ0 52 DC Q4 36 06 =4 昌 dd +O オキ 1 オラ コ オミ オォ オ 4 4 王 
っ 220O OO DD SO CC OO 00 
Sum: Q5 14 HB4 4 さ 6 さ 4 2 aZ D5 64 BZ CD Q1 46 8B2 1C sz26 2210 42 16 OO 7 CC OO 

ー さ 6 06 CC OO OO さ 34 







































Add 10 34 10 17 11 5 フ 
1Doo 1C 83 OO O1 36 06 
1D1o 16 58 49 EC BE DD 
1D2O DC 42 DD 48 DC 4E 
1D30O OO OB CC FF FF DD 
1D4O 900 05 CC 99 oO0 DD 
1D5O 2F B9 33 42 
1D6O 7 さ さき . 4 る EC 
1D7O 1C BD 4D 1F 
1DBo BD 4D 3B DD 
1D9O OO DD SC CC 
1DaOo 42 16 oo 16 
1DEO OO ED D1 DC 
1DCO = 日 B ーー ネー ニー ムー ムー ニッ ニニ 








1DDO OO _ OO 36 06 DC 42 
1DEO 12 36 06 DC 52 C3 
1DFO 10 34 10 3Z 10 34 +1 + キス + 人 4 + 曲 6 + プ + +9 +a +B +C +TD +E +F Sum 
0 2300 DC 52 10 27 oO 1D 
Sumi BE 74 49 DB 4 09 2 52 20 44 41 昌 4 

32320 16 oO1 C ミ CC OO OO 
+F Sum 2 さ 3O AD CC oo Oo DD 4 


D 14 26 75 1 


Add 。 +O {1 キ 2 すさ 4 +5 +6 
1EOO CC OoQ O1 DD 44 DC 54 









44 :FO 2 さ 40 CC OO oo Oo6 DC 42 B 
1E10 16 OO 35 DC 44 36 06 4 :65 っ 35O oO 4 06 10 34 10 3Z 10 34 10 ミコ フ ュ F つ 
1E20 36 O6 DC 54 ED 4D 1F D ミ 3 1 5B 49 :B ウ つ さ 60 10 2B ミコ 68 DD 54 CC OO _ ロ oO DD 44 DC : ら 6F 
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DC 44 
4E DC 


16 0O 





26 0O 
人 4 






3 CC 


dd +O +1 
82400 OO _Q1 
2410 DS 4 
242O 4D E ウ 














E4 CO 


OO DD 
5C DS 
16 5 日 
2F DD 
4D 1F 
4D 1F 
ら 66 CC 





5 さ 4 
C4 2F 
FE 4D 





CC QO 
4D Aa1 
253O 5 BD 4D 9 
2540 a4 CO E4 CO 
2550 CC O1 OO BD 
2560 10 a2 32 62 





SS5aO 
SS5EO 
25CO 
25DQ 
2S5EO 
25FO 





人 dd 
2600 
So10 





20 DC 46 
8 EO _BD 
EC 91 
96 17 
Q0 QQO 
Sa ED 
DC 3C 
11 CC 
DD SO 
oOa 10 
O1 36 
10 34 
44 9 さ 
1D DC 


S650 
2660 
2670 
2680 
S6O 
2660 
26BO 
26CO 
26DO 
26EO 
S6FO 


16 OO 
00 01 
3 oOO 
CC QQO 
10 3Z 
42 DC 
16 OO 


27 QO : 





16 


905 


+4 
16 
Q1 
DC 
00 
QO 
SO 
5o 


900 
06 


人 
19 
20 
人 4 
36 
121 
4D 
DC 
CC 
CC 
4D 
さら 5 
06 


97 


GOC 


DC 
8 
EC 
42 
4 谷 
06 
O1 


00 


CO 


っ っ 


06 











34 


CO 


さら) 


OO 


26 
DD 
61 
DD 
6 り 



















9E 
3 人 
00 
00 
4 人生 
DD 
60 
47 
90O 


16 
DC 
98 
0 

16 
44 
DC 


5 
4E 
CC 
CC 
00 0Z 
3 C4 
Ra 3 
56 5 
QA DC 


49 


= ち O 
全 さ 
SD 
s 2D 
s5C 
sEG 
s 7F 





90Q 
FF 





1 避 
DC 
SF 
[97e】 








+C 
DD 


+D 
42 
06 
06 
ED 


(EE 
46 
OO 
QO 
人 1 
06 
1 フ 
06 
りら 
06 
27 s02 
48 
QO BB2 
人 1 
に と / 
QA 














00_ 07 





う OO _ 91 


3 C4 2 

CC OO _ 07 BD 
C3 OO 01 36 
34 10 37 10 
BC DC 5C DD 
52 16 00 20 
10 DC 52 93 
FE4EE DR 人 
D ミ 3 1C 3 90O 
9E 16 30 BB 
DD 52 


さら 6 





さら 6 


3 


DC 


CO 
CC 
19 


10 


96 
4 ビ 


OE 


52 





+8 
19 
QO 
OO 
46 


ERA 
90 


DC 
16 


OO 

















+B + 選 +D TE + ビ 
OO ED D1 DC 4 
52 a さ 2F CH 
24 CC DD 
OF 10 る 1 
96 
27 00 QQ0 
Q96 DC 06 :BE 
17 
OO 
4D 1F 
DC 22 


























+F 
に さ 
OO 
49 
01 
17 
4E 
24 
さ ク 
42 
E 
DD 
さき 62 
59 
46 CZ 
QO 3D 


DD 852 
30 
oO 
OO さ 4 
03 
00 
D1 
日 ミ 
20 さ D 2O 


O1 








dd  +O +1 オ 2 +9 +Q +B +C +D +E +F Gum 
2a00 さ 6 06 DC さ 6 Q6 DC 24 36 06 CC 17 
SR10 00 00 34 10 34 10 17 09 96 32 3 日 
202O0 66 DC 54 C4 2F DB さ 3 42 DC 46 39 さ 
2A3O 34 06 17 10 27 0O 14 DC 64 36 sB 昌 
2A40 06 DC 66 OO O3 17 QR 34 16 0O si01 
2a50 さ 9 DC 64 EQ CO 10 27 00 2B DC si49 
260 46 36 06 さら 6 O6 CC OO 02 36 06 BE 
27O DC 68 BD CS OO O1 さ 4 06 BD 4 zea 
2aBO 日 さ 32 62 62 DC 46 さ 6 06 CC OO saD 
209O BO BD 4D 06 CC OO DE BD 4D A1 :52 
2RO 4 CO E4 O6 CC OO 6 BD 4D B9 iDZ 
2BO an CO EA FF FF DD 6 16 0OO 05 7F 
2ACO CC OO OO 00 3 DC 6 36 06 DC siFO 
2DO 46 36 06 さき 6 O6 DC 2C Aa4 CO E4 szBD 
2AEO CO AA CO 17 Q2 OB 16 00 13 DC 3 
2QFO 46 日 3 OO QO_ OO 34 06 17 OE 04 55 
Sum: EQ 10 4H H7 OE D5 BED 20 5 3 zeD 
Rdd  +Q 1 +2 + さ +4 + 王 +6 + プ + 日 49 + 人 8 + 日 +C +D +E +F Sum 
2BOO 32 62 16 QO 20 DC 6 10 27 OO 1 DC 46 36 06 CC BB 











2E60 DC 3 DD 3 DC 46 00 1B 10 26 00 53 17 97 s30 
2B7O DC さ 2 34 06 17 01 69 32 62 DD 32 CC OO さ B 36 06 si 人 AF 
2BBO_ CC OO B6 36 06 CC 00 43 36 06 CC OO EE さ 36 06 CC si9B 
2BO_QQO QO1 36 06 CC QO Q7 36 06 CC OO OS2 34 06 37 10 si9B 
2BAO さ 4 10 37 10 34 10 37 10 34 10 37 10 34 10 37 10 s2C 
2BBO 34 10 37 10 34 10 17 11 を 4 32 6E CC QO 00 DD 2C si5O 
2BEO DC 46 93 OO 10 26 OO OE 17 OD Ca DC 34 ミ 4 06 17 s48 
2BDO O1 OE 32 62 DD 34 DC 46 3 OO _Q3 10 26 Q0 29 BD s78 
2BEO 4D OB 5 75 72 65 さ F 20 2 さ 1 29 20 OO BD 4D E2 :sE4 
2BFO DD 46 DC 46 3 OO 26 OO QB CC OO0 03 DD 46 =:F5 
Sum: 1 BE さ 3E BD 4Q0 32 1C 6F OD 55 6 EZ DB E3 6E 3D :F ミ 
Rdd  +O +1 +2 + さ +4 + +6 + プ + 日 +9 + 人 Q +B +C +D +E +F um 
2COO 16 OO OS CC OO _QO DD 46 DC 46 3 OO Q3 10 26 E9 siD1 
2C10 CS CC OO QO DD 48 CC QO QQO DD 42 DC 3C さ 36 06 CC siEF 
2C2O OO0_ 09 36 06 CC QO QO1 36 06 DC 14 34 06 

2C3O 10 3Z7 10 34 10 37 10 34 10 17 07 1 32 

2C40 DC 42 16 00 1C DC 42 9E 16 5 49 EC BB 

2C5O 10 27 00 06 DC 42 5 49 DD 4 DC 42 CS 

2C60 42 3 C4 きら 6 

2CZ7O D さ 16 1F さら 6 

2CBO D3 16 4F CC 

2C90 4D 1F C さ EC 

2CQO CC O1 Q0O 4BE 

2CBO CC OO Oa < OBE 

2CCO 97 BD 4D QO 

2CDO さ 9 DC 26 1 フ 

2CEQO.EC 62 8 ミ DD Q 

2CFO 05 CC Q0O 10 26 OO OF si17 








dd 

32DOO 
=D1O 
SD2O 
2D3O 
2D40 
2D5O 
2D6O 
2D7O 
2DBO 
2D9O 
2DaO 

2DBQO 
=2DCO 
2DDO 
2DEQO 


Q6 
0O 
DC 
QO 
さら 
10 
3Z 
DD 
46 さら 6 
DC 
ヨミ 
日 さ 
44 


12ik1 
10 
46 
OO 
GO 
109 
DD 
8B ミ 





ER 





97 
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1O 


リス ト 2 








2E OO OO 01 








dd す O 1 + つ + ス +4 + すら 6 + プ + 日 + + 合 +B +C +D + ピ ォ F Sum 

























= ささ OO 4 ロ 42 つ さ 36 Q6 DC 26 = アラ 

06 DC 2B 34 06 37 10 34 10 37 10 34 30 1 の O さ sD 紀 

10 3 2 日 9E 12 E6 BB 95 

QAdd  +O +1 + オ 2 + く る 4 + 王 二 6 + キ プ + せ 日 キマ 4F 3 OO OO 10 27 QO 09 DC 42 34 Q6 17 oO7 38 本 記 


62 
44 


DC 44 16 OO 28 DC :DD 
44 9E 16 8B 49 EC 36 


2EOO DD 44 CC OO 0Q1 DD 54 CC QO_ 0Z 
2E10 06 17 O2 BF 32 62 DD 44 16 FF 





SE2O FF DD 4 DC 52 DD 5O CC QO 1F BE : 10 17 QQO_ 47 32 66 sD1 
2E30 06 CC OO B4 36 906 CC 0O2 7F 36 DC D4 ささ 42.DC 42 C3 













O0 
Q6 
E ュ 
DC 
EC 
6 ら 6 - 


ジッ 39 EC 62 9357 は 
96 DC BD 4D 1F EZ 
DC 60 3 さ E DD 60 Fa 
62 さき 01 36 06 BE 
10 5O_0QO : DF 
06 CC 41 ED 4D s49 


2E4O_ CC OO 01 36 06 CC OO 07 36 06 
2ESO 10 さ 4 10 37 1O 
2E6O 1O 34 10 37 1Q0 
2EZ7O CC QOO oOD ED 4D 
2EBO 4D C1 4 CO E4 
2E9O 26 00 5B DC 54 ヨミ OO OO 10 2F 
















CC 








2ERO O1 DD 4 DC.5O DD 44 CC oo _00 BD 4D aa CO ER :RBH 
SEHBO 06 DC 42 16 OO 55 品 BD 4D QQ CO ER :BE 
2ECO 54 CO 54 ーーーーーーー ユ ーーーー ニ ーーーーーーーー ニ ーーー ニ ニー ニー ニー ニ 
2EDO S2 62 DD 0 DC 42 EC BE 59 HB 7E 90 27274 3 26 kg14 
SEEO OO 

2EFO 83 人 add +9 + 全 + 日 +C +D +E +F Sum 



















さき 4Q0O 
き 410 
ひ 


45 BD 4D BE aa CO EA s6E 
4F BD 4D E ウ aa CO EQ :EB 
60 EC 62 36 06 CC 00 359 
06 EC _QO 69 BED 4D RE の 9 ES 








96 CC 0QO 75 BD 4D HB9 sDE 
06 CC OO 6 旨 BD 4D B9 gCE 
06 EC OO 6F ED 4D B9 iD 
60 DC 60 DD gi79 
27 QQO _OE CC sF6 
DD 42 CC 00 
05 A4 32 @2 
さ 2 62 DC 46 
06 CC QOO 4E :a5 
Q6 CC OO 6E saB 
96 00 SO 










add  +O 1「 す 2 ずる キオ ドキ 6 7 日 +9 + す 人 TB +C +D +E +F 
2FOO_ DC 4 B3 OO Oo1 DD 4 CC OO 
2F1O DD 54 DC 44 DD 5o DC 3C DD 
2F20 42 16 OO 21 CC FF FF DC 44 
2F さ SO QA2 32 62 DD 44 DC 44 34 06 
2F4Q > DB 











dd  +O 1 + つ + さ 4 +55 + ら 6 + プ + 日 す 9 + 代 +B +C +D +E +F Sum 
35oo DC 6 06 DC :3E 
さ 510 OO CO. EACGO ZZ 
3520 さ 6 EA CO 10 +B 
dd +O +1 +2 キ さ る +4 + 互 6 + フ +B +9 + +B +C +D +E +F Sum 353O 27 FF 70 DC 46 DD 554 :FO 
ミ OOO 0O OO DD 42 DC 3C さ 6 Q6 DC 42 16 oo 25 DC 42 36 :20 3540 DC 42 DD 46 26 QQO 07 :BO 
3 さ O10 06 CC 0O0 09 ビス OO O1 36 06 CC QO OO さ 4 06 さ Z 10 :28 さ 550 DC O2 DD 46 OO 07 DC :F さ 








3O20 さ 4 10 37 10 34 10 17 03 BC ミ 2 66 DC 42 CS OO O1 sEF 3560 OO DD 46 16 0QO OS 17 00 01 DC 46 さ 4 06 17 FE :FE 
3O3O DD 42 3 C4 2F DZ 33 42 17 QQ 6 16 QO 05 CC OO0 iaF 3570 90 32 62 DC 66 10 27 OO 07 DC 46 日 ミ 2O DD 46 :BC 
ミ O40 OD DD 46 DC 22 36 06 DC 24 36 06 DC 26 36 06 DC gsCO さ 358O DC 42 34 06 17 FEH 7 32 62 DC 66 10 2 00 07 DC skD4 
さ O5O 2B さ 4 06 ミ 7 10 さ 4 10 37 10 34 10 32 10 34 10 17 s1 人 9 3590 42 3 QO 20 DD 42 DC 46 36 Q6 CC QO1 OO BD 4D 1F :58 


46 DC 46 4F DD 42 s74 
90 Q0O_ 10 26 OO 43 s46 
93 36 さ 4 06 ED 4 5C 
10 26 OO 07 DC 46 s1 昌 





3060 03 2 32 6 9E 16 5B 49 EC BB DD 5C DC 46 3 OO0 72 35AO_ DS 42 34 
3070 OD 10 26 00 0OC DC 44 さ 4 06 17 QO5 BB さ 2 62 16 OO sF フ 35BO 
3 さ OBO 19 DC 22 36 06 DC 24 36 06 DC SC 34 06 37 10 4 s7C 3S5CO 
3090 10 37 10 34 10 17 03 1D 32 66 CC OO OO DD 46 39 :92 さ 35DO 





oO DC 54 BS OO OO 10 2F oo O7 EC 62 DD 5C 16 oo Q5 :gB || 35Eo 10 26 OO 0Q7 DC 46 :C6 
3OBO CC 0O OO DD 5C DC 42 さ 6 06 CC Oo 09 CS Oo Q1 36 :2E || 5Fo OO OB さ 2 62 CC oO :CS 
3OEO 06 DC 5C 34 06 さ 7 10 34 10 ミ フ 7 10 34 10 17 02 E5 :BC ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 








3ODO さ 2 66 39 EC 62 DD 62 EC 62 4F DD 5C DC 5C B3 OO :EF Sum: ささ 1C 51 QD ささ a7 FE aF Oa CE 7B ミ B D5 1 FA 78 sBD 
3OEO 7F 10 26 QO 07 EC 62 C3 00 a2 DD 62 DC 5C 日 さ OO :69 
3OFO 20 10 26 OO 07 EC 62 3 Oo a2 DD 62 DC 62 DD 62 :BC Add 。 +O + キ 1 +G + キ さ +4 + 昌 すら 6 + キ アプ +B +9 +A +B +C +D +E +F Sum 
さ 600 00 DD 46 39 DC 22 さ 6 06 DC 24 さ 6 06 DC 26 36 Q6 10 
Sum: 04 33 F1 01 C6 4 Q1 0OO 62 1 4H 57 aB 17 3O 29 =70 さ 610 DC 2B さ 4 06 ミ フ 7 10 ミ 4 10 37 10 34 10 ミ フ 7 10 34 10 sDF 
さ 620 17 FD 6 32 68 DD 42 DC 3B 10 27 OO BE DC 3C 36 :BE 
Add +O +1 +2 +S 4 4 昌 +6 +7 + 日 +9 + +B +C +D +E +F Sum | さら 230 Q6 DC 24 さ 6 06 CC OO Q1 さ 6 06 DC 2B 34 06 37 10 DO 
さ 100 さ 9 EC 62 36 06 CC 00 40 BD 4D 9 36 06 EC 262 36 :42 3640 34 10 37 10 さ 4 10 さ 7 10 34 10 17 FD 40 32 68 DD :25 





さ 110 06 CC OO 5B BD 4D Aa1 4 CO E4 CO 10 27 Oo oO CC :EB 3650 44 DC 44 9E 16 00_ 00 10 27 Q0 09 sF さ 
さ 120 FF FF DD 64 16 OO OS5 CC OO OO DD 64 EC 62 さ 6 06 =F1 さき 660 CC OO_ 07 BD 4E 44 93 42 10 27 00 sBO 
さ 1 さ O CC OO 60 BD 4D 9 さ 6 06 EC 62 さ 6 06 CC OO 7B BD :9 3670 7 DC 44 83 OO 36 96 16 OO sEB 






49 9E さ 0_ BBH 36 2 
D1 DC 52 3 FF FF gBHZ 
DD 52 DC 22 C3 OO si 
FF DC 52 36 06 DC gzBE 
16 SB 49 EC BB 34 sz58 
FC _D9 さ 2 66 DC 52.sCE 


さ 140 4D A1 4 CO E4 CO 10 27 oO QB CC FF FF DD 66 16 :58 3680 21 CC FF FF DC 
さ 150 00 05 CC OO 00 DD 66 39 DC 26 日 3 OO OO 10 26 Qoo :oB 3670 10 DC 52 9E 16 
さき 160 OB CC BO BO DD 42 16 OO 05 CC BF BF DD 42 DC 42 : っ 5 3680 DD 52 QA3 C4 2C 
ミ 170 36 06 DC 1C 34 06 さ フ 7 10 さ 4 10 ED 5O 5 32 64 CC :C2 36BO_O1 さ 6 06 DC 53 
さ 180 OO OO さ 6 06 CC QO OO 36 06 DC 26 36 06 DC 2B さ 4 :Ba さら CO 24 さ 6 O6 DC 42 
さ 190 06 37 10 さ 4 10 さ 7 10 34 10 さ フ 7 10 さ 4 10 17 Oo1 ED :aC 36DO_06 37 10 34 10 























ミ さ 1A0 32 6B DD 6E DC 26 3 OO OO 10 26 OO 24 DC 1E DD =:B 36EO CS FF FF DD 52 42 DC 42S BB 49 7E 
さ 1EO 42 CC OO 00 きら 6 06 DC 42 16 OO OD CC FF FF 17 oO :eC 39FO 16 3Q BB 36 10 22 36 06 DC 24 
Sum: C9 72 6 F5 3D ea BF CC a4 9 AD =:5 
add +4 +55 + ら 6 + フ + +9 + +BH +C +D +E +F Sum 
ミ 7oo O6 さ 7 10 34 10 37 10 34 10 17 FC A5 BC 
710 B さ FF FF 10 26 OO Q7 DC 22 CS OO 01 22 
ミ 72o さ 6 06 DC さ C BD 4D 9 36 06 DC 26 a4 :E6 
Add さ 73oO 27 Oo 07 DC 24 C3 QO O1 DD 24 17 00 7E 
ュ 2oo ミ 740 DD 52 CC OO 09 36 Q6 DC 52 16 QQO 67 
3210 さ 75o O6 DC 52 さ 6 06 DC 26 36 06 DC 28 34 
322o ミ 76O 10 ミ 7 10 さ 4 10 さ 7 10 34 10 17 FC 1D :DZ 
ュ 23O ミ 770 CC OO QO DD 44 DC 3C 36 06 DC 44 16 3O 
ミュ 240 ミ 78o ミ 6 O6 DC 52 36 Q6 DC 42 DS 44 9E 16 :D フ 
325o ュ Z9O ミ 4 O6 37 10 34 10 ミコ 7 10 さ 4 10 17 FC 
ュ っ eo ミ 7AO 44 C3 OO O1 DD 44 2 さ C4 2F D4 ささ 42 
327o 37BoO O1 5 3 ミ 42 39 DC 22 
ュ っ 8O ミ 7CoO oo Go _oB CC oo oo DD 
ュ っ 9O ZDo DC き 4 06 17 F5 O1 32 
ミ っ AO き 7EO F ラ OO 1O 2C oO 1F DC 
ュ oo ミ 7FO Cy Oo Q4 DC さ 3C DD 22 
きじ OWDDSGOWDBSGOYYfOX2 フ 0007 江 の DCYS2<So、 0GYDDWSA' ま SO 0 は 3 ら 戸 | に 2 まだ コニー ーー ニー ニー ンー ニニ ーー ュー ニー コ ュ ニー ピー な で なー テリ 
2Do 5B BZ 2E E6 51 
32Eo 
2Fo dd +O +1 +2 + ミ +4 +5 +6 オフ + 日 す 9 + +B +C +D +E +F Sum 
ーー に ミー St ミ BOO DC 26 さる 4 06 17 F4 D9 さる 62 DD 26 17 F9 4 CC oo :DD 
に ミ B10 OO DD SC DC 24 3 OO Qo9 10 2F oo 品 1 CC oo o1 DD 





さ B2O 42 DC 24 日 ミ OO O9 さ 6 06 DC 42 16 OO 2C DC 2B C さ : コ 1 
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10 


リス ト 2 


3B3O OO_Q1 DD 28 DC 2 93 14 10 2E OO 12 CC FF FF DD :a8 さ 3D70 40 EZ BO EC 6 EZ7 0O CC Q0 OO E7 0 CC Q0 Q1 E7 :49 
3840 SC_ CC OO OO _ 34 06 17 FA Q6 さ 2 62 16 OO O4 DC 14 :1 フ 3DBO_BO_ CC OO _O1 EZ BQO EC 62 ED 1 EC 64 ED 1 CC OO 』FA 
3B5O DD 28' DC 42 CS OO Q1 DD 43 2F DO 3 さ DC :EBD さ D9O 01 EZ BO EC 66 EZ7 BO 9F プロ 17 OO 4 3 さ 9 17 OoO 2E so 
3860 5C 10 27 OO QOS5 17 02 79 CC DD 24 DC 24 3 szB1 さき DRO_ CC FC B2 DD 70 9E 70 CC OO 15 EZ7 oO EC 6C EZ 0 :aC 
3870 QO 区 区 和民 記 DC 24 3 さ 6 06 DC 9O 3DBO EC 6 EZ BO EC 62 ED 1 EC 64 ED 1 EC 66 ED 1 
3BBO 4 DC 2 G1 DD 28 DC 2 ・ 68 ED 1 EC 6E EZ BQO 9F 270 17 OO 12 39 EB6 FD 

















































3B9o EC FF SC CC FF FF 34 : SR FB CC OO BO F7 FD Q5 H6 FD Q5 2Q FB 
38Ao oo o5 OO DD 28 DC 42 CO FZ FD 05 3 1F 9B 7E 4F Fo oo 
3BBo 2C CB DC 5C 10 27 oo FB 0 oo oo go 
2BEO DD 24 っ 4 


さ BDO 3 






2 さ 4 
FA 4 
91 36 


19 
さら 6 
1O 





+ 


+ 各 











10 17 
DC きら 6 
9E 1Q 
BE 19K3 
DC 16 
OO ご 3 ビ 
2 DC 
49 さ ア 


EC Oo1 
Q1 31 
3 


3780 34 さ 2 66 DC 52 C3 0O 
さき 990 2F ご S さ 7 CC OS 5B 36 06 CC 
39a0 QO 20 36 06 CC 00 04 ミ 4 Q6 37 10 





や や や 
1 ロア 0O ひ や 









































He1 の 





Add +O 1 +2 キ さ +4 + よ 品 +6 7 ア + 日 +9 An +H C+D) 
3FOO 





さ F1O 

さ FSQO 
add 。 +o +F Sum | 3Fso 
3a00 10 さ ム 6 日 ア 3F4O 
sa10 06 ュ ッ :o4 3F5O 
3a20 10 SH :O ウ さ F6O 
3a3O 36 o6 8 | SFZQo 


32 sFE || =F8O 





0Q6 :4 さ SF?O 





3a6o CC ュ 4 >9B | FaO 
3QZO 10 さ FBO 
3BO_ 06 3 さ FCO 
3A90 Q6 O : さ 3FDO 
さ QAO OO 04 さ 4 06 37 10 34 10 さ 7 10 さ 4 10 ミ フ 7 10 さ 4 10 :DF 3FEO 


さ QBO 17 O2 QD さ 2 6 CC OO 07 DD 40 39 CC OO 34 36 06 








4000 4D EZ DB 01 さら 6 
4010 BB B2 Q1 36 74 
4020 BEBD Q1 36 7D BB 
4030 02 37 27 BB _D2 
4040O 7 2C BB DD Q7 
4050 3 日 B9 BZ Q5 3Z 
406Q BEB ワ 9 DD 32 37 6e6F 
4070 BS 5 3 72 Ba 
408O 0O さ 3 さ 9 7A Ba CF 
4090 3 21 BADB O1 
40QO ささ BE B2 1F さ 人 a 
40EBO BB BZ 05 さ 69 
40CO BB Q1 3 7H BE 
40DO 
40EO 
40FO 





AH や O 1 2 + る 4 キ 可 6 や 7 日 fA 二戸 キキ 選 ED キビ ピ . で F・ 
さき REOQ_QO 0O1 さ 4 06 37 10 34 10 37 10 34 10 37 10 さ 4 10 
さ B1O 37 1O さ 4 10 37 1O0 34 10 37 10 34 10 17 02 7E 32 
さ B2O 6E CC O2 57 36 06 CC OO B5 さ 6 0O6 CC 0O2 7F 36 06 
さ BSO_CC OO BF さ 6 06 CC QO QO 36 06 CC QO 07 36 06 CC 
3EB40 OO 01 34 06 37 10 34 10 37 10 34 10 37 10 34 10 
さ BS5O 37 10 3 さ 4 10 37 10 34 10 37 10 34 10 17 02 さ E 32 
3B60 6E CC O2 61 36 Q6 CC OO B5 36 06 CC QO2 61 36 06 
さ 3B70 CC 00 BF 36 06 CC QQO QO 36 Q06 CC QQO 07 36 06 CC 

43 10 37 10 34 10 37 10 34 10 
10 37 10 34 10 17 01 FE 32 
さき BAO_6E CC 92 6B 36 06 CC QQO BS 36 06 CC 0O2 6B さ 6 06 
さ BEO_CC QO BF さ 6 06 CC OO _QO 36 06 
さ BCO OO OO さ 4 Q6 37 10 さ 4 10 37 10 
さ BDO 37 10 34 10 37 10 34 10 ミ さ 2 10 
3 さ BEO 6E CC 02 75 36 06 CC OO BEB5 36 





















3C40 OO 
3CSO 10 
3Ce6Q 5 日 
さ CZ7O 1F 
き CBO ビ さ 
3CO 
3CRO 
さき CEO 
さき CEG 
き CDO 

き CEO 
さき CFO 








Sums 





dd 上 O も や 人 。 ボ き 。 士 全 避 6 、 小 Z 日 | キ ウ 。 介 BH じ 。 よ DHP 
2O0 CS O1 43 2 CO C6 01 43 2B CO CZ 91 43 2C CO _DZ 
4210 0Q1 4 ミ 2D CO D9 Q1 43 2E CO DA Q1 4 さ 2F CO DD 1D 
4220 4 さ さ O C1 20 QOE 43 4D C1 BB 06 43 5BH C1 CS QOS2 4 
+D +E +F SBum 423O 61 C1 D4 0 ミ 4 ミ 63 C1 D5 QE 4 ミ 66 C1 D6 29 4 さ 74 
きら 6 06 CC ksG6E 4240 C1 DD 06 44 さ F C2 2O Oo1 44 45 CS BS 05 44 46 CS 
06 ミ フ 7 10 s9C 4250 BE3 02 44 4 CS E6 OS 44 4D C2 BZ Q1 44 5Q C2 BB 
10 ミッ 10 =2C | 4260 Oo1 44 1 C2 B9 02 44 2 C2 BC O1 44 54 C2 CO QO1 








1o ミ 4 
DO oo F CC =95 | 43220 44 55 CS C2 01 44 56 C2 Ca 02 44 曲 7 CS2 CC O1 44 
oo oD oo EZ Bo =4C | 42BO 59 C2 CE O2 44 5 C2 CF Oo1 44 SC CS D1 Q1 44 SD 





さ 3D5O_ CC OO OO EZ7 BQO_ CC OO Q7 EZ 
さき さ D6Q 17 OO 6B CC FC ヨ 2 DD 70 9E 





OO BQ さ 39 :4 ビ 4290 C2 DG QO1 44 5E CS2 DB Q2 44 5F C2 D9 01 44 61 C さ 
E7 Bo_DC :4F 42aO 5 26 CS C2 06 45 2F CS DD 
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42BO 11 45 35 C4 20 17 45 SD C4 BZ ol1 :E5 FE6 33 CB D4 Be OB さ 4 
42CO 46 3E C4 BB OB 46 3F C4 C1 OS 46 4 C4 C2 02 46 =: フ 55 も 回 
42DO 4C C4 C4 OS 46 4E C4 CE O】 46 55O C4 CF O1 46 昌 】 EE Sum: B9 3D 1B 3Q E6 aBF フ 7 SD 3 E6 25 QA EQ に :OA 
5 91 46 4 C4 so 
46 62 CS BR6 sAH dd + 品 6 キ フ プー+ 日 す 9 人生 TB +C +D +E +F Sum 
Be 9C 2B 29 4Boo 0 っ 5B 49 5B 49 6g B4 5B 49 6Q E4 :BS 
410 o6 6 FB O1 26 DD 16 FF 5F Ce QB :2 き 
Add  + す 0 +1 する すき 4 品 オ 6 オア + 日 9 オ 人 TE 4C +D +E +F Sum 4BO 4 34 02 AG6 FB 04 35 0S 2F 14 69 BO 5 26 F1 30 :24 
00 さ C5 BZ 0O2 46 64 C5 BF 01 46 66 C5 CO O1 :B の 4830Q 5 SF 94 6 FB 39 6C FB OS 39 66 BO =10 
4 さ 10 46 67 C5 C2 O1 46 6 C5 CD Q1 46 69 C5 D7 Q1 46 zO8 4840 <1 4 00 21 4B OO 21 4C OO0 21 4D sO4 
4320 6 C5 DA Q1 46 6B CE DC 02 46 6C C5 DD 05 46 6E 6E 4850 00 21 4E 00 21 4F OO 21 5O 00 21 S1 QO 21 52 00 :35 
り 20 04 46 273 6 B5 O1 46 フフ C6 BZ Q1 46 7 C6 :DE 4860 呈 1 OO : 54 OO 21 5 OO 21 56 00 21 7 OO 21 se6F 
4 さ 40 BB O1 46 79 C6 BC 02 46 7 C6 C1 o1 46 7C FCG6 D5 =a1 4870 21 5 OO0 21 22 01 21 2 さ 51 
435O O2 46 7D C6 D6 02 47 21 C6 D7 Oo1 47 23 C6 DD o4 7 48BO OO 6 31 6F BC 6B 6F BC :GD 
4360 47 24 CZ DA 0O1 47 2B CB 20 02 47 29 CB B2 0O1 47 :98 4890 4C_B1 41 SG QC B1 BR SS ieE 
4370 2B CB B7 O1 47 2C CB BA O1 47 2D CB C2 O1 47 2E 1 48AO 3C 3Q BC 54 C6 9D 1 BO :40 
43BO CB DD 06 47 2F C9 20 04 47 35 C9 BS OB 47 39 C9 =:5 フ 4BBO OO OO0 35 91 4F C1 DE 27 sa6 
4390 BF O1 47 41 C9 DO O1 47 42 CR 20 OoD 47 4 さ EQ ES 6 48CO CE1 OS 27 Q6 sB4 
4 さ QO 1 47 50 CA B4 O1 47 6 CQ B6 の 1 47 69 CA BZ 02 :91 48DO 
43BO 47 6 CA BB 1 47 6P Ca BQ 02 4 21 CQ BB Q1 4 :Bo 48EO 
CO 23 CA BC 02 4 24 CQ BD 01 4 26 CA EE O1 4 27 :05 4BEO 
43DO CA CO 04 4B 28B CQ C1 02 4 2C CQ C2 09 4 2E CQ iD4 9 





43EO C4 O1 4 さ 7 Ca C5 Q2 4 3 Ca CF Q1 48 3 Ca D4 :QF Sums 
43FO_Q1 48 3B CR DD 1F 4 3C CB 20 25 4 呈 B CH B2 01 :FF 
add +O + キ 1 +2 + 放 キ 人 4 + 呈 キ すら +7 + せ 日 49 TA 








27 F1 さ D 2B 5D oOa aF 94 78 C5 61 EB 39 17 4 :BF 4900 4 さ F 21 

4910 2C 21 24 

dd TO キ 1 +2 する +4 す 品 + ら 6 + プ + 日 +9 +a +B +C +D +E +F Sum 4920 っ 1 2F 
4400 49 22 CB B4 01 49 23 CB H7 02 49 24 CH B9 01 49 :16 4930 4D AS 21 
4410 26 CE BR O1 49 27 CE BE 01 49 2 CR BC 02 49 29 =sOF 4940 BQ 21 2 
4420 CH C2 05 49 2B CH C9 Q1 49 30 CE D2 02 49 31 CB :FB 4950 5D B9 21 BE 3C 21 63 3E 21 64 60 
443O D さ O1 49 33 CH D4 O1 49 34 CE D5 oO1 49 35 CE D6 :2D 4960 BC 21 62 BB 21 66 日 7 21 65 40 21 
4440 11 49 さ 6 CB D9 02 49 47 CB Da O1 49 49 CB DD oOa Bo 4970 21 5O 7D 21 1 7C 21 43 2 21 6 
4450 49 4 CC 20 21 49 呈 4 CC BS 03 49 7 后 CC BZ 02 49 :4B 4980 7B EC 21 7C F9 22 29 9B 22 23 BB 


22 


4460 7B CC BB 09 49 7 CC C1 01 4 25 CC C2 05 4 26 sCB 4990 BD 21 79 98 22 20 99 22 2B 91 
4470 CC C5 O1 4 2H CC DD QOE 4 2C CD B2 OE 4 3 CD :12 4980 31 6E F3 22 2 EO 21 ZD 97 21 60 


44BO BZ 04 4 4 CD C2 03 4 4C CD DZ 01 4 4F CD DD :5D 49BO 7B 9D 21 72 F7 21 71 FE 21 41 FC 
4490 OD 4 50 CE 20 12 4 5D CE BS 39 4 6F CE B4 01 :44 49CO_F4 21 47 FA 21 49 ER 2】 69 BE 21 
44QO 4B 4Q CE B5 O1 4H 4B CE BB 09 4B 4C CE CO O1 4B :QF 49D0 2 っ 25 92 22 27 9 21 5a 90 21 BB 
44EBO 55 CE C2 02 4E 56 CE C4 O1 4E 5B CE DB Q1 4R 59 :09 49EO 4E F6 21 4F EB 21 さ B EE 22 24 EF 





44CO CE DE O1 4B 5Q CE DD 0Q5 4E 5B CF 20 04 4B 60 CF :12 49FO E3 22 26 FD 21 54 
44DO B2 06 4B 64 CF BZ Q1 4B 6 CF EB 04 4B 6ER CF BE :6E 
44EQO O1 4B 6F CF BD 02 4H 70 CF CO 03 4B 72 CF C2 03 :EZ Sumi C4 7 6 C2 98 07 BD EH Q9 A5 7B 
44FO 4B 75 CF C ミ さ Q1 4B 78 CF CF Q1 4B 79 CF DS Q1 4R :69 
ーー ニー ニーー ニ ーー ニー ニー ニー ニー ニー ュー デニ ーー ニー ニニ ーー dd + 〇 1 + 人 2 オス + 人 4 + す 呈 + す 6 + プ + 日 す 9 + 人 8 
Sum: DE DE 42 7D CE EZ 05 7 24 58 DS 4R QA6 42 68 B3 :48 4A00 21 3a BO 21 42 E4 24 70 ES5 25 70 
4 9E 21 2 9F 21 6D 8B6 

dd 0 寺 1 2 + キ る + 人 4 二 旨 + す 6 + ア + 日 + す 9 +Q +B +C +D +E +F Sum 4A2O 日 1 21 6 ヨ 2 21 7 日 3 21 6C 4 人 21 
45O0 7 /CF DB O1 4EB 7 CF DD 05 4B 7C DO 20 05 4C 23 CZ 483O 24 24 H さ 24 26 B4 24 2 ES 24 2 
4510 DO EH O1 4C 2 DO C2 02 4C 29 DO C5 O1 4C 2B DO :E6 4840 2D BB 24 2F B9 24 31 BA 24 33 BB 
4520 C9 02 4C 2C DO D4 01 4C Do DB :2C 4A50 _BD 24 さ 9 BE 24 さ B BF 24 SD CO 24 
4530 01 4C 30 DO DD 02 4C さ 1 BB O1 saa 4a60 24 44 C3 24 46 C4 24 4 ヨ 8 C5 24 4 人 
4540 4C さ A D1 BA O1 4C 3B D1 2 09 4C :B9 4870 4C CB 24 4D C9 24 4E Ca 24 4F CB 
4550 3D D2 BD 01 4C 46 DS CS 4C 4B :DO 4ABO CD 24 5B CE 24 5B CF 24 BE Do 24 
4560 DS 20 03 4C 4E D3 B3 09 4C 51 D3 BB 04 4C 5 DS :C4 490 24 61 D さ 24 62 D4 24 64 D5 24 66 
4570 C1 Q2 4C 5E D3 C2 01 4C 60 D3 C4 01 4C 61 D3 DO :97 4AQO 69 DB 24 6Q D9 24 6B DA 24 6C DB 
45BO_ 01 4C 62 D3 D7 01 4C 63 D3 DD 05 4C 64 D4 20 OB 6a 4QHO QA6 24 72 DD 24 73 5F 21 32 a4 21 
459O 4C 69 D4 BB 06 4C 71 D4 BD O1 4C ZZ D4 C5 O1 4C :3F 4ACO 24 2 さ 9 24 25 QR 24 27 QB 24 29 
45O 7B D4 CC O1 4C 79 D4 DB O1 4C 7a D5 20 06 4C 7B :1 さ 4aDO 65 AE 24 67 aF 24 43 さ 4 11 6 OO a7 BD OO EO a7 :Oa 
45BO D5 B2 O1 4D 23 D5 BS 19 4D 24 D6 20 06 4D 3D D6 :66 O0 1E C6 05 30 BC 7D 1 ヨ o :D6 
45CO BS 1 4D 43 Do6 BB 07 4D 5D D6 C4 01 4D 64 D7 20 :DF BD OO 95 ER BD Qo 90 a6 iaC 
45DO 03 4D 65 D7 BE2 04 4D 6 日 DZ BB O4 4D 6C DZ DD OB :FF | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
2 04 4E :7 フ 


55 55 81 








61 14 7E 60 65 aB 3B 99 :19 













dd +O +1 +2 + さ +4 +55 +6 +7 + 日 +9 + +B +C +D +E +F Bum 
4EOO_BD OO BE 1E 8B9 20 3 3O BC 66 C6 06 a1 0 27 36 :6 
4B1O 5 26 F9 3O BC 60 C6 05 1 BO 27 25 5 26 F9 1 iCZ 
Add 0 1。+2 + さ 4 + 旨 +6 + プ + 日 19 + +B +C +D 4E +F um 4E2O 5O 27 32 C6 QOQ E7 BC 6 3O BC 50 EC 65 10 3 B1 :EZ 
4600 DB DD OB 4E 呈 1 D9 20 Q1 4E SC D9 BS Q4 4E 5D Da :1Z 4B3O 27 31 6 BC 5D 26 Fo6 10 3 57 4F 27 13 4F 5F 35 s1D 

7 フミ Da DD :DE 4EB40 91 日 6 DE a7 BC 4B 6 05 3D EZ7 BC 43 6 66 20 99 siBo6 
DE BB 05 :F55 4B5O_ CC QA6 OO 20 EQ 6 DF 7 BC さ 7 C6 19 EZ BC 30 6 :7 ミ 
> B2 02 4F 40 4B6O 66 20 6 CC D3 OO QB BC 29 20 D4 4F 45 5 49 41 =72 





さき 1 








生 644 け > Q1 4F 49 siCA 4B7O 4D 48 4E 54 呈 S 4B 42 20 44 5 47 4E 20 57 41 52 :74 
4650 4F 4D DC s955 4EBO 4F 52 45 52 55 52 49 52 41 59 4F 59 5 59 41 19 sC4 
4660 21 A6 DB sOF 4B9O_BO DE OQ 34 さ 7 30 BD OO OE 31 06 10 aF Q2 EC @9 1B 
467 の DD DD ら 6H :F2 4EQO_ED A4 ED 3D FO 35 BZ OE OO OO 00 OO_O2 OO OO 5O CZ 
46O 3 32 EB D4 saAD 4BEO_ フ 7 OO OO _ OO OO _QO0 OO OO OO OO O0 OO QO OO OO 0O iZ 
4690 E ら 6 4E 3D :FZ フ 4EBCO_OO_ OO OO OO OO O0 OO OO OO 0Q OO QO OO OO OO_ 00 sOO 
460 O2 27 12 sF 4BDO OO OO OO OO QO OO 00 OO OO OO QO OO OO QO OO OO soO 
46EO 32 EB 2C 4E 4BEO OO_ OO_QO_ OO_OO_ O0_ 00 00 OO OO 00 OO 09 QO OO oOq sQ0O 
46CO 3 42 4 旨 1H =:F フ 4BFO OO _ OO OO QO OO QQ 0O QO OO _ 00 QQO OO OO QO 00 0O 00O 
46DO AP 
46EO 27 03 BD sB4 Sum: OQ1 E6 E1 4 94 60 5F 67 65 EE 4E AO 6E FE 29 11 saD 
46FO Q F9 35 品 96 s4 選 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 dd 。 +QO + 日 + す 9 +Q +B + ビ +D +E +F Sum 
Sums 97 79 E6 3B EZ7 BD 47 ら 7 CB 17 BB 9 C4 1H D2 34 sz 4COO_ OO OO 0O QO OO OO OO QO OO OO 
4C10 OO OO0_ OO_O0_ 0O_ OO QOO OO OO0_ gs OO 


OO OO OO0 OO QO QO 0O 90 si0O 
OO OO_Q0_ OO_ OO_ OO_ 00 oO90 sg OO 
OO OO O0 OO OO OO 00 _ 00 siOO 
OO OO OO OO OO OO OO QO soOO 
OO OO OO OO OO OO 00 0QO soO 


+D +E +F Sum 4C2O OO 
BD E6 6 sa2 4C3O_O0O 
2 Z 0C *ZO 4C40 OO 
BC CS SF sz2E 4C5O_ OO 
2 クウ 2 人 27 3E ウ 4C6O OO 


dd +O + キ 1 キ 2 キミ 4 日 +6 キ プ 
4700 39 10 AE 4 C6 OD BD DB 
4710 4E Aa7 呈 D 27 EE 30 BC B1 
4720 ED 04 BD 3D FO 4F 8D 24 
4730 










































74 ロ さ 5F さ 4 42 sz3 日 4CZ7O_ OO OO_ OO OO oO oO _ OO oO oO sQO 
2 Ae 4F Ce :ss || 4C8o oo oo oo oo oo oo oo oo oo ioo 
4760 5 5B EE :Oa 4C9O oo GLOO GRGDSO2AOG SDS2OSSON 
の 42 6 s08 4CAO OO OO OO OO oo oo oo oo oO zoo 
478O C6 =62 4CEO Oo 0O.00OONGGSGDISQS'TSOO を SG 
479O BD :24 4CCO oo oo oo oo oo oo oo oo oo soo 
47Eo FS Ee s09 | EDO oo oo oo oo oo oo oo oo oo oo oo oo oo 
4 プ 7EO 02 2 フ 7 34 4C QAO SE szEB 4CEO_ OO oo Oo oo oo oo oo oo oo Qoo oo oo soo 
47CO ささ C1 C6 OB 4 66 84 =:F ミ 4CFO oo oo G 当 UBGGGULOOC OGA SO 
2 02 20 AO a6 4 27 :4C ーーーーーーー 5 

47EQO 4F 3O 紀 4 46. 16 FF :E5S Sum: OO oo oo oo oo oo oo oo oo oo oo go oo oo 
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0 








リス ト 2 
dd 。 +O 
4DOO 16 
EF 
96 
人 4 る 
さ 4 
49 
60 
4D70 F 晶 
4DBO EC 
4D9O0 66 
4DQO さ 9 
4DBO 39 








4EOO 





さ 9 


CS2 


+1 
02 
6 
6 
3D 
1O 
>1 
っ B 
E ミ 
EC 
CC 
4 




















C1 
ビ 1 








> OO0 01 
B9 4F 
1 24 


3O SE OF 
6Q_ 58 EE Bo 
QO_Q0O 109 4D 
QO_D7 


6 05 
1 
1F 
BD BE4 
2 05 
06 26 
45 5A 
44 44 
07 16 
42 EC 
さ 3 41 ED 





9 69 
+Q +E 
06 EC 
QO 0Q さ 
6n 49 
20 1 さ 
4 BD 
C6 QO 
05 2B 
2 7F 
29 01 
FC 日 ミ 
BD Ba 
BD aa 
OoD 10 
E7 8B4 
OO 4F 


+ ヒ 
BC 
ED 
16 
さ 4 
2E 
FZ 
FE 
FD 
FD 
FRA 
CC 
F6 
BE 
BD 


: CC OO 


+D +E 
20 02 
0 E1 
6 C4 
O0 34 
2B 40 
る 61 
5 45 
ら 6 60 
91 39 








CC OO 


60 20 
05 6 る 3 
FE 6 
7 C5 
DC C6 
Q4 EE 
2D 1 ア 
ささ 4 
FA 39 
BD Oo4 
22 1F 
3D EE 
人 6 4 人 4 


1D 21 


+D +E 
1 BE 
BC 09 
FE Sa 
さ 1 8D 
35 B1 
FD oo 
1 40 
Q5 12 
FC 82 
FC BO 
04 02 
FC 日 3 
FC BB 
B9 35 
ヨ B _BD 





所 
8D 
さら 
E ゥ 6 
10 
SB 
に 1 
24 
っ a 


um 
s B4 
ミ F ミ 
121 
sF 代 


= 1 日 
:F8 
に と 


























B6 FD の 1 1 FF 2 フ 7 O6 7D FD OF 7E BF DO 7E 4 8BD 
DB QB ヨ 12 5E 4C 53 9 32 BB 32 DC 3 DC E6 4 
+ ド 


5090 
5oaQ 
5oBO 
5oCO 
SoDo 
5oEO 
SoFO 


Sums 


dd 

紀 1QO 
5110 
5120 
513QO 
5140 
515O 
5160 
517Q 
51O 
519O 
51O 
51EO 
31CO 
51DO 





10 
05 
BC 
Q5 
OO 
2B 
ド G 
1 
FD 
6 ビ 
OO 
EE ら 
2E 
326 
2 





92 


Bo 
05 2B 
3O 
10 
oo 
OO さ F 59 41 3 D1 


4 さ 9 


05 


aO 





+2 
0 OO 
49 F ミ D3 
10 
09 35 
03 


入 民 


Q1 90 


7D D ミ 
O1 26 
lp た 1 


ピタ 4 
50 
SQ 











Sum 
s5O 








CLEAR さ Q0。&HSFFF : DEFINT ム -Z:DINM 0D(60) 
MIDTH B0。25: CONSULE O、25。O。O: DAT=&H410O 


LINE INFUT"HOT OR COLD 


IF 


(H/ ビ ) "3 IN も 


TIN*="h" HR IN$="H" THEN 1050 


PRINT "program 1oading"sLOADM"PRT NM" 


INPUT "ファ イル / コス ウ 


"asNN: DINM F ま (NN) 


FUR 1!=1 TO NN:LINE INFUT"FILE NAME "sF も (TI):NEXT 
INPUT "GAF "GBPsPUKE &H4001 。BP 


INPUT "FEED 


E 





LINE INPUT "92 テ ? (y/n) "3V ま 


DPEN" ロ " 。#2 


ょ "LPTOs" 


FUR N=1 TO NN 


UPEN" 1 " 。 六 1 。F 和 ま (N) : PRINT "OPENED : 


"saF ま (N) 


INPUT 提 1 。EM: = ニ ( (960 一 (16+BP ) *ENM ) \ さ 2 つ ) * つ +DAT 
IF M<DAT THEN NM=DaT 
FOR K=DAT TO DaAT+120:PUKE K。OiNEXT 


WHILE NHT(EOF(1) ) 






INPUT 村 1。Ti IF V$ ま ="Y 
PUKE &H4Q000。T 
INPUT 提 1 。 に に 


: エニ: CR=1 : FF= ニ 0 ゴ = ニ 0 
THEN =(T\2) *2+((T+1 ) 


MOD 2) 


清 書 プ ロ グ ラ ノム 、 











1170 HILE K< テ ー1 =: し = し +1 

118O PUKE 1 。K\256: PUKE エ +1。K MOUD 256: エニ [オラ 
1190 IF K=O THEN 1240 

1200 IF K=&H222D THEN CR=CR+1 s GUTH 1240 
1210 IF K=&H222C THEN CR=0: GUTOU 1240 

122Q0 IF に K=&H222H THEN FF=ー-1:CR=Os GBDTO 1240 
123O IF K く >&H222A THEN J=L 

1240 INPUT 提 1。K 

125O MEND 

1260 FUKE &H4002。J+(M-DRT ) \2 

127O EXEC &H5200:PRINT#2。 CHR も (2 フ 7) す "A+CHR 和 も (FE) 
1271 1=1 : HILE < く =CR = ユニ T+1 : PRTNT 半 2 MEND 

1272 F ビ =F ビ +FE* つ * じ CR 

127 く る TF FC>1S5B4 THEN F ビ =FCー15B4 

1274 IF FF THEN PRINT 皇 2。CHR$(12) ぉ 

1280 MEND 

129O CLOSE 拉 1sPRINT" CLOSED" 

13OO_NEXT 

1310 CLOSE: END 
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Bo 8B9 ) ED @6QO CC 人 6 昌和 
B2 3O 2E F3 1 97 内 7 昌和 4 
EC 60 5 49 58 49 SO DE 
BE OO QO 3 る 6 10 さら 6 る 40 
17 oO _D フ 7 58 OF 6 C5 








4 2 CE5 Sa 
26 45 さ Q CE6 Q1 
1c】 き 39 EE 49 
4 る ポト は 司 

に 1 人 4 人 39 

FE さ 39 さき 4 

44 Q4 1F 

BE 所 日 

ED ER 4 父 

E ミ 44 EE6 

ら 7 95 .69 AC 1D 21 C4 

+D +E +F 
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4F さ O 7C CF さ 4 さ oo oo og _ 20 o2 2o Add +O +1 4 つま ニ 4 ァ + 人 ER + ビ +D + に 
4F4O 10 BE FC BE 0 さ Q1 F a1 7 a4 5 5100 OB 17 FF oeD 9 33 C6 33 C8_.D4 
4F5Q 0 とら 110 C4 ミミ 44 1 プ oo 日 4 so BD oO AO EC 5 
4F6O 4Q F ア 5120 27 09 10 3 3E 2O F ミ E6 4F AG E4 3 
4F フ 7o Bo 54 AO 5E 33 C6 る 
4FBO 39 D4 5a 
4F 人 9 EAA ヨウ ら 6 り 
4FAO_FC ロ 1 E 7 E6 
4FEO FC < Ce ao 82 
4FCO 2 人 こら F6 
4FDO_ ao 2 DD 16 4 日 4 < 
4FEO BD 69 Bo 18 ac 
4FFO Bo FD Q1 BL 51BO <: ョ 20 ER 
ーー moonec が の の mpSS 51CO OO 21 
Sum: DB OoE BQ 12 1Do っ 21 旨 る:( 
51EO < 8 on 
ゃ Of 叶 演 ) 和 1FQ 5 Q1 QO 
ァ 7 6 OO ユー に いっこ ee の 
1o EF BC SBum: 59 3F DS 3 日 E2 21 BD CD QQ 人 4 5 27052 DO F3 BA se 
5 5F EZ SE 
BD 3E Co 人 dd + キ O+1 キ 9 キミ 4 4 フ +B +9 + 人 TB +C +TD +E +F Sum 
BC QC 2O0 E 7F Ce6 4C 1F 9B > OO 4F F6 40 OO DD OO 4F si4 人 9 
01 1B 4 に 4 の 0 O1 DD Q2 4F O2 DD 0O4 CC 41 0O 36 Q6 CZ フ 
BC F ネ BD 52 02 36 06 CC O1 4D 1F DS 04 36 06 DC OO :FF 
54 16 E6 oe Q1 oo ED *4 06 さ 7 10 4 10 37 10 =3E 
OD BD DB B6 ・ 1o BD 5o oo ミ FF Ca OO 1F SE 2E 4F FO : 
3sO BC B1 っ 2 oo oo oo oo oo D 6E 9F FE FQ OO OO OO OO 02 
4F ヨ D 324 4 E 8 Kb か り 23 キー つら ニー まっ > に 
An 4 SO B3 Sums 720 D7 6 BO ED DA 77 9D FO E6 FF 39 46 71 9 55 RA 
日 6 FF AZ 5 5 
54 6F BoO 18 
B 46 24 2 58 5 
品 A6 C1 ら F ウ 
全 5E CD 14 9 ES BE BR 9O QB 1C HO BF BC 1 
ss リス ト 5 K ソ ー ス ・ リ スト (参考 ) EE 
1000 『 (*※FM- 昌 JAPANESE MOURD PRHCESSUR BY T.SHIGEMURR* ) 
1010 『" DEF RR= ま 4QD7s DEF CUDE=$48 日 さ 』 DEF LPRINT= ま 464 
1020 『" DEF KK= ま 3 さ EOO』 DEF MM ニニ ま ら OOO』DEF ビ =* ま 05 s DEF し し =b4B9 さ 
10SO ? CUNST YM=9』RM= ニ も O7 ョ KM=$1B: FM=38B』 EL ニ さ 9 
1040 『 CUNST LF= ニ もつ 22D 』 BR もつ 22 じ ョ 5 ロニ = も 222sFF= ニ 222B 
1050 『" BQDR=PEEK ( 和 ま 4BRF ) *※2 ロ 6+PEEK (4BBO ) 』 HUTBF=BRDR+796 
1060 『" BU1 =BQDR+916』 SN=PEEK (BADR+4 ) si TEXT=BADR+SN+926 
1070 『" FNC=BQADR+6』 FNK=BQDR+16』 EM=PEEK (HADR+1 ) 
108O 『" SCL=EMーELー1 』 SCER=ELーSCLー1 3 X ニ 0』Y ニ 0 』X ニ 0』 5Y=O』 TB= 日 』 に K ビ =O 』 CS ニー1 
1090 『" KNM=O 』 KN=O』 RJ ゴ =O に =O ェ INM=O ェ IND=O』 XM= ニ ELー1 3 QDR=SCL+ 1 』 ビ し = ニブ 
1100 『" FOR 1=O TO 9』FNCs 1)=OINEXT 
1110 " ゴ =PEEK (BADR+2 ) *256+PEEK (BADR+ さ ) TEX 征 
1120 " FUR 1=J/2+1 TO PUINTEXM。YNM。 1 。SN1 
1130 ? TEXTK(r ) =0 
1140 " NEXT』CLSE 1] 
1150_ "REFERT iCURS[ ]』 IN=GET』 CURS[ ] 
1160 " IF IN=$7F THEN DELE] ョ FI 
NZO IF IN= ま OB THEN X=Xー1』CURE]』 DELE] ョ FI 
11 ヨ 0 " TIF IN=$1 じ THEN X=X+1』CURE]』F1 
ECO: の IF IN=$1D THEN X=Xー1』CURE]』FI 
1200 『" IF IN=$1E THEN Y=Y-1』CURE] ョ FI 
ま ポ OY IF IN= 和 も 1F THEN Y=Y+1』CURE]』F1 
1220: IF IN= ま O2 _ THEN X=Xー5 ロ 』 CURE] ュ FI 
1230 ? IF IN=$06 THEN X=X+5』 CURE ]』 ョ FI 
13240 『 IF TIN=$19 THEN ITF X=O THEN Y=Y- さ ELSE X=0』Y=Yー-1』FICURE] ュ FI 
1250.? IF IN= も 1 人 0 THEN IF X=O THEN Y=Y+ さ ELSE X=0』Y=Y+1』FIiCURE コミ Fi 
1260 " IF TIN= 和 $16 THEN エニ =ー1 E=ON=PUINTEO。Y。O,SY]』P=PUINTE XM。Y。 1 。SY] 
2ZO。 FUR J=N TOU PiU=TEXT (J) 
128O 『" IF_ USSO_ AND ULF AND US>BR THEN =J 
ウル IF エ =ー1 THEN 1!=J』FI 
13QO 『 Fi 
3 さ 10 "* NEXT 
よる 20F 1TF エマ テー1 THEN 
133O ? = (N+P ) /2』 ロ =( エ +E) /2』TNM ニ ー1 』 X ニ O ェ CHCLE ] 
13 さ 40 『" IF ON THEN FUR F=N TO ロー-1 ェ 』DELE ]』NEXT 
4350。 ELSE FOR P= ロ D TO N-1』DISPFO]』 X=0』NEXT 
1360 『" Fr 
WSZO_ INM=IND 
1380 『" p6 
139O ” FI 
1400 『“ IF TIN= ま 14 THEN』 CSM=O 
1410 『" IF Y+SY く YM+SN THEN INM=ー1 』 ビ = ニ X』 IF SGX く <SO_THEN P=F+ADRiFI 
1420 『" N=ー1 3 ロミ ー1 』E=PHINTEO。Y+1 0。SY]』 ロ = ビ 
143O 『" FUR 1=PHINTEX。Y。SBX。SY] TH PHINTEXM。Y。 1 .SY1 
1440 " U=TEXTK(1 ) 
145O “ IF =O _HR U=LF ロ R U=BR THEN 
146O0 『" IF U=LF ロ R U=BR THEN TEXT(1)=QFI 
1470 『" TIF N=-1 THEN N=1sFI 
148O " ELSE N=ー1 
1490 " ITF E=J ゴ THEN E=TsF1I 
15OO 『 選 
出 紀 届 0 の NEXT 
152O TF_N<>ー1 THEN E=N-E 
153O0 『" N= ゴ ーNー1 
1540 " ELSE ビ E=JーE ュ F エ 
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』O 


り 。XNRS 








15509、 


1560 
1570 
1580 
1590 
1600 
1610 
16SO 
1630 
1640 
1659 
1660 
167O 
1680 
1690 
1700 
1710 
172SO 
1730 
1740 
175QO 
17600 
1770 
1780 
1790 
1800 
1810 
1 ヨ 2O 
1830 
1840 
185O 
1860 
170 
188Q 
1890 
1900 
1910 
1920 
1930 
1940 
1950 


1960 “ 


197 
19O 
199Q 
2OQOO 
SO1O 
202O0 
2030 
2040 
205O 
2060 
SO7O 
208O 
2090 
2100 
2110 
2120 
130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
222O0 
2230 
2240 
225O 
2260 
2270 
228O 
229O 





ご 400 











FR _ ロ =O TH N 
DISFEO1 
NEXT』 CHCLE ]』 X= ロ 0 Y=Y+1』 CURE ] 
N=FUINTEXM。Y。 1 .SY]』 ロ =O 
MHILE UE QRND TEXT(N) =Q 
DISPETEXT (N-EH) 1 
FUR =N-EM TU _N-EM-EM+F+ GTEF -1 
TEXT (ドド ) =TEXT (ドー1 ) : TEXT (ドー1 ) =0 
NEXT 
FOUR ド =QO TH XN 
MRITEEE。Yー1 。 TEXT (NEM-EM+ ド +1 ) ] 
NEXT 
ロロ = ロ + 1 
MEND:i INM=IND 
IF EE THEN FRINT CHR ま ( ア ) 
メ =XMー ビ E+ ロ +1 
ITF X=O _ THEN GX=ー1』SCSE ] 
ELSE メニ X+aQDR 
F エ 
ELSE TEXT(N-EM) =9 
8 


FI 
TF TIN=$17 THEN 
FRINT"TYFE = "sN=INFUT 
IF _N さ THEN 0 ロ =Oi X=0』 CHCLF ] 
E=FUINTLO。Y。0。SY]: TNM=ー1 : ピ =O 
MHILE (XXXM ロ R SX=O) QND X<EM-1: し =TEXT (ビィ ) 
ITF NOT(L=QO DR L=LF ロ R L=BR OR L=SH OR TEXT(E+EM-1)<*O) THEN 
ITF TEXT(E+Fー1) SB DR F=O THEN 
IF XXM THEN BX=1:CLS[ ]: X=XーEL+SCDR ュ FI 
DISPLSD] : ピ =F+1 』 ロ =X 
FI 
F Ti X ニ X+1 』 ビニ P+1 
MEND : X= ロ : INM=IND 
ELSE IF BU1:Y+SY)<*O THEN SBEY]iFI 
EU1: Y+SY) =N 
IF BU1:Y+SY)S*O THEN SBEY]iFI 





FI 
F 
IF TIN=$18 THEN FRINT"FUNETIHN REY NUMEER = "』IN=INFUT 
IF INS11 AND INEO_ THEN E=IN-1 』 ロ =0 
REPEAT』 CUS2E ] 
IF IN= ま 11 THEN 
FNE (FMXE+O) =TEXT (PHINTEX-1.Y。SX』SY1) 
0= ロ +1』FNCiE) = ロ ョ FE 
UNTIL IN 和 11 HR ロジ =FN 
TF IN=$11 THEN 
REFEAT PRINT CHR$ も (7) 
CURS[ ]』 IN=GET』 CURS[ ] 
UNTIL INS > 各 11 
ELSE X=Xー1 
FI 
ELSE ERASE[ ] 
FOUR エ =1 TO 10』 ド = ニ エ ー( エ /10) 水 10 ョ ヒ ニ エー1 
SYMBULLO。 エネ *1 ヨ ー1 日 。 ド + 和 あさ 0 。 人 4] 
FR J=1 TO FNCiL) 
MRITEEJ。 エ ー1 。FNK (FXL+ ゴ ー1 ) ] 
NEXT 
NEXTiPRINT"OE ?"s IN=BET』CLS[ 
F 1 』 IN=Q 
F+ 
IF IN= も 1 王 THEN ロロ =BET 
IF OS11 THEN ロロ = ロー1 
FOR _N=1 TO FNCi0) 
DISPEFNK (FNMX ロ +N-1 ) ] 
NEXT 
Fi 
ド 演 
IF TIN=$OC THEN PRINT "CLEAR = 1 CHNTINUE = (1/9) マ " ョ ミエ =INPUT 
エ F 1=1 THEN 
FUR J=QO_ TO PINTEXM。YNM。 1 。SN]s TEXT (J)=0NEXT 
FR J=QO_ TO SN+YNMi BU1: ゴ ) =OINEXT 
BSX=O』SY=Os X=Q』 Y=0sCLSFE ] 
Fr 
FI 
IF IN= ま 11 THEN 
IF YEO_UR SYO_THEN INM=O』 エモ FUHINTEX。Yー1 。SX SGY ユ 
DISFLTEXTK(T) 1 
INM=IND 
Fi 
FI ・ 
IF IN= ま QD THEN 
X=Q ェ Y=Y+1』CURE ]*CHCLE ] 
だ 
TIF IN= ま OBE THEN 
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2410 “ 1F X=O_ QND Y=O THEN SY 

3242O 『 ELSE X= 

343 の 『 FI 

32440 * Fr 

450 『 TIF IN= ま COE THEN S3[F ]』 ド ET= モ CHRNGE 上 ET ユ ュ F エ 

32460 『" TF IN= ま 1 THEN S4[]』 INM=CHRNGE [IN]: IND=INMsFI 

32470 『" TF IN= ま 1 の THEN 

84BO 『" FRTINT "FRINT= ニ 0 ダフ リセ ゅ ウト = コー コー ト ~ = 生還 だ モー トー 日 “" 

2490 『 IN=INFUT 

2500 『" IF IN=B THEN FRINT"TYFE 1 = 1 TYPE 2 = 2 "リュ 1 ユニ INPUT 

と 3 が 59 1F 1 ユ = 全 THEN KNM ニ ー 

252Q_* ELSE ENM=ーQ 

25BSO * FI 

2540 『 人 6 

20 『* IF IN=4 THEN PRINT "CUDE = "1 ユニ INPUT』DISPLI]:FI 

日 如 け 』 IF IN=2 THEN PRINT "TB = "エニ INFUT 

5 呈 7 の -? 下 ド 。 半 閉 

2 互 旭 ? 員 衣 2 

ダ 旦 人 9 ? TH=I 

2600 『 FI 

BS619 『" IF IN=O_ THEN FRINT "GRF = "』GBF=INFUT 

うら 62 の 0 * IF GBP60 JR BFSO THEN ロ F=4 ョ FI 

P コ 1 FRINT "FEED = "』FEC=INFUT 

2640 『" IF FEC:60 HR FECS1 THEN FEC=12FI 

2650 『* FRINT" タ テ = 1 ヨコ ニテ  "』VE=INFUT 

2660 『" IF VE<1 THEN VE=OsFI 

2670 『 E=Q 』 ゴ = ニ 0 ョ ドニ 0 ョ ロロ = テウ 

2680 『" FR 1=O TO SN+YMsL= ニ PHINTEO。T。O。01 

人 なら 7 の * FOR M=Q_ TH EM-1 』U=TEXT(L+MN) 

2700 『 IF USO _ THEN E=IiFI 

2 が 1 『 IF LU=S THEN 

2720 * IF THEN = ニー1 

2730 * ELSE = ニー1 

2740 『 FI 

2750 『 ELSE J=Q 

2760 『" 用 池 

安 770。 3 NEXT 

2780 『" NEXT』 MM= (960ー(16+GF ) *EM) / さ 23TF ME1 THEN MM=QFI 

2790 『" FUR 1 エ =Q TU ENM-1 

2800 『 UTEF (1 ) =Q 

2810 『" NEXT 

282O " IF RK THEN PRINT CHR$(7) 。"ERR DaATR"s IN=GET siPRTNT/ 

2B30 『" ELSE FOR IT=O_ TO EiN=Os ド =1』S=0* ヒ =PHINTEO。T。04091 

2840 “ FR =O_ TH ENM-1 』U=TEXT(L+J) 

285O0 ” seTF USEO THEN 

2869 『 IF USSLF THEN 

多 ロ BZ の, 『* IF U=BR THEN ド =0 

2880 『 ELGSE 

2B90 『" IF U=FF THEN 

29009 「『 =ー1 

ro ELSE N=J+1 

妥 な 

2 の 30.* Fr 
日 












SO THEN 『 














FI 


2940 ELSE 選 =K+1 

2950 FI 

2960 FT 

ピー NEXT:R=BU1 = 1 ) 

に セル 19 IF VE=1 THEN 

ぢ 90 * IF RR-(R/2) * コ = ニ ウ D THEN ドド R=R+1 
3000 「『 ELSE ド =R-1 
ま 朗 ま 

日 FI 

IF TEXT(L+N-1 ) =SH AND NO _THEN _N=N-1』FI 
4 IF 8 THEN LLE ま QOC1 

ELSE FOR ロ =QO TO N-1 

UTEF (M+ ロ ) =TEXT(L+ ロ ) 

る NEXT 

3080 『 LFRINTLHUTEF 。 GF ※ 己 6 ら + す N+ ト | 。 民 ※ 記 王 6] 
3090 『" FR J=1 TH EsiFEEDLFECE]』NEXT 
き 100 FI 

半角 人 の ツ NEXT 

さ 120 ? F よ 

トト も (0 王 FTi IN=OQ 

き 140 『" F エ 

さき 150 『" 1I=FOUINTEX.。Y。SX』SY1 

き 160 『 IF (IN まま 選 O_ QRND 1TNE 生 41) HR (IN 生 避 谷 人 ND 1NE 還 61) THEN 

き 17 の 0 " DISFELCHDE[ IN*26] ] 

31 ヨ 0 『 35 

さ 190 * TF (TIN: ま プ 7 RND INS ま 7F) HR (EN= ニ ORND IN= ま SO) THEN 

3200「『" DISFECUDE[ INK2 弓 6] ] 

M | に ま ( 

ッ ITF (IN: ま プ F QRND TIN 人 6) ロ R TIN= 生 BEO_ OR (IN: 生ま DD QRND LN 第 FF) THEN 

も DISFECUDE[ TN*S6] ] 

s 1 6 

ば IF TNG QRND IN 本 BO_ THEN 











DISFECUDE[ INX2 紀 6ー ド ド T ユ ] 











10 


リス ト 5 








さ デ 70 
さき 2BO 
さ 290 
ささ 00 


さ 350 


ささ 60 
ささ 70 
さ 3Q 
ささ 90 
3400 
さ 410 
さ 420 
さ 430 
さき 440 
さ 450 
さ 460 
さ 470 
さき 48Q 
さ 490 
さ 500 
3510 
さ 520 
さ 53O 
さ 3540 
さ 55Q0 
さ 560 
さ 570 
さ 580 
さ 3590 
さ 60Q0 
さ 610 
さ 3620 
さ 630 
さ 64O 
さ 650 
さ 660 
さ 670 
さ 680 
さ 690 
さ 700 
さ 3710 
さ 3720 
さ 730 
さ 740 
さ 750 
さ 760 
3770 
さ 780 
さ 790 
さ 80O 
31O 
さ 382O 
さ 83O 
さ 40 
さ 850 
さ 86O 
さ 870 
さ B8Q 
さ 890 
さ 900 
さ 910 
さ 920 
さ 9 さ 0 
さ 940 
3950 
さき 960 
さ 970 
さ 980 
さ 99O 
4000 
4010 
4020 
4030 
4040 
405O 
4060 
4070 
4080 
4090 
4100 
411O 
4120 





* FI 
* TF TIN=*$O9 THEN TINM=0iN=(X/TB) ※TE+TB 
* ITF NXM THEN N=XHiF1 
FUR ロ =X TU N:DISPLO]:NEXT 
ッ INM=IND:FI 
1 ITF IN=ORA THEN J=FUINTFXNM。YN。1、SN]: 1=O 
FOR に K= ゴ ーEM+1 TO JiIF TEXT(K)SSO THEN 1=J+1sFTiNEXT 
ITF IT+EM>J THEN FRINT CHR$(7) 
る ELSE M=FUINTLO。Y+1 。0。SBY] ュ LM 
FOR ド に =J TO M+EM STEF -1 
6 TEXT (K) =TEXT (ドー-EN) 
2 NEXT 
FOR ド =M TU M+EM-1:TEXT(R)=0i NEXT 
の 1I=POINTLX。Y。SX、SY] 
FOR K=I TO NM-1 
3 TEXT(L) =TEXT(K) : TEXT (ドド ) =0 ュ し = し +1 
6 NEXT 
MRTSE ]:Y=Y+1: X=OiCURE ]』CHCLE ] 
* Fr 
g Ft 
ッ ITF IN=*OF THEN 
IF SYO ロ R Y>Q THEN =FDINTLO、Y。0。SY] 
IF TI<>Q THEN FUR PF=1 TO X-SX*EL 
X=Xー-1 : CUR[ ]』 DEL ] 
NEXT 
FI 
=FUINTLE XM。YM。1 。SN] 
FOR K=Q TO JiTEXT(K-EM) =TEXT(K) : NEXT 
FOR KK= リ ーEM+1 TU JiTEXT(K)=0』NEXT 
Y=Yー1 CURE ] MRTSE ]:CHCLE ] 
ELSE PRINT CHR$(7) 


vv で sy we 


し 


Fi 
TIF IN=$O ロ THEN =FUINTE XNM。 Y。 1 。SY ユ 
FUR し =I TO JiTEXT(L)=QONEXT 
IF IN= ヨ THEN PRINT"TYPE1 = 1 TYPE2 = 2 "』TIN=INPUT 
IF IN=1 THEN KNM=OiF エ 
IF IN=2 THEN KNNM= ニ ー1』FI 


3 
FR L=X TO XMiMRITE[L。Y。O]』NEXT 
選出 
aLPF IN1 
IF _RJ THEN IF BF OR SF THEN ROMAF] コ FI 
ELSE IF BF DR SF THEN DISPLCODE[ INX256-2*GR]]sFTiFI 
TF (IN: ま BO RAND TIN<$DE) R IN=$Q6 THEN KF= ニ ー1 ELSE KF=0』F エ 
IF KN THEN 
IF KF OR (IN=$20 AND KC) THEN KNJIE] 
ELSE 』 IF IN=$20 THEN DISFEO1]iFI 


屋 
ELSE IF KF THEN DISPELCUDE[ INX256-KT]]』F エ 


yy 


FI 

TNIM=O 

IF TN=$O4 THEN DISPLTEXT(I) 1]』F エ I 

IF IN=$O1 THEN DISPETEXT(TI)+1]』FIs INM=IND 

ITF IN=$1B THEN 85[ ]:KN=CHANGE[KN]s LTNE[9。1 ヨ 2。67。190。1. フ 2] ミ KC ビニ OsF エ 
IF IN=RM THEN S2E ]』RJ=CHANGEERJ]』F エ 

IF TIN=$O さ THEN 

ミ PRINT "Sure? (1) "』IN=INPUT 

6 IF IN=1 THEN IN= さ ELSE IN=OiF エ I 


* Fr 
: UNTIL TIN= さ 
ッ E=O 
FR TI=O TO POINTLXM。YI。 1 。SN] 
IF TEXT(I) く 0 THEN E=TX2sFI 
NEXT 
POKE BADR+2。HIGH (E+TEXT) s POKE BADR+ さ 。LDM(E+TEXT ) 
9 CODE * さ 5、 ま FF 
*FEED: し LL[1E ポ 合 6 す 41]sLL[ 上 1※26+ 呈 OD] = し LOA]s RETURN 
: CUS2: CURE ]: CUD[ ] ミ IN=GET』 CUD[ ] 』X ニ X+1 : RETURN 
: CHCL: IF SX THEN SX= ニ Os SC2[ ] ュ FT:RETURN 
* CHANBE :TF 1=O THEN R=ー1 ELSE R=0』F1iRETURN 
『EaNJ Ti ITF EC=O THEN KC=1iEE=IN:B6F ] 
ELSE KC=OiS6[ ]: ド =KKEREX2556+TN]: TN=O 
5 TF に <>O THEN し =PEEK (まさ E2O ) ミ ビーL 』 ゴ ニ ド に 
0 IF L<S1 THEN 
る TF KNMS SO THEN 
8 MHILE TIN< SOD SND INY 和 ま 1FiMRTTEEX。Y。J]』 TN=GET 
5 TF TIN= も 1D ロ R IN=$ ま 0 THEN = ゴー1 : し = し +1 =F1 
ITF TIN=$20 THEN = ニ J ゴ +1』 し = レー1 ビエ 
ァ TF J<K THEN = に Ks し = レー1 sFRINT CHR$(7) ょ FT 
5 TF し <=O THEN = ゴー1』 し =1:FRINT CHR ま (7) ょ FT 
ッ コ =KCCHEJ コ 
ッ MEND 
5 ELSE N= ニ ー1 3 ロー に *TN= ま 1F 
る LINELO。1 ヨ 0。6 さ 9、199。 1 。 フ 2] 
* MHILE TIN<* ま OD QND IN >$20 
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リス ト 5 








4130 『" 
人 4140 
4150 『" 
4160 『" 
417O 
4180 “ 
4190 『" 
4200 『 
4210。* 
CD 
4230 
4240 『 
人 SB) 
4260 
4270 
428O0 『" 
4290 『" 
4300 『 
4 さ 10 " 
43 さ 20 『 
4 ささ 3O_“ 
4 さ 40 『 
435O 『" 
4 さ 60 『 
4 さ 70 『" 
43BQO “ 
4390 『" 
4400 『" 
4410 * 
442O 『" 
443O “ 
4440 『 
445O 『* 
4460 “ 
4470 『* 
44O 『 
4490 
4500 "KNSUE* 
4510 * 
452O “ 
4530 『 
45540 
4550 "ドド CCH ェ 
4560 “ 
4570_『" 
458BQO 『" 
4590 "ALP* 
4600 『" 
4610 “ 
4620 "BC2s 
46 さ 30 『 
4640 『 
4650 『“ 
4660 “ 
4670 『 
468O “ 
4690 『 
4700 『" 
4710 『" 
472O “ 
4730 『 
4740 "SC ミ i 
4750 『 
4760 『 
4770 『" 
4780 “ 
479O 『 
4BOQO "SROi 
4810 『" 
4B2O “ 
48 さ O " 
人 44 
4850Q 
4860 
487O 
48 ヨ 0 
4890 PHINTs 
4900 "MRITEs 
4910 “CHE* 
4920 『 
493O 
4940 『 
4950 "ROMAs 
4960 『" 
4970 『 
4980 『" 











ITF IN= ま 1F THEN 
IF LO _THEN N=N+ 1 』 ゴ = ロ 』 ド = テロ 
FR IT=O_ TO XNM 
ENSUEE] 
L= ニ レー1 』 ロモ に CCHE ロ +1 1 
NEXT 
ELSE FRINT CHR$( ア ) 





FE 
た 江 
IF 1N= 事 1E THEN 
IF_ NO _ THEN N=N-1 』R=0』 し デ L.+EL ロモ 
FUR 1=XM TH 0 STEF -1 
り = ド ECCHEJー1 ユ 
KNSUEEJ] 


NEXT 
ELSE FRINT CHR$(7) 





FI 
Fr 
TF ITN=$1 じ THEN =R+1 
TF R>XM THEN R=OsFI 
Fr 
TF IN=$1D THEN R=R-1 
IF R<O THEN R=XM:F エ 
FI 
CUDSFR。YH+1 コ 』 IN=GET: CUDSLR, YM+1 1 
MEND 
FUR 1=1 TO RiJ=KCCHEJ+1 ]』 NEXT 
IF N*EL+R*=F THEN IN=OsFI 
FOR 1I=QO TO XMiMRITELT。YM+1.0]: NEXT 
BOX[] 
Fr 
ELSE TN=$QD 
FI 
M=TEXT (FUINTEX 。Y、SX。SY]) 
IF TIN= ま OD THEN DISFEJ] ELSE MRITELX、Y。M]iFI 
FI 
FT iTN=Oi RETURN 
IF LO THEN N=X1 
ELSE NM=O 
FI 
MRITEL 1 、YM+1 .M] 
RETURN 
ロ = メ 1 1 MM=LDM (1 ) 
IF NM= 和 ま 7F THEN ロー メ 1+ 和 GFT 
IF M=$2O THEN ロニ 1 一 和 SG ェ FT 
=GiRETURN 
TF 1* ま 40 AND 1<$5H THEN BF= ニ 1 ELSE EBF=O ェ FT 
IF ん 1 >$60 AND ん 1< ま 7B THEN SF=ー-1 ELSE SF=OFT 
RETURN 
IF SX=O THEN 1=*$BOBO 
ELSE 1=*FBF 





FI 
SCET。EM]』T=FOINTEO。 9.。SX。 BY] 
IF SX=O THEN FOR =SCL TO OQ STEP -1 
SC さ [ ] 
NEXT 
ELSE し =L+SCR 
FUR 1=SCR TO XNM 





SC[ ] 
NEXT 

F1』 89[ ]』RETURN 
L=T+ エ 1 
FOR J=O TO YNM 

IF TEXT(L)SO_ THEN MRITEET。J。TEXT(L) ]』 ド 1 

L=L+ENM 
NEX 征 
RETURN 
SCEX1 ] 


ITF 1 THEN し =O ELSE し =YM:FI 
J=PHINTFO。L。SX。SY]』 IF BU1:L+TSY)Y SO THEN SBEL]:F1 
FOR ド =O TO XNMiR=TEXT(J+R) iTF R THEN MRITE[K。L。R]:FTiNEXT 
RETURN 
ERASE[ ] : EDX[] 
FOR エ =QO_ TH YMiL=FDINTLO。T、SBX、BY]: TF BU1:T+SY): 
FOR J=QO TOD XMiMRITEEJ。T。TEXT(L+J) ]:NEXT 

NEXTi RETURN 
R= メ 1 (S ォ 4 ) *EM』 TF メ ミ THEN RR=R+QDR ュ F1 ュ R=R: RETURN 
MMEX き 。 メ 1 キキ 。221s RETURN 
R=O 
ITF メ 1=*aT OR 1=*T" ロ R 1=*U" DR 1=*E ロ R 1=* ロ " THEN ドド =ー1』 ド TI 
ITF %1= ニ "ar" UR 1 ニュ * DR 1= ニ Yu" OR 1="e" ロ R 1=*O' THEN ドド =ー1』F1 
R=Rs RETURN 
IF CHE[IN] THEN =* ま ORHEF] 

ELSE エ =IN: し =O 

REFEAT TIN=TiS7TN]: エ =GET』 S7F IN] 








) THEN SBE1]』FI 


IF (CHE[IN] OR IN='NP HR IN=Fn* ) 人 ND 1=" " THEN し =ー1』FT 
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UNTIL CHELI] ロ R 1=RM R L OR 1=FM 
R TF TIN=* : THEN し =1INi ITN=T』 エ = し ュ F エ 
ら ITF T=FEM THEN IN=EN 
ELSE IF 1=RM THEN IN=RM 
ELSE RHEE] コ 


























ら 所 
5059 『" E え 
59060 『 FTiRETURN 
| 90Z の 。 訪 恨 HE5 RLFE TIN]: 1F SF THEN IN=IN-- ま SO ェ F エ 
SQOBO 『 RLLPLT]sTF SF THEN エ = ニ エー ま 2O ェ FT 
| OO 『 TN=RRF1N*2 王 6+ エ ] ュ エニ L ロ MM(TN) : IN=HIGH( TN) 
| 0Q) の ITF_EN=O_THEN IN=CUDE[ INS 紀 6ー ド 穫 ユ 
人 光 の TF 1= ま DE THEN IN=IN+1 FE 
5120.『 TF エ = ま DF THEN TIN= ニ IN+S ェ F エ 
\ DISFLIN]』 IN=O 
1 5140 『" FIiRETURN 
5150 "DISF』 I=FOINTEX。Y。SX。SY] 
160 『" IF INNM THEN J=FUINTEXM。Y。 1 .SY] 
呈 光 O IF TEXT(J)XEO_ THEN PRINT CHR ま ( ア ) 
518O * 己 号 E 講 ま F 可 THEN 
5 よ 人 の ミ FUR ドド = デ ゴー1 THU T STEP 1 
52O00 ? TEXT (E+1) =TEXT(E) 
語 加 ま D: の NEXT 
強 0、3 FOUR ドド =XM THU X+1 STEF -1 
| * MRITE[E。Y。TEXT( エ + ド ピーX ) ] 
| け NEXT 
8 FI 
く RY 
上 E エ 
% TEXTK( エ 1) = ん 1』MRITEEX。Y, ん 1 1] 
* IF CSMM=ー1 THEN X=X+1』FI 
4 IF XXM AND SX THEN Y=Y+1』FI 
ゆ CURE ]』RETURN 
"MRTSIFUR ドド =Y TO YM』 T=FHINTEO。E。SX 。SY1 
5 ささ 0 『" FHR J=O_TO XNMiMRITEEJ.K。 TEXT( エ +J) ]』 NEXT 
| 340 『" NEXT』RETURN 
5350 "CURI TF XXM THEN IF SX THEN X=O_ ELSE X=SCR』FI 
5360 『 SGX=CHANGE[SX ]』 SCSE]』F エ 
5370 『" IF XSO_ THEN IF SX THEN X=SCL ELSE X=XNsFI 
5 さ BO 『 SX=CHQNGE[SX ] 』 SC2[ ] ュ FT iM=O 
BS90.* IF_ YYN THEN FOR エ =1 TH Y-Yh』i BY=SY+1 
5400 『 IF SY ヾ =SN THEN M=ー1 』 SRUEO] ELSE SBY=SNiFI 
5410 『" NEXT 
5420 『" IF M THEN EXE]』FI 
| 5430 『 Y=YNiFI 
| 5440 『 IF Y く O_THEN FUR エ =ー1 TOD Y BTEP -1』5SY=8Y-1 
450 『" IF SBY:=O THEN M=ー1 』 SRHE 一 1 ] ELSE SGY=0』FI 
546O 『" NEXT 
5470 『" IF M THEN EXE] コ FI 
54BO 『" Y=O ョ FI 
5490 * RETURN 
5500 DEL s エ =PUINTEX。Y。SX。SY]』 ゴ =PUINTEXM。Y。 1 .SY] 
5510 " FOR K=1I TO Jー1』TEXT(K) =TEXT (KK+1 ) sNEXTiTEXT (J) =0 
5520 ”" FUR K=O TU XM-X』MRITEEXTK。Y。TEXT( エ +K) ]』NEXT』RETURN 


55 さ O "52』 SYMBHLL600。 1B2。"%" 。4]iRETURN 

5540 "3』 BYMBOLE610。182。" *%" 。41:RETURN 

5550 "54』・SYMBOL[6 さ O。182。"*"。4]sRETURN 

5560 “8』 SYMBOUL[620。 1 ヨ 2。" *" 。4]sRETURN 

557O "6』 SYMBDL[59。182。KB。41:RETURN 

55BO "7』 SYMBOLLBS。12、 錠 1 4]sRETURN 

5590 "SB』 CL=4』BYMBDLEO。 1K1 日 。BU1: BY+ メ 1 ) + 和 まさ O。 41* ビ レニ ブフ ョ RETURN 

6QO "9』 BYHBDLE5S、1B2。**" 、4]sRETURN 

* BUX:LINE[5O、1 昌 1 。91 191 、0。7。1] 
LINE[599、1 日 1 、639、191、0。7。1] 
LINE[609、1B1 、609。191.0。7。 の ] 
LINE[619、1 日 1 、619。191 0、7。Q] 
LINEL629 1B1 、629 191.0。7。9] 









る IF 8X THEN 89L[]sF1 
あ IF _RJ THEN SS2E]sF ェ 
9 IF ド ET THEN FE]』FI 
5699 「『 IF IND THEN SB4L]iFI 
0 IF EN THEN 85E ]』 ド 1 
7 の IF EC THEN S6E[]』Fi 
72 RETURN 
7 CUD』 LINE[X*16+16。Y ポ 1 日 1 紀 。 X*※16+ さ 1 。Y*1 昌 +17.4。7。11sRETURN 





5749 "CURS』CUDSEX.Y]i RETtURN 

5750 "CUDSiLLINE[ ん 1 16+16。 ん 全 ※1 日 キ せ 16。 ん 1 ポ 16+ ミ 1 。 
5760 7 ERQASE 』 HLT[ ]』 RDD= ま FEBSsCFUEE ADD。 0 ァ ュ 』 SUE[ 1』 RETURN 

770 SYMBOL 』 HLLTE]: DD= ま FCBSs CEFHEE DD 4 けり 。 1 。 1 ん 1 ん で 半 1 。 ん ミュ BUHE ]sRETURN 
578O "LINE』HLTE ]』QDD= 和 FEBS 3 CFDREE DD。 1 、 ル 6。 日 。 ん 1 提 人 で 提 。 さ 提 4 韻 。 メ フェ SUEE ]sRETURN 
5790 “HLT CHDE$E6 も FD 。 ま 05 まま 2 日 。 ま FEFOEE まま FDQ。 生日 O 

SB00 『 CODE 6。 も FD 。 も も 信介 まあ FE RETURIN 

5B10 "BUE:FOUEE ま FDO。ORETURN 


s\1 昌 +16.4。 ア 。0]』 RETURN 
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5M37/8『A 由 IN 目 A 目 半 nh 中 較 伸 理 162 了 

中 577/8 ニ セン プー コト は マン ルン 人 

EM37 誠 計 3BD ヨ リピ シュ ンド に ョ ピン ニン ョ ョ ドン ここ ル 、 1 | 
IM ミ 8 単車 % 最 月 呈 線 ocoooooooooooooooooooooooooo cocoooo 高畑 英樹 
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人 

ビ に 6 
I 6 
Ne 6 


LEF 
NISSILE 【SP] 


FM- フ / 


ALI 


この ゲー ム の 原作 は 1/O'81 年 11 月 号 , 芸 夢 狂人 氏 作 成 の 
『ALIEN FALL」 で す . FM シリ ー ズ の 機能 を フル に 活か 
し て 。 ラル カウ ラー PSiG( サ ウル ドブ (CIBIOISK の 2 ララ 
レル 動作 に よる 高速 処理 と いう 特徴 が あり ます . 














lm 9 ログ ラム に つ 【 て toi 


ご DE グラ ィ く 次 の 4 つ に 分 か れ て いま す . 





2D00H 一 34FFH : PSG コ ント ロー ルル , 説明 , デモ 

3500H 一 3FEFEH : 本 ゲー ム 専 用 ゲー ム BIOS 

4000H 一 4FEEFEH : サブ CPU コン トロ ー ル (サブ 
CPU に 転送 する ) 

5000H 一 58FEH: ゲー ム ・ メ イン ・ プ ログ ラム 








= の) 0 \ 微 を 次 に 掲げ ま 33942 
に 所 
各 ル ー チ ン が コン パクト に な り , 働き が 明確 に な る . 
分割 し て アセ モン ブル し や すく な る . 
汎用 性 が ある (特に サブ プ CPU コ ント ロー ル な ど は 少 
し の 改造 で 他 の ゲー ム に 流用 で きる ). 


の 

| 組 所 | 

⑩⑳ ブ プロ グラ ム が 大 きく な る (この プロ グラ ム で 10K バ イト 
身 間 訪 

@ 各 ルー チン を 結び 付け る 方 法 に 工夫 が いる (スピ ー ド を 
採る か .、 デ バッ グ の 容易 さ を 採 る か )、. 


や られ た ./ ノ 


唱 胡 六 
| HI-SCORE 32454 
SCORE 66948 


FI 4 
NISSILE 【S] 
的 
| 還 * 7 SBP * 


isht (C) 489 
。 峰 soka 50FT 
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較正 岡 伸博 


以上 筒 単に 挙げ ば まし た が , 
の 方 が 勝る の で は ? 


両者 を 天 笑 に か ける と , 長所 








@ フ ログ ラム に つ ( いて to2 


ーーーーーーーーーーー 











この プロ グラ ム は 外観 上 , 原作 と ほぼ 同じ だ と 思い ます 
(の こと が な い の で 詳細 は 不明 ). し か し アル ゴ 
リズ ム で は 異な り ま す 。 だ と えば FAT 本 TIENI( 以 FE 
と 遇 す ) で す が , 原作 で は 1 ,。 IT, 皿 の 3 分 割 で し た だ が, 
ここ で は 1 (中 央 の 究 か ら 1 行 下 が っ た 所 まで ), II ( 充 右 
へ の 横 移動 )、 ( 港 へ 落ち , 待機 する ). WV ( 下 へ 降り る ) 
の 4 つ に 分 割 し て いま す . また , 画面 中 央 の 数 字 は 原作 で 


は 局面 を 示し て いま し た が , ここ で は 臣 ち 落と し た FA の 
数 に な っ て いま す . 

スピ ー ド に つい て は 相当 ディ レイ を か け て いる た だ ため, 初 
め は 簡単 で す が , 面 が 進む に つれ て 高速 に な り , 上 区 し く な 
る の で 安心 し て くだ さい . 最初 オー ル ・ カ ラー に し た こと 
に より スピ ー ド が 落ち る の で は と いう 心配 が あっ た の で す 
が 。 実際 作成 し て みる と さす が FM シリ ー ズ の マル チ CP 


U は 強く 。 M 有 ZZ の よう に 
敵 す る ほど の スピ ー ド に な り , 


キャ ラク タ を 使っ た な ゲーム に も 臣 
2 に) に 
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人 OM ul 


| 














ビー ム 砲 は テン ・ キ ー の [4| で 左 へ , [@] で 右 へ 移動 し ます . 
ビー ム の 発射 は | SPACE | キー で 3 
あえ な く GAME OVER 


HITTTTITTTTTTTITI 肌 騰 遇 


IO EE: 
央 昌 | 


HH0048 計 1 
HH I 


HHHIHHTTTTTI 


Copuri9ht (0) 1993 
電 5 luNasaoka SOFI 


右側 か ら BASE UFO が 出 て き て 中 央 に 来る と FA を 降 
ろ し 始め ます . FA は 港 に 入り . ここ へ 6 匹 め が 入ろう と 
する と 1 番 下 の FA は 押し 出さ れ て 降下 し て きま す . また 


- 番 端 へ 行っ た FA は すぐ に 降下 し て きま す . ーー ーー 
1 番 下 へ 落ち る と FA は 衝 届 波 を 出す の で , その 前 に 破 私 は オー ル ・ マ シン 語 の デー ム ば か り 作 っ て いま す が , 








壊す る か 逃げ る か し て くだ さい . と きど き 中 央 か ら UFO 何 を 隠 そう BASIC の リン ク 方 法 が わか ら な い だ け の 理 
が 降り て きま す . これ は - 一 番 下 へ 来る と 全面 に 衝 机 波 を 出 由 で す . 
す た め や っ つけ な いと 必ず や られ て し まい ます . 素 4 $7F00 一 の ワー ク ・ エ リア の 詳細 

50 更 の FA が や られ る と BASE UFO は デモ ンス トレ ー ニ p ミ 






ショ ン の 後 , 左 へ 移動 し て 1 面 の 終了 で す . SSIESK2P テ コ 


























































7F00 2 
7F02 2 MY CANNON の 座標 
7F04 2 BASE UFO の 座標 
7F0O6 2 ミス テリ ーUFO の 座標 
7F08 2 現在 の スコ ア 
漠 に 待機 中 の FA は 20 点 降下 し て いる FA は 40 点 、U 8 RC 8 
こ ー 店 あこ ーー、 
2 00 です.。 2 AD 7F0D 2 乱数 ワー ク 
得点 は 約 6 万 点 ま で し か あり ませ ん . 一 番 下 の 桁 を ダミ の | 且 証し が OCRERSGC 
ー に し て 約 60 万 点 ま で に する こと は 非常 に 簡単 な の で す が , 7F13 1 衝撃 波 (F A ) の 幅 ( 半 径 ) 
今回 あ を て し ませ んで: じ だ 。 ゲー ム も ホ ド ホ ド に と いう こ 7F14 1 MY CANNON フラ グ 5 : 異常 0 : 正常 
と だ と 思っ で くだ きい: 7F16 1 UFO フ ラグ 1: 異常 0: 正常 
7F23 1 MY CANNON の 移動 速度 
表 1 仮想 VRAM 内 で の 表 2 PSG ル ー チ ン ・ コ ー ル 1 
表示 (下記 以外 は 座 時 の AccA / ピ 5 0 SIC の JE 
標 で 判断 する ) 上 ー 7F27 1 FALL ALIEN の 移動 速度 
1 MYJCANNON 爆 発 7F2C 1 MISSILE を 何 発 撃っ た か 
3 2 | MissiLE 発 射 7F2E 1 UF O の 降下 速度 
net 2 3 | FALL ALIEN-MISSILE 旭 人 7F3 2 1 FALL ALIEN の 出 て くる 速度 
WEARNS 4 | UFO か ら 各 波 発生 CI 
MY CANNON( 爆 発 )| 6 5 | UFO-MISSILE 爆 発 ※ 上 記 ワ ー ク ・ エ リア は , プロ グラ ム の 途中 で 書き 込み 、 書き換え を 行 
壁 8 6 | FALL ALIEN か ら 径 波 発 生 な っ て いる の で , マニ ュ ア ル で この 値 を 変え て も 何 に も な り ま せん . 変 
UF0 か ら の 衝 役 流 | 10 一 1F 7 | BASE UFO 移動 更 する に は サブ ルー チン INITO,. POWERUP を 参照 変更 し て 
EAAUEN 昌 罰 202E 8 UFO 発 生 くだ さい ( 他 の ルー チン で は SCORE な ど を 除い て 更 , 書き 込み は 
9 | ポー ナス し て いま せん ). 
A | ゲー ム ・ オ ー バ ー た だ し , MY CANON の 数 は $574E. 
表 3 サブ ルー チン の 内 容 ($5000 一 ) 表 5 サ プ 側 と 通信 する 際 の コマ ンド の 詳細 
504E | 衝撃 波 消去 1 cLS0 普通 の CLS 
5060 | FALL ALIEN 発 生 2 (GiI 寺 S 上 下 カ ー テ ン 式 CLS 
5 0 7 2 | FALL ALIEN 移 動 3 CHGCOL BR 一 G 変 化 
5 1 9 A | MY CANNON 移動 。 MISSILE 発射 4 INKEY | キー テー タ 
5 229 |MISSILE 上 昇 5 PRINT| X Y |AScll カラ ー 
5 2 7 9 | MYSTERY UFO 発 生 , 移動 6 DECPR 5 D / |HEX(|HEX(L| / 5 桁 出力 
5 3 1 A | ディ レイ 7 DECPR 2 / D HEX / 2 桁 出力 
5328 |FALL ALIEN 生 死 判定 8 CHER ヶ ル 1 二 41 
5 3 3 1 | UFO 生 死 判定 9 SHER D 7 1※1 
5 3 4 7 | MISSILE 生死 判 定 A MMPR D MD 1x 1 
5 3 6 1 | MY CANNON 生死 判定 日 FAPR / 2※1 
5 3 6C | MY CANNON が 衝撃 波 に や られ た と き C FAER 2 1 
5 3 8 9 | FALL ALIEN と MISSILE が 爆発 Dp UFPR ? 4※1 
5 3C4 | UFO と MISSILE が 爆発 E UFER 7 D 4※1 
5 3E3 | FALL ALIEN の スタ ッ ク を クリ ア F BAPR 7 10 2 
5 3F3 | FALL ALIEN が 下 に 落ち た と き 10 BAER / D 10X 2 
5 4 0 6 | UFO が 下 に 落ち た と き 11 MEPR / D SS1 
5425 | 次 の 面 に 進む 12 MCER / 7 8 
5 4 CF | MY CANNON が や られ た 13 MCBPR / D 3X1 
5 5A6 | ゲーム ・ オ ー バ ー 14 UFBPR| 4X1 
5 6 9 7 | BASE UFO の 双 変 化 15 CcLS2 暇 な 人 向 CL S | 
5 6 A 3 | タイ トル の 点 減 16 BCOL | カラー 
56C6 | 次 の 面 へ 進む と き の 初期 設定 17 吉富 PIRM 議 X Y 10 2 
5 7 0 4 | MY CANNON が や られ た と き の 初 期 設定 18 KABE / 7 (1 
5 7 1 A | 画面 を 描く 19 FUN 1 D | 還 - ル ー テ ン 1 ンコ 
5 7 8 C | ゲー ム が 始ま っ た と き の 初 期 設 定 1 A FUN 2 ヶ ヶ 
5 7 8 4 | POWER UP 1B |FAB2PR / D 2X1 
1C | UFB2PR ? M 4X1 
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@ 高 畑 氏 が ゲー ム は サブ 側 で , メイ ン 側 は 音 出し 専門 と 言 
っ て いま す が , 私 の 場合 , 並列 処理 に よる スピ ー ド と 画 
面 の デー タ の 増加 に よる サブ 側 プ ログ ラム ・ エ リア の 減 


少 を 考え て , それ に は 少し 無理 が ある の で は と 思い ます . 


音 出し に つい て も PSG が 一 般 化 し て きた いま ., 問題 は な 
いし 構造 の 簡易 化 と いう 点 か ら 見 て も , や は り リ メ イ ン 処 
理 は メイ ン 側 で 行ない , サブ 側 は イン テリ ジェ ント 端末 
と し て 使っ た 方 が 良い の で は な いで し ょ うか . 


解読 派 の 方 の お 楽し み と し て , 隠し コマ ンド が 入れ て あ 
り ま す . 名 付け て 開 夜 の ALIEN FALL と 地 中 の ALIEN 
FALL, その 他 で す . 探し て みて くだ さい . 

@ 竿 者 の ハイ ・ ス コア は 36,150 点 で す . 

書き 忘れ て まし た . スタ ー ト 番地 は 多 H4000 で す . 


2 ロー チャ ー ド 





ゲー ム ・ メ イン ・ ル ー プ 
LMY CANNON 移 動 | 
|_MISSILE 上 昇 | 
LFALL ALIEN 移 動 
ミス テリ ーUF0 移 動 
FALL ALIEN 発生 | 
LBASE UFO の 色 容 化 | 
| 衛 撃 波 を 消す 













































ママ MY CANNON 移 動 (MC MOVE) 


START 










































_ | 異常 あり な ら 
処理 ルー チン へ 


命中 し た か 判定 上 - 
命中 し た か 判定 



















マ FALL ALIEN 移動 (FA MOVE) 


START 






no 


LDY キス タッ ク ・ ト ッ プ 





yeSs 















| FA2wv | IFA4MV | 
xswv ] 


LEAY 3.Y 












何 か に 命中 し た か | 
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FN FALL ダン プ ・ リス | EE 








Rdd 

2D00 
2D1O 
2D20 
2D さ Q 
2D4O 
2DS5O 
2D60 
2D7O 
2D8BO 
2D9O 
2DAO 
2DBO 
2DCO 
2DDO 
2DEO 
2DFO 








+O 
ミ 4 
27 
2 フ 7 


+5 
1E 
2E 
BD 
BD 
BD 
BD 


FD 


+6 
B1 

1 

oo 
oo 
oo 
oo 
4F 
op 


+ ア 
Q2 
Q6 
61 
6D 
79 


+5 
22 
さ 2 
さ 人 
2 
1 


+B 
0 さ 
97 
F6 
F6 
F6 


+ ピ 
27 
27 
30 
3 さ Q 
さ OQ 


+D 


ます 
oO4 
OB 
67 
フミ 
74 選 
BB 
E 
E 
1E 
10 
oO 


+F 


3B 


2F 


+F 


Sum 
ョ の 
4。1 
s CO 
: 2 つら 
1E 








Sum: 91 DB 


+1 
FC 


Rdd 

ささ OO 
ささ 1O 
ささ 20 
ささ 3O 
さ 34Q 
ささ 5O 
ささ 60 
ささ 7O 
さき 38O 
ささ 9O 
ささ AO 
ささ BO 
ささ CO 
ささ DO 
さき 3EOQ 
ささ FO 


26 61 


6 ヒビ 1 さ 65 4 さく 9C BC 94 4B QO1 E2 55 OF sz98 


+55 
6 
な 4 
SF 
20 
10 
BF 
AaC 
03 
Q8 
AE 


+8 
2D 
3 
BEF 
16 
C4 


+D 
2B 
O1 





+F Sum | 
BD :EF 
17 zaF 
BE :7C | 
7F saF | 
FB :D9 
00 :2C 
1E s4D | 
22 =s さ 1 
FE :BB 
AB :96 
20 ビワ 
BD :ES 
CD :i57 








3020 20 54 4 45 4E 20 BE C2 D2 B2 0Q <4 76 Be さ C B7 :96 | dd  +O +1 +2+ さ +4 +5 +6+7 + 日 +9 +a +B +C +D +E+F Sum | 
303O 7F さ 2 B6 QQ BZ7 7F 27 6 Q4 BZ7 7F OC BE 15 1 BF :E4 SOO 34 02 B6 40 BB 26 
3Q40 7F Q2 BE QO QO 17 FD F1 17 FD EE 17 FD D6 17 FD :14 3S1O OB Aa A5 BB a5 BB 
| 3 さ O5O DC BE 1 さ OO BF 7F O4 17 Q1 DD BE QO QO 17 FD D9 :2F 3S20 10 BE 7F Q6 AC E4 
さ Q60 17 FD D6 7F QQO QQ 17 FD CZ 17 FD CZ BE QooO 64 17 :2B | 353O 308B9 01 OQ AC E4 
| さ 07O FD C7 7 OO OO 26 EF BE 17 0 さ 17 FD 9B BE 15 OF :5C 3540 35 10 BD 2 さ a6 B4 
3OBO BF 7F 06 17 FD BF BE 15 1B BF 7F O2 17 FD 92 BE :16 | 3SSO 20FO 34 10 86 02 | 
| 3O9O 16 14 BF 7F OO 17 FD BS 17 FD 日 さ BE OO QO 17 FD :<8 3S60 7F OO 27 O1 4F 35 
| さ OAO_ 98 17 FD 95 さ 1 BD FD B2 BE 1E O1 6 07 17 FD 77 :7 さ ご SZ7O CS 78 OO 1F Q1 35 
OO さ 1 BD FD B4 BE 19 1B B6 07 17 FD 6B さ 1 BD FD Be :aB SSBOFCB2BEPFFOB1o6 
| 3oCO BE 18 14 B6 07 17 FD 5F さ 1 BD FD EZ BE 1B 15 Be :9D 3590 BEFF OC 16 0o4 EA 
35AO 1B 16 04 DC oo oo 
さ 5BO E6 7F 35 A6 17 02 
35CO 35 Ae AE B4 BF 5 
、 さ 5Do Aa4 17 O1 O5 10 BE 
| | 35EO さ C DE 6D 22 27 OF 
| さ SFO BD FF B1 35 BO 7F 
add +0 +1 +2 +3 ユ 4 45 よ 6 + フ 7 +1B オラ 4A 4B 4E 4D 4E 4F | Sumi 43 1B 63 9B 0O0 BC Ce F7 19 a4 01 AB 67 さ 1 BF B4 :Ee 
ミ さ 100 17 FD 24 さ O O1 さ 1 BD FD CD 6 07 17 FD 19 BE oo 
ミ き 110 OO 17 FD 25 17 FD 22 17 FD 1F 17 FD 1C 35F6 34 
さき 120 76 17 FD 12 BE 0O OO 17 FD OF さ 1 BD FD B1 BE 05 Add  +O +1 +2 +3 +4 +5 +6 + プ +B +9 +A +B +C +D +E+F Bum 
ミ 13O OO 日 6 Q4 17 FC F1 さ 1 BD FD C6 ミ O O1 17 FC EB <1 さき 600 4C 17 OO 5 さ 17 OO CS BD 5o 04 26 02 35 BEO さ 4 02 :E4 
ミ 140 BD FD DE ミ O Q1 17 FC DF 31 BD FD F6 <O 01 17 FC | 3610 B6 さ C BD QOQ 7F 7F QO 7F 7F 0O1 35 Oo2 35 BO 17 0o :B9 
| さ 15O De さ 1 BD FE OE BE Q5 05 B6 07 17 FC CA さ 1 BD FE さ 620 BB BD 54 17 QO BZ さ 9 さ 4 16 17 02 24 17 02 32 17 :59 
さ 160 28 BE 14 07 B6 06 17 FC BE 1 BD FE 25 BE 14 og 36 さ O 02 4E B6 7F OD B4 0 さ BB 02 C6 05 さ D さ 4 12 B6 7F :29 
さ 170 17 FC B4 さ 1 BD FE 2F BE 14 QB 17 FC AQ さ 1 BD FE さ 640 OD 4 O さ BB Q4 BE 7F 06 17 0 さ AO 35 12 6 QA 3D : さ 4 
さ 1BO SB BE 14 OD 17 FC aO さ 1 BD FE 3 BE 05 OF B6 0 フ 7 3650 1F 9B 17 OO 5B さ 5 96 さ 4 さ O BD Oa 10 aE E4 a7 B4 =:B9 
| さ 190 17 FC 94 さ 1 BD FE <B BE 05 10 6 05 1 フ 7 FC BB さ 1 | さ 660 10 AF Q1 35 BO BE 7C DO eD 4 2B Oa さ O 0S BC ZD :E1 
| さ 1AQO BD FE 4 BE QO5 12 86 07 17 FC 7 ビ さ 1 BD FE 46 BE さ 670 FC 23 F5 BE FO OO さ 9 さ 4 20 10 BE 7C DO 6D a4 2B =45 
さ 1BO 05 1 さ 6 0 さ 17 FC 7QO 1 BD FE 4 BE 05 14 17 FC ミ さ 6BO O4 AC 21 27 22 さ 1 2 く 1O BC 7D FC 2 さ FO 1O BE 7C :BO 
さ 1CO 66 BE OD 14 BF 7F Q2 17 FC 57 BE Q5 06 BF 7F 04 さき 690 DO さ O _B9 FF 0O AC 21 27 OE さ 1 2 10 BC 7D FC 23 =16 
さ 1DO 17 FC さ F BE Q5 Q9 BF 7F 0O6 17 FC さ 39 BE Q5 QB 1 フ さ 6Q0 F4 30 B9 Q1 0QO 35 AO 6F 4 6 さ aA4 35 AO ミ 4 16 1F :DB | 
さ 1EO FC さ 6 BE Q5 OD BF 7F Q2 17 FC さ ミ 6 さ 1 BD FE 25 BE さ 6BO_B9 BE 7F OB さ Q BF 7F OB 17 02 B9 BC 7F QAa 22 02 =:9 
さ 1FO 05 17 6 Q フ 7 17 FC さ O BE OQ OO 17 FC さ C 17 FC さ 9 さ 6CO さ 5 96 BF 7F QA 1 フ 7 02 BE 35 96 さ 4 16 1 フ 7 FE aB CC :B ヨ 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー さ 6DO 0 さ BS 17 FE 92 ED 84 さ 5 96 4 16 17 FE AA 4F 5F =20 
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4 
記 
ら 
し o・ 


と 

串 
1 
【=] 


も 
リ 
生 
トー】 


し 4 
3 
山 コ 
に エ <】 


し の | 
① 
じ り 
ト o】 


も 4 
や 
想 
し =】 





ルコ 
> 
9 
ら 


由 
セ 
が 
【=】 


の | 
セ 
加 
ト c1 


4 
セ 
どら 


4 
に 3 
G 





い 
屯 
ドリ 
ら 


4 








| さ BDO 
さき BEQ 














Add 
| さ Eoo 
3C1O 
さ 3C2o 
3C3O 
さ C4Q 
3C5o 
3Ceo 
3C7O 
さ C8o 
さ C9O 
さ CAQ 
3CBo 
さ CCoO 
さ CDo 
さ CEQ 
さ CFO 
Sums 
+F Sum 
フ F :51 
7C s91 | 
20 :54 | 
34 s25 | 
3O 64 
02 s69 | 
16 :BC 
QO 44 
さ 3 :49 
AO :S5E 
34 6 | 
35 :F さ 
さ D :1E | 
QC :D2 
26 :65 
5 :B2 
| 
AS sD1 | 
| 
+F Sum | 
E6 :44 || Add 
60 :5C さき EQQ 
16 :C5 3E10 
35 :BC | さ E2Q 
7F :C5 さ ESO 
BD :e5 3E4Q 
FF :C5 | 3E5QO 
BD :DB 3EeQ 
0Q2 :ao | 3E7Q 
FC :5C | さ EBO 
5F 3E9O 
フ F | さ EAO 
フ C | 3EBo 
2 っ oO さ ECO 
0Q 3 さ EDQO 
さ EEO 
| SEFO 
+F Sum 
さ 4 :sE1 Add 
34 sp2 || FOO 
ミ 4 :4 ミ | さ F1O 
さ 4 :SA || SF2O 
F4 :CE さ F3Q 
7C : さ 4 3F4O 
さ 4 :EBB 3FSO 
oO5 :B1 | FeQ 
B2 :2C さ 3F79 
16 :aE SFBQ 
RA9 : さ 1 ミ F?O 
BD :CE | SFAO 
10 1O さ FBQO 
B7 :1D | さき FCO 
10 :44 | ミ FDO 
EE'is55s 1 SEES 
| さ FFO 
ED :aD 
Sums 
+F Sum | 
BE =: さ 7 Rdd 
1o zoo | 4000 
34 :9 さ 4010 
さ 4 :gB | 4020 
16 s き 2r- || 4980 
4 :4 さ S 4Q4Q 
F9 :2o || 405O 
0O1 :9O 406O 
BF :F6 | 4070 
B2 :eF 4Q8Bo 
BD :EB | 409Qo 
QO :E2 40AO 
10 =10 40BO 





GB 


+ さ 
20 
Q8 
QB 
20 
QB 
Go 
20 
QB 
20 
20 
20 
QQO 
oO 
GO 
oO 


+4 


20 


2Q0 
20 
20 
20 
20 
20 


2 


2Q 
20 
QQO 
Qo 
QO 


QB 


20 


2o 
20 
20 
Q8 
2O 
20 


20 


+5 
QB 
2O 
320 
(の に 
20 
20 





QB 


に 
Q8 
20 
OB 
20 
2O 
20 
20 
QB 
20 


2QO 


+B 
OB 
20 
98 
20 
20 


20 


0 
さ O 


+ 
Q8 
QB 


20 
20 


20 


の 
20 
QB 
QB 
20 
QB 
Q8 
20 


+B 
QB 


QB 
20 


20 


320 


26 
7C 





QB 


QB 





に y4 
D ミ 
に y4 
Q9 
BQ 
B7 
5Qo 
2B 
5a 
QQO 
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Add +O 〇 +1 +2 + さ +4 + ロ ロ +6 + プ + 日 +9 +Q +B + ピ +D +E +F Sum 
4200 Q6 B6 D4 09 F6 D さ 2 54 24 05S BE OO QO BD 1B 4 :EB 
4210 24 05 BE 40 QO BD 1 さ 54 24 OS5 BE BO QO BD OB BZ s フ 71 
4220 D4 09 さ D さ D さ D さ D さ 5 日 6 16 Q さ さ 4 さ Q さ 1 9 40 Q0 iQ 
4230 10 QF BC F4 63 日 O 6 さ 日 O QAC BC ED 25 F7 35 BO 34 szSF 
4240 76 B6 D4 09 さ D BE Q1 EQ 10 AE B9 BOO QO EE 9 40 : さ さ 
4250 OO EF 9 OO OO EE B4 EF B9 4O QO 10 AF 1 BC QOS >:F1 
4260 EB 25 E5 BZ D4 09 355 F6 B6 D4 O1 H7 D さ 2 39 D :OE 
4270 O1 39 33 B9 00 QO 27 10 0 さ EB OO 64 QO OA QO O1 szBZ 
42B0 さ 4 76 ささ BD FF FA さ 1 DFFE5 1F 10 さ O BDPFF E6 iD6 
4290 6F BD FF E1 AS 日 4 25 06 6C BD FF D9 20 F6 BD Oa saAC 
42O E さ 日 1 さ 4 40 QC E1 25 EB 35 F6 さ 4 Q02 a6 BD FF C5 CA 
42BO BB さ O a7 AO 35 B2 EC BC さ 4 Q6 さ 4 02 6 AO さ D SB :SC 
42CO 49 5 49 1F Q1 5 04 さ 35 6 さ 4 10 BE OO QO 4D :S5Z 





+F 
8e 
BD 
DS 


+Q 
oO 


+F 
1 
9o 
B9 
p4 
ミ 1 
8e 
CB 
35 
Aa1 
a1 
07 


6 
Q1 


5o 
Q2 
ED 
ED 





よ ト 
ココ 
婦 
に <】 


dd 

4AQ0Q 
4a10 
4A2O0 
4 人 3 さ O 
4A40 
4a5O 
4a60 
4 人 7O 
4aBQ 








+F 
0O 
QQO 
Bo 
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QO 


D5 
QO 


+F 
QC 





ダン プ ・ リ スト 

| 49O さ 6 6C DD 9B FQ QO QQO OO さ F FF FF FF FF FC 0O 0O =:41 4FBO _FF FF FF FF FF FF 
| 4AAO QO QQO QO 7F FF FF FE QO OO QoO OO QQ OO 7F FF FF :FB 4F90 QO E7 E7 E7 C さ ビュ 
4QABO FE QO OO QO OO QO Oo FB oo OO 1F oo oo oo oo oo =:15 4FAO _OC さ QO OF FO 05 ao 
4ACO さ F FF QO QQ FF FC QO QO QO OO oo QQ 7F FE QQ Qoo :B6 4FBO DF FE aF F5 D5 aE 
4ADO QO _QOQ OO OO OO 7F FF FF FE OO 0O QO OO OO QO FF :7^ 

| 4AEO _FF FF FF OO OO QO O1 FF FF BO OO OO QO1 FF FF BO :FB 

4QFO OO QO OO FF FF FF FF OO QO OO FF FF FF FF FF FF :F6 

dd +O +1 +2 + さ +4 +5 +6 + フ + 日 19 + +B +C +D +E +F Sum 

4BOO FF FF FF FF FF FF FF FF FF FF FF FF FF FF F9 DB :C6 add +O +1 +2 + さ +4 +5 
4H1O さ B F1 C7 1E さ C 7C DR 9F 1E さ C 7B BF さ C 7 F1 DE :27 | 5QQQO 20 1 5 ミ 2B AD FF 
4B20 さ C 78 Q1 FO FB F1 ES BF 1F 1F OF BO QO OF DE ミミ :ED 5010 7E 2E Oo6 7E 2E Q さ 
4R さ Q C7 BF 1C 7B FO OO QQO OO さ F FFPFF FF FF FC oo Qoo :14 5020 さ C EE BF さ C F1 BEF 
4B4O OO OO OO 7F FF FF FE QO QO QO OO OO OO 7 0O QQ :F さ 503O 9a BD 52 29 BD 5o 
4BSQ 1E QQO QQ QQ QQ QQO QQ FB QQ QO 1F QQ QQO QQO QQ QQ : さ 5 5040 BD 6 B9 BD 5QO 4E 
4B60 さ F FF OO OO FF FC OO QO Q1 CO E6 46 QB 11 5a EB :B4 5O5Q さ 7 Be6 7F ミ 7 B1 7F 

| 4B7O EB 2B E さ FB さ F 7D FC さ 7 41 Q2 9Q 7E 22 41 BO 1C :2a 5O60 7C 7F さ 1 B6 7F さ 1 
4BBO さ 9 C7 E6 7F FF FF 7F FF FF さ F FF FF FF FF FE FF :18 5070 Aa7 さ 9 7C 7F 17 B6 
4B9O_FF FE FF FF FE 4F 7 1C さ 9 ヒ フ 7 E6 46 08 11 42 QB :7a 5oBO 10 BE 7C Do a6 a4 
4BQO 09 2B OO 09 90 41 さ 4 90 41 Q2 90 7F E2 4F B7 1C :F5 5o90 OS 10 27 oo E2 2o0 
4BHO _BO OO QO Q1 CS FF FF C ミ E7 F2 4F E7 FF E2 47 FF :3B 5QAQ BC 7D FC 23 DF 39 
4BCO 7F E2 47 FE 07 E2 47 EO QO 1F F ヨ OO OO OO 00 oo :CD 5OBO B1 QB 10 27 QO 91 
4RDQO BQ Q さ CO O1 CS FF FF ビ さ E7 F1 BF E フ FF E1 7 FF :7C 5QCO BD さ B BOF6 7F QD 
4BEO FF E1 日 7 FF 7Q QA1 B5 5E QF FF FF FO QO 7F FE QO :DE | 5ODoO B1 2D 10 25 oO 71 
4BFO QO _QO QO QO QQO QQ 0Q OO QS EF F7 CO Q7 DF FB EQ :6Q | 5OEO 20 BB a6 21 B1 2D 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー | 5OFO 3O QO1 BD さ 5 e7 aA6 
Sum: 3 さ E D1 さ 9 B5 F4 F4 BB CR 16 1 さ SE 1 さ 52 CC <Q F4 :17 | 

Sum: さ 9 FB F1 BF EE a4 
| 

Rdd  +O +1 +2 + さ +4 +55 +6 + プ 7 + 日 +9 + +B +C +D +E +F Sum 

4COO QO 1F FB OO OO 1F FB OO QQ oOo Oo Oo Qo Oo oo oO :2E add +O +1 +2 + さ + ォ 4 + ロ 
4C10 さ B 76 さ 1 C さ 47 FF 7F F1 SF FE さ F F 1F F2 OF FC :OB 51oo 26 17 ae6 BB 6O 1 
4C20 OB O4 Q1 04 5F F2 2F FD 2F FF 7F F9 1F 1E BF E2 :12 5110 QB QA6 B9 QQ CO 1 
4C さ O さ C 77 B1 FB 7F FF FF FD 7F FF FF FE さ F FF FF FF :90 5120 17 02 05 16 FF 7 フ 7 
4C4O FF FF FF FF 7F FF FF FF さ F FF FF FF 1F 1F BF E6 :97 51 さ O AaC 21 27 QC 31 2 さ 
4C5O 3B 71 B1 C さ 40 4D CE 51 41 C さ C4 BB OF OF F6 04 : さ 1 5140 6F A4 35 さ Q 16 FF 
4C60 DF FF FF FF 4E 2F F さ Q5 2 さ E1 DO 39 18 1F BF E2 :Q6 515O さ 7 5F aF 21 2o Q5 
4C70 OO _QQ OO QO QQ OO QO OO QQ QO QQ QQ QQ QO QQ QQ :QQO | 5160 さ C BD 5 28 BD 36 

| 4CBO DB DB DB DB AS Q5 AS5 a5 1 1 B1 B1 FF FF FF FF :oo | 5170 10 24 02 日 1 16 FF 
4C9O E7 E7 E7 E7 C さ CS CS ビ S OS aQ OB DO OF FO QC さ O :e ミ S180O FF 1B さ O 1F E6 22 

| 4CAO _QC さ O QF FO Q5 QAO OB DO DS aB aB DS DF FB AF F5 : さ 9 S190 さ 36 E2 AF 21 BD 53 
4CBO DF FB AF F5 D5 AB AB D5 QO QO OO QO OF FO OF FO :7C S1A0 B1 7F 2 さ 2 くさ 4C 7F 

| 4Eeo OF FO OF FO QO QQ QQ QQ QB 2 41 DO Q7 7E 7E EQO :7F S1BO 27 21 B1 36 27 3 ビ 
4CDO OR CO O さ 5O OD 9E 79 BO OQD 9E 79 BO Oa CO 0S SO :E2 S1CO 27 O1 39 BD 38 SF 





と コ 
ご 
どら 
トー 


>: ま コ 
こま こ 」 
いい 
らら 


ま コ 
に 』 
に 』 
ら 6 


ドコ 
| 
か リ 
に 】 


お 
山 
ユ 
G 


add 
4FOO 
4F1O 
4F2o 
4F さ oO 
4F4O 
4FSo 
4Feo 
|4F7O 





+2 
OB 


+2 


Q6 
Q さ 
さ 4 
8 日 
Q2 
26 
1B 


+ フ 


EZ 


キア 
CC 
B さ 
62 


DB 
CC 
ささ 
の を だ: 
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B4 
41 
oe 
0 さ 
B1 
FF 


+F 
Q1 
D8 
CC 
F さ 
6o 
Q1 
DC 


ndd 

54Q0Q 
5410 
5420 


」 54 さ 3Q 


5440 
545QO 


LS4eQ 


+1 
5o 
SQ 
さ 3Q 


Qoo 
さ 1 


+ さ 
さ 5 
BD 
35 
20 
Qoo 
5 ミ 
FF 


+4 
Q2 
ミ フ 
Q2 
4F 
さっ 
1 
Cg 


+ ア 
BE 
(に 
さ Q 
20 
02 


1O 


So 


3 日 


+F 


QQO 
55 


選 


04 
2 
oO 
BE 
12 
QC 


























470 BE 10 12 B6 0Q5 ED 39 EE C6 FO BE 15 12 6 07 BD :D1 | 
54BCO さ A 6F さ 1 BD FF BA BE 17 12 B6 06 BD さ B 9CC63D:F7 | 
5490 B6 Q7 BE 1B 12 BD 3Q 6F C6 64 B6 7F QC さ D F さ 7F :CB | 
4AO QB FD 7F QB BD さ 9 74 4F BD さ 6 aD C6 64 B6 7F QC :5QO 
54BO さ D 1F O2 BE 1D 12 6 OS BD 39 92 BE OO QO BED 5S =:Ca 
| 4CO 1 BD 5 さ 1 BD 5Q Qa BE QO QQ BD 5 さ 1a ED 56 EB :QE 
| 54DO BE QO OO BD 5 さ 1 BD 50 10 BE 27 10 BD 5 ミ 1 16 Da 
54EQ FH 4C さ 2 62 Bo6 Q1 17 FE さ Q さ 4 1O BE QQO QO BD 53 :B6 dd +O +1 +2 + さ +4 +5 + ら 6 +7 +B +9 + 人 8 +H +C +D +E +F Sum 
54FO 1 BD 5 さ 1 35 10 6 FF BD さ 7 21 4 26 Fa 7 7F :B6 57OO OO 64 BD 5 さ 1Q 4C B1 OB 25 F2 BD 3 さ a 49 7F 7F 16 sCE 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 71O 7F 7F 14 BE 15 18 BF 7F Q2 BE QO QQ BF 7F QQ BF :98 | 
Sum: ささ 14 67 EO 5A 7 7 24 6F BS EO SF 6O DD 55 98 :C5 5720 7F QO6 BD 57 さ C さ 9 BE 15 18 BF 7F O2 BE OO QQO BF s56 | 
57 さ Q 7F OO BF 7F 06 7F 7F 16 7F 7F 14 39 BD さ Q 57 BD :2D | 
| 5740 さ Q さ F BD さ 7 46 BD 5 さ E5 BD さ C Q7 BD 3CF7 ED SB sBD 
Add +0 +1 +2 キミ +4 +5 +6 + キ フ +B +9 + +B +C +D +E +F Bum || 575O DB BD さ B FB BD 39 BS ED 39 74 BD 39 2E 39 7F 7F 09 
5500 OC 10 27 QO C6 ED <B DB BD 3B 1E BD さ B さ F ED 3B :18 || 5760 OF BE OO QO BF 7F OO BF 7F 06 BEF 7F OB 1F 10 B6 1 
| 5510 5Q BD さ 9 41 BE QO OO BD 5 ミ 1 BD 53 1 BD 5 ミ 1 :9 さ 5770 Q4 BZ 7F QC B6 Q5 EZ 7F 12 6 QOa BZ 7F 1 さ F7 7F se | 
5520 BD 7 26 10 BE 7C DO 6D a4 2B Q5 AE 21 BD さ 6 D9 :QO 57BO 14 F7 7F 16 F7 7F 2CF77F 2F Be OF BZ 7F 3O 7F 61 | 
5 さ O さ 1 2 さ 10 ヨロ 7D FC 23 EF BD 5 E5 6 0Q さ ED SB CE :BF 790 7F さ 9 7C 7F 9 8D OF 6 OF B7 7F 2D BE 15 18 BF :FA ] 
5540 BR BO _BD 3E CE BD <9 2E 16 FQA ES 2 28 2 2 20 :aF | 5Z7Q0 7F 0Q2 BD 57 3C 39 34 06 B6 7F 39 B1 0 24 2B 86 :OB 
55O 47 41 4D 45 20 4F 56 45 52 20 2 2 2 2 QQO 2 6 | 呈 7BO 1E B7 7F 2 さ 6 5a BZ 7F 32 6 2B B7 7F 27 6 Qa :SAa 
5560 2 2 2 2 2 20 2 2 2 2 2 人 20 2 20 20 2 :AO 57CO B7 7F 25 Be 5O B7 7F 2E Be 14 BZ 7F 24 B6 14 BZ7 sDA 
| 5 フ 7Q 2 2 OO 2 20 CB BC DE AE 2D C6 20 CB CF 20 さ D :BB 7DO 7F 3 CC QO 2 FD 7F さ a 35 6 1 Q5 24 17 B6 19 :7C 
55BO SE さく OO 2 20 CC C2 BS 20 20 20 20 20 20 20 さ D =:19 57EO B7 7F 2 さ B6 46 B7 7F 32 B6 23 BE7 7F 27 CC QOQO 1E =7D 
| 5590 さ E さ 2 OO 2Q 20 B2 BF B6 DE BC B2 20 20 20 20 3D :EA 7FO FD 7F さ a さ 5 B6 8B1 Q7 24 1C B6 さ 7 B7 7F 32 Be 1B sFF 
旧 還 OKE 太 光 ] 計 OO2 陳 ら の BE 症 ビ ら 間 の 須 日 の の OR らら O2OR の OO まく D 治 11B 人 上 
55BO さ E さ 0 0O 50 55 5 さ 4 20 27 5 さ 27 20 4H 45 59 20 sz98 Sum: BC CB 49 42 EF 21 B4 52 18 28 69 CF F9 14 32 E4 90 
55CO 54 48 45 4E 20 5 ミ 54 41 52 54 OO ミ 4 02 6 QA BD :e6o 
55DO 5O 19 35 02 BE QQO QQO BD 53 1 BD 53 1 BD 5O QD :9C | 
55EO BE OO OO BD 5 さ 1 BD 5 1 BE 7F QB BC さ C EE 2 さ : さ O Add  +O +1 +2 + さ +4 +5 + ら 6 + ブ + 日 9 + 人 Aa +B + ビ +D 4E+F Sum 
5FO Q5 BF 3C EE 2O 12 BC さじ F1 2 さ Q5 BF さ CF1 20 0B :45 5BOQ B7 7F 27 B6 QF BE7 7F 24 CC OO 19 FD 7F Sa B6 14 :B1 
(人 ニ ーー ニ ニー ミニ ニー ニー ニジニ ニニ ニニ ーーーー 5B10 B7 7F 2 ささ 5 B6 1 Q9 24 11 B6 2D B7 7F 32 6 14 :BB 
Bum: 9E 42 BO 7 6D 44 FB 54 さ B E2 1C RO B1 DB 16 76 : 人 2 5B2O BZ 7F 27 6 OQ E7 7F 24 35 B6 1 QB 24 QB CC 0O =:B6 
5B さ O OF FD 7F さ Q 35 6 81 OF 24 12 CC QO Q1 FD 7F さ :C5 
5B40 B6 2B BZ 7F さ 2 6 さ 2 BZ 7F 2E 35 6 6 1E B7 7F :C フ 7 
dd +O +1 +2 + ミ +4 +55 +6 +7 +B +9 +a TB +C ビ +D +E +F Sum 5B5O さ 2 B6 OQ B7 7F 27 B7 7F 23 6 28 BZ7 7F 2E 35 86 =45 
5600O BC さ C F4 2 さ Q3 EF SC F4 さ 1 BDFF SBE QE QB B6:iSE 5B6Q OO QO OO QO QO QQ QQ QQ QQ QO OO 00 QO QO _QO _ 00 iQO 
610 06 BD 3B 9C BE QOE QD BD 3 さ ヨ 9C さ 1 BD FF 2D BE OE :s7 呈 B7O OO OO OO QO QO QO OO QO QQO OO OO QQO QO QO QQO _ 00 giO0 
620 QC B6 Q7 BD さ 9C 86 Q4 BE 10 10 さ 1 BD FF 44 BD :20 5BBO OO OO OO QQO QQ QO QQ OO QQO QO OO QO QQO QQO QQO 0Q0 gi0O 
56 さ O さ B 9C さ O O1 さ 1 BD FF 4B BD さ B 9C 3O O1 さ 1 BD FF :BC 5B90 OO QO QO QO QQO QQO QO QO OO OO QO QQ QQ _QO QO 00 giO0 
5640 52 BD 3B 9C さ 1 BD FF 5E さ O Q1 BD SB 9C BE QO QO 4B BAO OO QO QO QO OO QQ OQ QO QQ QQ QQO QO QO QO QO 0Q szOO 
5650 BD 5 ミ 1Q BD 5 ミ 1 BD さ B C1 1 さ Q 26 2B BD SO 16。s2F BBO OO OO OO QO QO QO OO OO QO OO QO QO QO QO QO _ 00 OO 
5660 さ 1 BD FF 4F BE Q5 17 6 Q7 BD 3B 9C BED 38 C1 B1 OB BCO OO OO QO QO QO QQ QQO 0O QQO QQ OO QQO QO QO QQO QQO iQO 
567O 53 27 2C B1 73 27 23 日 1 さ O 26 F1 17 ES CB 17F ヲ :B1 5BDO OO QO OO QO QQ QQ QQ QQ QQ QO QO 00 QO _QO OO 0QO giOO 
6 ヨ O 92 BE Q5 17 20 BE 2Q.E4 1 さ 1 27 QE B1 32 27 QF :EE 5BEO OO QQO OO OO QO OO0O QQ QO QQ QQO QQO QQ QQO QQ QQO QQ i00 
5690 B1 33 27 10 日 1 2 27 11 20 BC BD ささ SF 20 17 BD :D4 d O 
6QQO さ Q 49 20 12 BD さ 5Q 20 OD BD 3B BO B6 7F QD B4 :64 
6BO 0Q7 BD さ 95 20 aQO 16 F9 6F 7C 7F さ 6 10 26 F9 B1 :E2 
6CO BD さ 65 39 QO 7C 7F さ 4 10 26 F9 5 7C 7F 33 B6 i7C | ーー 3 Se 。 








を 基本 と し て 作っ た の で ほとん ど 同 じ で す が CLEAR の と 
き に \Out of Memory” に な ら な いよ うに し まし た . 
FM-7 の 則 RAM は RESET し て も 書き か わら な い の で うっ 
か り RESET し た と き &H7F20 以 下 に 
B7FD 0F 1A450 4F 4D 8E 80 00 
を 打ち こみ &H7F20 か ら 実 行 し て くだ さい . 
この プロ グラ ム は 個人 の 機器 で 個人 で 行なっ て くだ さき 
閉 作 権 問題 が あり ます の で 加 し か ら ず . 


F-BASIC Ver.1.0 を FM-7 で 


較 大 森 智 
*FM8 ご FM7 マシ ン 語 コン バー タ ” が 発表 され て いま す が 
実は その よう な も の を 打ち 込ま な く て も … と いう 話 が ある 
の で す ( つ いで に マシ ン 語 コン バー タ で は , BASIC _ROM の サ 


7E 89 12 


注 1. 
Wez 


プル ー チ ン を 使わ な けれ ば マシ ン 語 コン パチ と 明記 され て い 
まし た が , サブ ・ シ ステ ム の ROM も 違っ て いま す . よっ て こ 
こ に 発表 する や りか た で も “FM ラリ ー” な ど は 走り ませ ん )-. 
その 方法 は , ず ば り FM-8 の BASIC を FM- 7 で と いう わけ で 
93 

安全 の た め に Clear,& H9FF を し た あと 下記 の プロ グラ 


ム を FM-8 で 打ち 込み EXEC を H7FOO0 とし. SAVEM "CAS0: 


FMSBASIC/。 &HA00, &H7F40, を H7F20 と し て くだ さい . 
そこ で FM-7 で LOADM CAS0:7,R と すれ ば 走り ます . 


カセ モット の ポー レー ト が FM-7 を 倍速 の まま に し て お く 
と 約 2400 ポ ボー と な り ま す . 私 は 、 FM データ ・ レ コー ダー を 使 
っ て いる の で , 2400 ボ ポー で, - 部 プロ グラ ム を SAVE し て い 
ます . 1600 ボ ー と の 間 と は 互換 性 は あり ませ ん / 


マシ ン 語 ダン プ ・ リス トコ ーー 





+a +B + ビ 
プ E OO 26 
OO QO 
9 oo 
Q0O 


+E 
39 Q 
QQ0 0 
BQ 
9Q0 


5 + ら 6 + ア 
OO EZ 
oo 0 


+B 
Bo 
oo 


+ ワ 
8C 
QOo 


+O 1 +4 
OR 9 
O OO Q O oO 
FD O GOQ 
oo 


7E 
OO 


aO 07 7E 
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198X 年 。 アメ ー バ ー 状 の イ ン ベ ー ダ ー が 地球 を 弄 
つの MG さ の 銃 や 刃物 は 彼ら の 体 を 突き 抜け は する が 
彼ら に で きた 傷 は すぐ に ぶさ が っ て し まう . 地球 人 の 
武器 は 役に立た な い の か . そん な ある 日 。 何と あの キ 
則 ンチ ョ ルン に 彼ら を 抹殺 する カカ が ある こと が わか っ た 
| 地球 防衛 軍 は キン チョ ルン の 人 性能 を 数 10 倍 アッ プ さ せ 
則 た キン チョ ルン を 開発 し 。 あな た に , 侵略 生物 を 抹 
則 殺す る こと を 命令 し た . さあ キン チョ ルン を 持っ て 出 




















Pa2o2met 


も し, あな た が FM-8 の オー ナー で 
ョ イス ティ ッ ク ( 製 品名 , JOY-8) か 富士 音響 
ターRAM の ジョ イス ティ ッ ク を , お 持ち で し た ら , ソ ー ス ・ 
プロ グラ ム と デー タ ・ リ スト を 入れ て くだ さい >。 まだ た ジョイ 
ステ ッ ク を 持っ て な v FM-8 の オー ナー か FM-7 の オー ナー 
の 方 は ソー ス ・ プ ログ ラム を キー 版 の 変更 り ス ト に し た が 
っ て 入れ て くだ さい .、 プ ログ ラム の セー プ は SAVEM“K 





INCHO" , を H3800, を H617F、&H3800 で 行っ て くだ さい 3 


少し 長め で す が , DISK BASIC 下 で 使 る よう に する た だ ため に 
この アド レス に な っ て し まい まし た . スタ ー ト 番地 は &H 
5000 で す . 


キン チョ ルン 噴 肥 











キン チョ ンマ ン は 3 人 、 インベーダー は 1 面 4 体 。 2 面 
5 体 , 3 面 6 体 , 以下 これ の 繰り 返し で す . ジョ イス テッ 
ク お よび キー の 操作 は 図 1 に 示す と お り で す . あな た は イ 
ン ベ ペー ダー を 人 遊 け な が ら 4 箇所 まで わな を 仕掛 けら れ ま す . 
わな は 時 間 が た つと 自然 に 消 を ん ます . 

キン チョ ルン ・ ガ ス は ある 程度 の 時 間 ふ 、 き か け な い と き 
きめ が あり ませ ん . し た が っ て ちな に か か っ た イン ペー ダ 
ー の み に 対 し て 有効 で す . 決し て 自由 歩行 し て いる イン ベベ 
ー ダ ー と 張り 合わ な いで くだ さい . 人 暫 け る だ け で す .。 その 
面 で の イン ペー ダー を 全部 抹殺 すれ ば その 面 は 終了 し ます . 
面 数 が 多く な る と わな の 有効 な 時 間 が 短く な っ て いく の で 
それ だ け 難 し く な っ て いき ます . 

ゲー ム の コツ は 曲がり 角 の 中 心 に あな を し か け , あま り 
広い 範囲 に わな を 分 散 し な いこ と で す .。 あな み に か か る の は 
イン ベー ダー だ け で は あり ませ ん . キン チョ マン も 自分 で 
仕掛 けた わな に は まる と 身動き で き な く な っ て し まい ます . 
そう な れ ば 道 は 2 つ に 1 つ ,。 イン ベー ダー に 食わ れる か ね わ 
な が 解け る まで も が く か で す . 作者 は ゲー ム を 作る わり に 
する の は 下手 で 2,000 点 ぐら いし か いき ませ ん . 





ジョ イス テッ ク を すでに 持っ て いる 人 に も , また これ か 


あえ な い 最 期 





買う 人 , 作る 人 に も 役に立つ お まけ を 付け ます . それ は ク を 使っ た も の を 子 定 し て いま す . 期待 し て くだ 
\ ザ ・ キ ュー ティ ー” 


を ジョ イス テッ ク 版 に 改良 する た め 





の リス ト で す . リア ル タ イ ム ・ ゲ ー ム の 苦手 な FM- 8 で す 参考 文献 
ジョ イス テッ ク さ え そえ あれ ば 百人 力 / 私 は ジョ イス テッ 1) “拡張 民 コ ン パ イラ ^ 工学 社 FM-8 活 用 研究 
ク の 操作 の 良さ を 一 人 で も 多く の 人 に 知っ て も らい , 楽し 2 ンマ ッ クマ ンズ 


ん で 欲し いと 思い ます . 次 回 発表 の ゲー ム も ジョ イス テッ 3) “キュ ー テ ィ ー ち -Oj83 年 1 月 号 








キン チョ ルン マン の 方 向 


キン チョ ルン owa 刀 K、 
ス 
お よび リプ レー キン チョ ルン ・ ガ ス の 噴射 













キン チョ マン の 方 向 

















コン バイ ラ ・ ソ ー ス ・ リ ス ト 





10 " ( 氷 ※ 床 TNITTALTZE ネネ ネネ ポポ) 


0 CUNST DATA=*$ さ BOO 。 MHR に = も 2 つ 000 、ERDR= ま さ F60 ェ R ロ =DQTR』 GRDR=ERDR+ 180 ェ MRDR=GRDR+1 
BO*43TRRD=MADR+18BO*4: DERD=TRRD+90: SND=$47B0 
30 『" MRE=MURK' ょ ELX= ニ MKE+ 1H さ 9。 ELY= ニ ELX+10。ETU=ELY+10sEDQA=ETOU+10』:EDD=EDQ+10: TRX=ED 


D+43 TRY=TRX+4』HISC=0』 や CHR ま (12) 
40 ” INIT:T=24』 ロ =10:ELN=2』 DX=O』DY=0sDTU= ニ Oi DLP=O ェ DLF= ニ Os は BX= ニ 0』GY= ニ 0』 GLP= ニ 0 TRN=0』X0=O 
5O * YO=Oi X1=0 ュ Y1= ニ 0 X つ = ニ 0』 Y2= ニ Oi X さ =0j Y さ =0 ェ MM=O ェ KK=03 SCRE=O ェ BAN= ニ O EXX=O 


60 ” TRLH=100』 MDIG= さ 

70 * (XX 玉 SBCREEN INITIALIZE *** ネ **) 

Bo * DADR=WADR+1BO: DPUT[ 49。2 さ 。01 

90 『* LINELO。0。551 199。0。5] 

1oO * CL=7』 LUCE さ 5、 さ ] ミ 2"SCURE" LUC さ 5。7] ミ 2"HI-SC"sLUCE さ 7 。 1 さ ]』2MDITBi LUC[ さ 5 15] ェ 
?"BCENE" 

110 "(ネネ ポポ MDRK ARER INITIALIZE ** ネ ネネ ) 

12o * FDR 1=O TD 9jELX: 1)=0jELYs 1) =OiELPs 1) =OiETO: 1) =OiEDA: 1) =OiNEXT 

13O ADDR= ま 6A00』 CPUKE ADDR。* ま O0。 ま 00。 ま 00。 ま 4 日 0O 


140 : AaDDR=$6QOB: CPUKE ADDR。 ま OO。 ま OO。 ま O1 。 4 日 。 ま OO 

150 * ADDR=$6Q10:CPUKE ADDR、*$OO。OO。 02。 4 日 OO 

160 * ADDR=*6Q1B:CPUKE ADDR。*OO。 ま OO。 ま 0 さ 。 名 4B。 OO 

170 "(XX** MAIN LUOP ネネ ネネ *) 

180O "START:BQM=GQM+1: ELN=ELN+1 : IF ELN>5 THEN ELN= さ : TRLH=TRLH-5: IF TRLH<5O THEN T 
FRLH=100』FTFT:LDPL さ 5。 16]i 2# さ 。 BaN 

190 "START1:TF MDIG=O THEN LOCL5。14]:?"BRME VER PUSH RED BUTTON" 

2oo > IF SCRE>HISC THEN HISC=SCRE:FT』LUCE さ 5。4]3 2" "iLUCES5。 日 ]: 2#4。HTSC,"O 


210 "START23CDDE $ さ 4。* ま 1 日 。 ま B6。*FD 、 ま 1F 、*B 日 も BE 、 ま ら 6 人 も 10。 ま HBD 。 まさ 。 まさ じ 。 まさ 。 ま 1: ロ =PEEK( 
*6Q14) :TF DO THEN GODTD INIT:ELSE BDTU START2FI:FI 


220 ” FDR 1=O TD 47』FDR J=O TO さら 6』DELN=ELN 
23O ” ロ =RD: エ +J*4 日 ) : IF ロ THEN BDX1[T。J]』FI 

240 "NEXTiNEXT 

25O * FOR I=O TO 1B さ 9:WKE: 1 エ )=OiNEXT 

26o FDR I=O TD 9j』ELX: 1)=223ELY: 1) = さら 6 EDAs 1 ) =O:EDD: 1) =10:NEXT 
27o DX=22: DY=6:DT0=1: DADR=GADR+1BO: DPUTFDX 。DY 、M]:KK=O 

28o FOR I=O TO さ 』TRX: 1) =0j TRY: 1) =OiNEXT 


日 
日 
日 
29O "LODPiFUR LP=O TO ELN 
さ 300 * X=ELX s LP ) 3 Y=ELY :LP) 3 XX ニ X ュ YY= ニ Y 

日 

日 

日 

日 

日 


さ 10 GEDD: LP ) : ロロ +1 ITF ロッ >=10 THEN Q ロ =10F1iEDD:i LF ) = ロ 
さ 20 =EDA:LP) :s IF G THEN GOTO EXTiFI 

ささ 0O ロ =WKE : X+Y*※4 日 ) : IF ロ THEN BOT LOOP さ 』:F エ 

さ 40 ELF=RD: X+Y*4 日 ) : ロニ ELF 

さ 5O IF Q ロ =1 THEN GUTU LOUP2sFI 


さき 60 "LOOP 1: ETO: LP ) =RND (4 ) 
さ 70 "LUUP2』QQ= ニ ETO: LP) : XX ニ X』 YY=Y 
日 


さ Bo IF QQ=O THEN YY=YY-1 
39O * ELSE IF QQ=1 THEN YY=YY+1 

400 * ELSE IF CDQ=2 THEN XX=XX-1 

41o * ELSE IF QQ= さ THEN XX= ニ XX+1 

420 * FTiFTiFIiFI 

430 * ELF=RD: XX+YY*4 日 ) : ロ =ELF 

440 * IF ロ =O THEN GBDTD LDDP1:FI 

450 * ETO:LP) =QQ 

460 * LDP さ 』 DADR=$ さ 760 

47O * DQDR=EADR+90*ELP 

4BO * ELX:LP) =XXELY:LP) =YY 

490 * BDX1[X。Y]: DPUTE XX。YY。] ェ MY=1 

5oo * IF BLP=1 THEN IF XX=BX AND YY=GY THEN Q=EDD:LP) : = ロー2 EDD: し PF ) = ロ sFT ュ FI 


510 * TF G く =O_THEN EDAzLP) =1 sELX:LP) =0』ELY:LP ) =Os SDUND[ 17]: SCRE=SCRE+GAMs LOCE 
さら 5。 4] 24。 SCRE。 "Os DELN= ニ DELN 一 1 。 TF DELN く O THEN NMM=Os GUTD STQRT:F1T ェ FI 

520 "EXTiNEXTi MM=O』 IF ELP=O THEN ELP=1 :』ELSE ELP=O:F エ 

530 "DIBi X= ニ DX 』 Y= ニ DY 3 XX=DX 』 YY=DY 

40 * TIF DDQA THEN GOTU DEXTiFI 









55O * CODE * さ 4。*18。$*$B6。* ま FD 、 も 1F 。 ま B 日 。 ま BE 。 もら 仙 。 も OO 、$BD 。 まさ 、 まさ じ 、 ま BE 、 ま 6 。 も 0B。 ま BD 
560 * CODE *F さ 。$ さ じ 。*BE 。 も 6 。 10。 も BD 、 まさ 。 まさ じ 。 日 E 。 ま ら 人 。 ま 1 日 生 BD 、 まさ 。 まさ じ 。 を さら 1 日 
570 "  KY1=FEEK(*6QO4) :KY2=PEEK ( ま $6QOC) : KY=PEEK ( ま 6Q14) : IF KY=O THEN BOTU BUS』FI 
Bo * IF KY1<5O THEN KY=Oi YY=YY-1 

59O : ELSE IF KY1>200 THEN KY=1: YY=YY+1 

600 : ELSE IF KY2<5Q THEN KY=23 XX=XXー1 

610 * ELSE ITF KY2>200 THEN KY= さ 』 XX= ニ XX+1 

620 : ELSE GDTO DEXT 

630 * FIiFTiFIiFI 

64O * DLF=RD: XX+YY*4B) 

650 * IF DLF=QO THEN GOTO DEXTiF ェ 

660 * 1F DTD<>KY THEN DTD=KYs XX=DX』 YY=DY:ELSE DTD=KY:FI 

670 *: DADR=GADR+18O*DTO 

6BO * 1F DLP=O THEN DLP=1: DADR=DQDR+9O3ELSE DLP=O ェ FI 











IZ 人 ) 





コン バイ ラ ・ ソ ー ス ・ リ スト 














690 * 1=0s WHILE 1 く <= さ 』X1=TRX: 1) 3 Y1=TRY: 1) : IF X1=DX AND Y1=DY THEN XX=X:YY=YiKK 
=13FTi エ = エ +1:MEND 

700 ” BOX1LX。Y]:DPUTLXX。YY。MN] 

710 "DX=XXiDY=YY 

720 "DEXT:JUDGELDX 。DY。ELN] 

7 フ さ O "BUS』KY=PEEK (6Q14) 


74o TF KY THEN GDTO BEXT:FI 

75o * XX=DXiYY=DY 

7eo * IF DTO=O THEN YY=YY-2 

77o * ELSE IF DTD=1 THEN YY=YY+2 

78o * ELSE IF DTD=2 THEN XX=XX-2 

79o * ELSE IF DTD= さ THEN XX=XX+2 

BOO * FT』FTiFTiFI 

B10 * D=RD: XX+YY*4B) 

B2O * IF ロ =O THEN BOTO GEXTiFr 

BSO * DADR=MQDR+18O*DTDi DPUTEDX,DY, MM] 
B4O * DADR=DADR+90』 DPUT[E XX。YY。MM]: SDUND[ さ 4] 
B5o * BX=XX』GY=YYi BLP=1 』 BDTD TRAP 

B60 *GEXT: IF GLP=O THEN GBDTU TRAPiFI 

B7O * BOX1[GX,GY ]: BLP=O 

BBO *TRAP:KY=PEEK (6Q1C) 

B9O * IF KY DR KK THEN BUTD TEXTiFr 
900 * FOR I=O TO さ 3 

910 * X=TRX: 1 ) :Y=TRY: T) : ロニ MKE: X+Y*4 昌 ) 
920 * 1F Q=O THEN TRN=TiSM=1:F エ 

93O * NEXT 

940 * IF SW=O THEN GUTD TEXTiFI 

950 * XX=DXjYY=DY 

960 * IF DTO=O THEN YY=YY-2 

970 ” ELSE IF DTD=1 THEN YY=YY+2 

980 * ELSE IF DTO=2 THEN XX=XX-2 

990 * ELSE IF DTD= さ THEN XX=XX+2 

1ooo > FTiFIiFIiFI 

1010 * ロ =RO: XX+YY*4B) 

1020 * IF ロ =O THEN :SM=OGDTU TEXT:FI 
103O * 1=Oi WHILE 1 く = さ : X= ニ TRX: 1) 3 Y=TRY: 1) 』TF XX= ニ Xs AND YY= ニ Y THEN BUTD TEXT:FTi1= 
1+1:MEND 

1040 * DaDR=TRAD 

1o5o > DPUTEXX。YY。MM]: TRX: TRN) =XXi TRY: TRN) =YY 
106o * MKE: XX+YY*4B) =TRLH: SM=O 

1070 TEXTs 

1oBQ FDR I=O TO さ 


日 
1090 * XX=TRXs 1 ) s YY=TRYs 1) 
1100 * =MKE: XX+YY*4 日 ) sIF =O THEN GUTU TNEX』FI 


1110 =Qー 1 』 MKE: XX+YY*48B) =Q 
1120 * IF Q=O THEN BOX1LXX,YY]i TRX: 1) =0』 TRY: 1) =O』KK=O』ELSE DADR=TRADi TPUTL[ XX 。 
YY。MM]i MM=1:F エ 


113O * TNEX』 NEXT: MM=O 

1140 * TOUTiJUDGEEDX。DY 。ELN] 3 GDTUD LUDP 
115O *" ( 氷 ※※※ ネ GUBRUUTINEG ネネ ネネ) 

1160 *JUDGE 』XO=X1  』:YO=Z2ー1 


1170 X1=%1  』Y1=%2+1 

11BO * X2=%1 1 : Y2=X2 

119O * X さ =%1+1:Y さ =2 

1200 * FDR LP=O TO % さ 

1210 ”* XX=ELX:LP) : YY=ELYiLP) 

1220 * IF %1=XX AND 2=YY THEN GOT ロ DETHsFI 
123O * IF XO=XX AND YO=YY THEN GDTO DETHiFI 
124O * IF X1=XX AND Y1=YY THEN GOTO DETHsFI 
1250 * TF X2=XX AND Y2=YY THEN GUTU DETHiFI 
1260 * IF X さ =XX AND Y3=YY THEN GUTO DETH』FI 
1270 ”* NEXT 

12BO * RETURN 

1290 *DETH: SHUNDLO]: DADR=DEADi MM=0』 DTB=MDIG-1 』 LUCE さ 7。 1 さ ]』?MDIG 
13oo * BDX1FDX。DY]: DPUTEDX。DY。MN] 

1310 * FOR 1=O TO 21000』NEXT 

132O * GOT0 STaRT1 

13 さ O * SUUND』 SD=%1 :LO=SND : SD ) : SD=SD+1 

1 さ 40 * FOR J=O TD LO 

135O * L1=SND: SD ) : L2=SND: SD+1 ) 

1360 * FOR 1=O TO L1 

137O FOR MA=O TO L2iNEXT 

13BO * PDKE$*FDO さ 。 $BB1 

139O * FDR Wa=O TO L2iNEXT 

1400 * PUKE*FDO ミ 。 1 

1410 * NEXT:』 SD=SD+2 


1420 * NEXTi RETURN 

14 さ 0 *(* GRAPHIC SUBRDUTINES *) 

1440 "DPUTi X1=%1 ま 123Y1= ニ 2*5s PUTLX1、Y1 。X1+2 さ 。Y1+9。DADR。90。% さ 。 0] RETURN 

1450 "TPUT』X1=X1*123Y1=X2*5sPUTEX1。Y1。X1+2 さ 。Y1+9。DADR。 0。% さ 。2]: RETURN 

1460 "BUX1 3 X1=%1*123Y1 ニ 2 まし LINEL X1 、Y1 。X1+T-1 。Y1+ ロ ー1 、O。0]sRETURN 

147O “PUT: IF 7 THEN HLTL]: DDR=$FCB2 ェ CPUKE DDRj$1E。 ん 1 間 。 2 提 。 さ 昔 。 4 共 。O 日 。903 SUB 
[]:RETURN』FI 

14BO * GE=X6-1:HLT[ ]』QDDR=*FCB2 ェ CPUKE ADDR』 ま 1E。 ん 1 社 。 2 社 。 さ 社 。 4 社 。0。 日 。90』 DTD ニョ 
FDR MKI=O TU QE:ADDR: MKI)=DTD: MKT) NEXT』 SUB[ ]: RETURN 

1490 "LINE:HLT[ ]: ADDR=*FCB2 ェ CPDKE ADDR。 15。 ん 6。 5。 1 社 。 2 香 。 さ 社 。 4 昔 3SUBT ] RETURN 
1500 *LOCiHLTL ]: DDR=$FCB23 CPDKE ADDR, さ 。5。 ま 12。 ん 1 。 2。 和 11 。 ビ し L+$BO』 SUB[ ] : RETURN 

1510 "CON:HLT[ ]: ADDR=*FCB2』 PDKE ADDR。 1 。0。40。25。0。25。0。 1 03 SUBL ]』 RETURN 

1520 *HLT:CDDE *B6。 ま FD 。 も 0 コ 。 ま 2H。 ま FBsPUKE *FDO5。*$BO CDDE *B6。$*FD。 も 05。 も 2。 ま FE RETUR 
N 

15 さ O *SUB:PDKE *FDO5。O』RETURN 














ーー リス ト EEEE 光 = 





Add 

さ BoQ 
さ 3B10 
さき 20 
3B30 
さ B40Q 
さき B5O 
3860 
さ 3870 





+4 + 己 +6 + プ + ヨ +9 + +B + ピ ビ +D + せ E+ さき 88O 
OO _QO _QO OO QO QO OO OO OO QO 00 oO 389O 
GO _ oO Qoo_ oo Qoo oo oo oo oo Qoo oO oO 3BO 
oo Oo oo oo oo oo oo oo oo oO 00_ 00 さ 3BBO 
OO _Q0O OO OO _QO 0O QO OO 0O OO _ 00 OO さ 38CO 
QO OO QO QO OO QO OO OO OO OO QO OO 3BDO 
OO_ OO OO OO-OO 0O OO OO OO _QO OO 0O さき BEO 
QO OO _Q2 O1 O1 0Q1 QO2 O1 O1 O1 QO1 01 さ BFO 





QO OO OO _QO OO _ 00 02 O1 O1 O1 O1 01 
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ISBum: 02 02 OD O1 O1 Q1 Q4 O1 O1 O1 OD 02 02 02 02 02 =: さ 32 RBS OO OO_ O1 OO OO 00 OO OO _O1 OO OO_ OO_ OO_ 00 00 00 02 


Add  +Q 二 1 +2 + さ 3 +4 +5 +6 + フ + 419 + +H + ビ +D +E+ ォ F 
さ 900 00 OO Q1 QO QO 0Q0 OO QQO QO OO 0O1 OO QO OO OO 0O 























さき E20 OO OO OO OO _Q1 OO OO OO OO _QO O1 QO 0O0 OO OO QO :02|14360 CC CC 0O さ ささ ささ OO CC CC OO ささ ささ OO QOC Cc 00 0S :Da 























4450 FF FO_Q6 さ 1 FB 0O3 FF FO OO FF CO OO 7F CO 0 フ 7 FF :14 4690 OO OO OO _QO OO QO 0O OO _QO_ 00 QO_QO_ OO 00 _ 00 0O kiO0 
4460 CO _OO FF EQ OO0 EO EO OO OO 00 QO FF CO OO QO FO iQE 46RO OO OO OO OO 0O OO 0O 00 OO QQO OO OO OO Q0 0Q _QO si0O 
4470 QO QOO 7B OO O0 FO 70 FF CO FB 7E QO FB 7Q 0O FB :6D 46BO OO OO OO 00 00 0QO 00 00 0O 00_ 00 OO 00 Q0 QO OoO skOO 
44B0 FF EQ FB EO EQO Q3 E3 EQO OO FF CO 03 FF FO 06 さ 1 :4 紀 46CO OO OO OO0 OO QQ0 OO OO OO OO 00 QO _QO OO _ 00 OO 00 ig00 
4490 FB 0Q3 FF FO_ 00 FF CO FB 7F CO FF FF CO FB FF EO 75 46DO OO OO _ 00 00 OO OO 0QO 0QO 00 00 _ 00 00 QQO_QO_QQO_ OO isOO 
44Q0_ FB EO EQ 03 ES EO さ O OO OO CC CO QO さき さき QQO CC ieC 46EO OO OO OO OO 00 00 00 00 QO OO OO _QO OO OO 0O 0O si0O 
44BO_CC CC ささ ささ ささ CC CC CC ささ ささ OO CC CO OO 30 0QO BZ 46FO OO OO OO 5Q 37 BQ QO BB O1 CZ7 OO aF 0O1 BO QO_ 03 ki2E 











13O 
140 
15O 
16O 
190 *START1: IF MDIG=O THEN LUCE5。14]』?"BRME VER HIT [ R ] KEY" 
210 * START2D=KEYE ]: IF ロ =B2 THEN BOTU INITsELSE GUTO START2sFIiFI 











SS5O 

5e0 * 

57O * KY=KEY[ ] 

58O * IF KY=56 THEN KY=Oi YY=YY-1 
590 『* ELSE IF KY=5O THEN KY=1』 YY=YY+1 
600 ELSE IF KY=52 THEN KY=2s XX ニ XXー1 
610 * ELSE IF KY=54 THEN KY= さ XX=XX+1 
620 『 ELSE BT DEXT 

6 さ 30 * FIsFIiFIsFI 

700 * BUX1EX。Y]:DPUTEXX。 YY 。MM] 


7 さ O “BUS:KY=KEYE] ユ 


74Q * TF KY=3O THEN DTO=OsELSE 1TF KY= さ 1 THEN DTO=1:ELSE IF KY=28 THEN DTO= ミ iE 
LSE IF KY=29 THEN DT ロ =23ELSE BUTU GEXTsFIsFIsF1iFI 

750 『* XX=DXi YY=DYi IF MTOU く >DTU THEN MTO=DT0Os GDTU GEXT』FI 

B40 * DADR=DQADR+90』 DPUTEXX。YY。MN] SUUNDE さ 4]』 MTU=DTO 

B80 * TRAPsKY=KEYE ] 

B9O * IF _KY く > さ 2 DR KK THEN GUTU TEXTsFI 


1540 "KEYsHLT[ ]: ADDR= 和 ま FCB2s CPURE ADDR。 和 まさ F。 "YA NT AD TU PC "HH 。) T エ "ありさ 。 ま も D 
さ BF 本 。 まり 0 、 生日 6 。 ま D401 柱 。$B7 。$D さ 日 2 本 、 も 日 6 、$D40R 福 。 まさ 9 SUB[ ]:HLT[ ]: に KY=PEEK( ま FCB2) : SUBE]iD 
MY=KYs RETURN 











ュー ブー イ 安 " 更 リ ス ト = 








 * ADDR= ま も 4BOO: CPUKE QDDRK。 ま OO 。 ま 00 。 も OO 。 ま 4 日 。 ま OO 。 ま OO も 00 。 ま 00 。 ま 0O。 も 00、 ま 01 。 ま 4 日 、$0O。 ま 00 
・ も 00。 00 。 まま OO 。 まま OO 。 ま 02 。 も 4 日 。 も OO 。 も 00 。 も 00 

590 *KEY:CUDE *24、 も 1 日 、 和 日 6、 ま FD 。 も 1F 、 BE 。 ま ヨ BE 、 ま 4H も OO 、 ま HD 、 まさ 。 まさ じ 。 も BE 。 も 4 日 。 ま 0 日 。 本 HD 。 も 
さ 、 も さ じ 。 BE 。 生日 。 生ま 10。 も BD 。 ま F さ 。 も さじ 。 まさ ら 。 1 日 

91 *F1=FEE ド ( ま 4BO4 ) = F フ =PEEK ( ま 4BOC ) : F さ =PEEK ( ま 4BH14) s IF F1<5O THEN N=BsELSE IF F1>2 
OO THEN N=5:ELSE IF F2<5O THEN N=4:ELSE IF F2>2OO THEN N=6』ELSE IF F さ =O THEN N=O 
sELSE N=2sF エ TsF エ saFTsFT:F1sRETURN 
























写真 3 バン カー に 落ち た ./ ノ 





まず は , 青木 さん “ハワイ オー プン 劇 的 優勝 お め : 


2 どの SSYbN ま ます: 


: 。 本 ゴル フ ・ シ ミュ レー ショ ン は , 初め て 3 次 元 立体 : 
・ 図形 処理 を 使っ た 画 期 的 ゴル フ ・ シ ミュ レー ショ ン で : 
: す . 従来 の ゴル フ ・ シ ミュ レー ショ ン は すべ て 平面 コ : 
: 一 ス で 。 せい ぜ い グ リー ン 回 り が 拡大 され る ぐら いで : 
: し た が , 本 シミ ュ レ ーション で は 毎回 の ショ ッ ト 位 置 : 
: か ら 立 体 提 野 画面 を 表示 し , ボー ル も 放物線 を 描き な : 
: が ら 立 体 的 に 飛ん で ゆき ます . また ,。 ショ ッ ト 方 向 を : 


: 旋 度 で 指定 する の は 非常 に わか り に くい の で , 矢印 , 


: カカ の バー な ど を 使っ て , で きる だ け 視 党 的 に し て あり : 


ます . 


お 楽し みく だ さい . 


いい 


目 の 常 め る 美しい 海岸 ユース (18 ホ ー ル ) を 充分 に : 


= まき 


圏 T&E SOFT 





写真 2 








| プ ブログ ラム に つい て | 











プロ グラ ム は ,。 メイ ン ・ プ ログ ラム と 18 の 3 次 元 ホ ー ル 
・ デ ー タ か ら 成 っ て いま す . 

5000 行 か ら が 3 次 元 線画 お よび ペイ ント ・ ル ー チ ン で す . 
体 視野 画面 の 作成 , 表示 お よび ボール の 弾道 な ど に この 
ルー チン を 使っ て いま す . まだ た フェアウェイ,。 ララ など 
の 反発 係数 、 お よび 角度 , 風速 方向. クラ ブ に よる 打上 
げ 角 度 な ど , ゴル フ に 必要 な すべ て の 要因 を 計算 式 に 組み 
込み 実 除 の ゴル フ を は ほぼ 完璧 に | ミュ レー ト し て いま す . 

立体 視野 画面 は ショ ッ ト の た びに 描き 変え ます . 当然 
ショ ッ ト 位 置 は 毎回 違う の で , ほとん ど 和 無限 に 近い 視野 画 
面 が 表示 され る こと に な り ま す . 

風 は ゲー ム 性 を 増す た め 実際 より 強く 影響 する よう に し 
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TaE_ ISLAND GOLF SE 


COURSE LAYOUT 














22 ス 





| ouT |i0| 
| 3.076 |373| 
陸 S6 夫 4 | 





ll2|3|ilisliel7 | 
| 155 | 332 | 441 | 366 | 372 | 329 | 138 | 
13141sl4|14|4lsl 


TOTAL 
| 6.063 | 
還 族 25 当 





コー ス の 紹介 


T & E ア イラ ンド ・ ゴ ルフ ・ コ ー ス は T & EE 開発 室 で 独自 に 


設計 され た も の で , 在 来 の ゴル フ ・ コ ー ス に , より 戦略 性 を も た せ , 


視 沈 的 に も 個々 の 色 を 強調 し , 非常 に 美しく 仕上 が っ て いま す . 
No 1 ホー ル : コー ス は ほぼ 直線 で , 一 打 め は フェ アウ ェ イ 左 の クロ 
ス ・ バ パン カー と 右 サ イド の 海 (0B) に 注意 / 
距離 の ある ロン グ ホ ー ル . フェ アウ ェ イ は うねり が き 
つく , 2 オン は まず 不可 能 . グリ ー ン は 池 に 囲ま れ , 
手前 の 大 バン カー は 相当 な プレ ッ シ ャ ー と な る . 

海 に 面 し た 景観 の すばらし い シ ョ ー ト ・ ホ ー ル . 距離 
も あり , 風 の 影響 も うけ 易い の で , クラ ブ の 選択 は 慎 
重 に / 

ュー ス 両 側が 海 で 一 打 め の 落下 地点 の フェ アウ ェ イ 
が 狭く な っ て いる の で , 番 し 場所 に 注意 ./ 

フェ アウ ェ イ 200m 地 点 に 細長 い 池 が 横切っ て いま す . 
ティ ー シ ョ ッ ト は 手前 で 止め る か ギャンブル を 試み 
(2258 

大 きく 左 に ドッ グレ ッ グ し て いる ミド ル ・ ホ ー ル . セ 
カン ド ・ シ ョ ッ ト は 池 を 気 に せ ず 大 胆 に / 

フェ アウ ェ イ 中 央 の ヒョウ タン 型 大 クロ ス ・ バ パン 
を クリ アー すれ ば , 好 ス コア が 期待 で きる . 
距離 は な い が , グリ ー ン まわ り は ガー ド ・ バ ンカ ー で 
し っ か り 固 め ら れ だ た や っ か いな ショ ー ト ・ ホ ー ル . 
アウ ト の 最終 ホー ル は 海 に 面 し た 右 ドッ グレ ッ グ の 美 
し い ホ ー ル 。 セカ ンド ・ シ ョ ッ ト は 直接 ピン を 狙う と, 
せり 出し た 海 に ド ポ ン の 危険 性 が 高い . 

フェ アウ ェ イ に 木 が 点 在 し て いて , クロ ス ・ バ ンカ ー 


No 2 ホール: 


No 3 ホー ル : 


No4 ホー ル : 


No 5 ホール: 


No 6 ホー ル : 
No 7 ホー ル : カー 
No 8 ホー ル : 


No9 ホ ー ル : 


No10 ホ ー ル : 


て あり ます . 


各 ホ ー ル ・ デ ー タ は 。 
て あり ます が , 
す . 
ル ご と に カセ ッ ト か ら 


ます が , 


全 コ ー ス , レ イア ウト に 忠実 に 作っ 
デー タ 量 の 関係 か ら 多 少 簡素 化し て あり ま 
メモ リ が 足り な い の で , これ ら の デー タ は ホー 
読む せよ うに し て あり ます . 

まれ に , 視野 画面 の 一 部 が ペイ ント され な いこ と が あり 
ゲー ム 続 行 に は 影響 な い の で ご 了承 くだ さい . 


ま : が 5 





を 避け よう と する と これ が 障害 と な る 

距離 155m の ショ ー ト ・ ホ ー ル . 深く 切れ 込ん だ 入江 を 
越し て の ティ ー シ ョ ッ ト . クラ ブ は ? 『 ア ル タ ス な ら 
7 番 で す ョ ュ 

グリ ー ン 後方 の マウ ント ・ テ ス を めがけ て ティ ー シ ョ 
ッ ト . フェ アウ ェ イ 左 の 池 は ナイ ス ・ シ ョ ッ ト で も 絶 
対 に 越せ ませ ん . 

フェ アウ ェ イ は ほぼ 直線 の 雄大 な ロン グ ・ ホ ー ル 、 風 
向き が 良けれ ば バー ディ ー の 可能 性 が 高い / 

海岸 治 い の 美しい ミド ル ・ ホ ー ル . 冒険 は 避け て フェ 


No11 ホ ー ル : 


No12 ホ ー ル : 


No13 ホ ー ル : 


No14 ホ ー ル : 


アウ ェ イ は 右 サ イド か ら 攻 め る の が 得策 . 
湾 に 沿っ て 左 に 直角 に ドッ グレ ッ グ し た 。 当 コ ー ス の 
名 物 ホ ー ル . 風向 き と 運 に 恵まれ れ ば ワン オン も 可能 . 


No15 ホ ー ル : 
No16 ホ ー ル : グリ ー ン 手前 は 張り 出し た 海岸 線 と , 池 に よっ て し っ 
か り と ガー ド さ れ て いる . セカ ンド ・ シ ョ ッ ト は 慎重 
(e 

: 当 コー ス 中 、 最も 距離 の な い シ ョ ー ト ・ ホ ー ル . ピン 
は 難し い 位 置 に 切っ て あり ます が 、 お も いき っ て ホー 
ルイ ン ワ ン を 狙っ て み ま し ょ う . 

視野 右手 に クラ ブ ・ ハ ウス が 見 えて き て 。 い よい よ 最 
終 18 番 ロン グ ・ ホ ー ル . フェ アウ ェ イ 左 サ イド の 大 き 
な 池 を うま く ク リア ー す れ ば , あな た に も 逆転 の イー 
グル ・ チ ャ ンス が …. 


No17 ホ ー ル : 


No18 ホ ー ル : 





まず , メイ ン ・ プ ログ ラム “GS?( リ スト 1 ) を 入力 し , 
カセ ッ ト に セー ブ し ます . 

決 に コー ス ・ デ ー タ , ^ び OUT” (リス ト 2 ) を 入力 し , RUN 
し て くだ さい (RUN す る 前 に 別 の カセ モッ ト に セー ブ し て お 
いた だ 方 が SsG9 うう)1 

RUN す る と ファ イル ・ ネ ー ム を 聞い て くる の で \H1? を 
入力 し で て ください. “HH 1? を 入力 すず すると, ホール 1 の デー 
タ が カモ セット ・ レ コー ダ に 出力 され ます . これ が 終わ る 
と , また ファ イル ・ ネ ー ム を 聞い て く る の で H2…H97 
まで 同様 に 行なっ て くだ さい . ヾ H9” まで 終了 する と , ヾ Ou 
t Of Data In 30′ と 表示 され ます が , これ は 関係 あり ま 





う 3- リ ゴルフ ・ シ ミュ レー ショ ン 





ん 。 

同様 に ^IN?( リ スト 3 ) を 入力 し , ^H10"ー^H18" ま で を 
み カ モット ギニー ジ ) じ で くだ さい 、。 

以上 の デー タ は メイ ジブ ログ ラム パ GS の の すぐ 後に く 
る よう 信 セ モー アレ で る だ さい ゆい 。 





メイ ン ・ プ ログ ラム GS? を ロー ド し て RUN す る と , 統 
け て ホー ル 1 の デー タ ^H1? を 続 み 込 み . ゲー ム の 開始 と 
な り ま す . 

以後 。 各 ホ ー ル ご と に 自動 的 に ホー ル ・ デ ー タ を 読み 込 
む の で カモ セット 
いて くだ さい . 


・ レ ュー ダ は , PLAY 状 態 の まま に し て お 





表示 画面 は 図 1 の と お り で す . 

視野 画面 の 緑色 は フェ アウ ェ イ また は グリ ー ン , 黒 が ラ 
フ , 白 が バン カー, 木 と 山 が 紫 , 赤 は OB で す . 海 と 池 は 
OB と 同じ 処理 に な っ て いま す . し た が っ て , 右 の 全 コ ー 
ス 図 で は , 海 の 部 分 も OB と 同じ 赤 に な っ て いま す . 

OB の 場合 打ち 直し は し な いで , 最も 近い フェ アウ ェ 
イ ま た は ラフ か ら 2 打 加算 し て 次 の ショ ッ ト に な り ま す . 

ボ ポール の 位置 は , 全 コ ー ス 図 に 表示 され ます . 

ショ ッ ト は 次 の 順 で 行なっ て くだ さい . 
@ ク ラブ の 選択 クラ ブ は フル セッ ト で す . 

カー ソル ・ キ ー 固 加 で 表示 クラ ブ が 変化 し て いく の で , 
目的 の クラ ブ と な っ た ら [RET| で セッ ト し て くだ さい . ク 
ラブ の 選択 は 実際 の ゴル フ と 同様 に 行なっ て くだ さい . 

バン カー な ど で , ドラ イ バ ー を 使っ て も まとも に 飛び ま 
せん . 
@ ショ ッ ト の 方 向 : クラ ブ の 選択 を 終え る と , ショ ッ ト 方 
向 の 矢印 が 点滅 し 始め ます . カー ソル キー 国 で 右 回 り に 5* 
づつ , 固 で 左 回 り に 5* づ つ , 還 で 右 回 り に 90* づ つ , 国 で 左 
回 り に 90* づ つ 動 く の で 目的 の 方 向 に し て , | 眼 ET| で セッ ト 
し SG く , き Ws 
@ ショ ッ ト : ショ ッ ト 方 向 が 決ま る と , カカ の バー が 上 下 に 
動く の で , うま く 目 的 の 強 さ で , | スペ ー ス | を 押し て くだ さ 
い 、。 の 

ショ ッ ト す る と , 視野 画面 の 中 と , 全 コ ー ス 図 の 上 を ボ 
ー ル が 飛ん で ゆき ます . ポー ル が 止ま る と ,。 フェ アデ ア ウェイ 。 
バン カー な どの 状態 が コメ ント と し て 表示 され ます . 
























































ゅ 右 メ ー タ ー ショ ッ ト 方 向 @ 左 メー ター 風向 き 
バー の 長 さ に より 風速 1.9m・ ひ と 目盛 は 100m で す . 











視野 画面 が 新しく 描き 変え られ (複雑 な 3 次 元 計算 を し 
て いる の で , 多少 時 間 が か か り ま す ) BEEP 音 が する と 次 
の ショ ッ ト に な る の で , 同様 の 手順 で 行なっ て くだ さい . 

ポー ル が グリ ー ン 上 に ある か , ピン より むこ うに ある 場 
合 は , 視野 画面 を 描き 変え な いで , すぐ に 次 の ショ ッ ト , 
(ペット ) に な り ま す . 

な お , 視野 画面 は ,. ショ ッ ト 位 置 上 空 40m か ら 全 コー ス 
図 の 上 方 向 か ら 40" 下 を 見 下 し た 視野 を 表示 し て いま す . ボ 
ー ル が 視野 外 に 出 た 場合 、 ま た は 弾 ん で 見 に くい 場合 に は , 
全 コ ー ス 図 を 参考 に し て くだ さい . 

@ デ ウト 9 ホール が 終了 する と , アウ ト の スコ ア が 表示 さ 
れ ま す . 
@| ス ペー ス | を 押す と , イン に 入り ます . 





@ ア ウト , イン 18 ホ ー ル が 終了 する と , 全 ス コア が 表 志 さ 
れ ま す . 
e[Y| を 押す と , スコ ア ・ カ ー ド が プリ ンタ に 出力 され ます . 


@ 木 の ま わり は ラフ と 同じ 判定 を し ます . 








T & E SOFT で は , FM-7 用 だ け で な く EFM-8 用 の 3-D 
ゴル フ ・ シ ミュ レー ショ ン ” も 発売 し て いま す . また だ , 他 
機種 用 も 各 機 種 の 性 能 を 生か し た も の を 発売 子 定 し て いる 
の で お 楽し み に . 

本 シミ ュ レ ーション の ボー ル の 飛 嘘 離 は , ご く 一 般 の ア 
マチ ュ ア ・ ゴ ルフ ァ ー に 合わ せ て あり ます . ちな み に , 
&E SOFT 内 で の 最高 スコ ア は パー プレ イ の 72 で す . ホ 
ー ル イン ワン は まだ あり ませ ん . 初め の うち は 90 以 上 た た 
く と 思い ます . 


らら” プロ グラ ム 、・ リス ト EE 昌和 








* | さ -D GOLF SIMULATIHN | 
* 1 FOUR FUJITSU MICRO 7 1I 
* 1 T&E SHFT 1 1 
| By EIJI YOKOYaMA 1 
ュ ト ュ ーー ーー ンー 


ひ お や お QD ビ 


1 の 日 =1 :PI= さ 。 14159/18 の s MIDTHB の ひ , 25 
2 の 9 DIM DI (699) , DN(699 ) 。 D2(4 の 9) 。 X(4) 。Y(4) 。Z(4) 。F( 
7) 。C ま (13) 。C1(1 さ ) 。C2(1 く ) 。J も (7) 。HD( 1 日 ) 。 CX( 1 ) : は = 日 
の 日 さ : XL= ロ 4 の : YL= ニ の X ビ = ニ 61 呈 : Y ビ ニ ロ の = じじ の = の = じじ 1 = の 
さき の J$ も (②)="TEE SHOUT "id も (1)= リ FAIR MAY" sd$ ま (2)="RUUG 
H" = も $( さ ) ="BREEN" : も (4) ="BUNKER "も (5) ="MATER HAZ 
RaRD" sd も (6) = リロ 。B 10 gd ま (7)=" リ CUP TN ! 1 0gLCL も = リ 

由 


49 TT$ ま =TIME$ も = RANDUMIZE(VQL (MID 多 (T 多 。4。 つ ) ) *6 の +VL 
(RIBHT ま も (TT ま 。2) ) ) 
59 SCREEN プ 7: CDLUR7。 の gs MTDTHBO: CLSg じ も (1)= ニ "1M"sC*( 


2) =" る Ms まま ( さ ) = "5M" も (4) "1 "= ま ( 王 ) = ニ "41 "=C 和 ま (6) =" 








1":C$(7) ="6T"gC( 日 ) = リプ 7T リ EC あ (9) ="BT"gC*(19)="91" 
上 (11) ="PM" = も (12) ="BM"sC ま (1 さ ) ="PT" 
69 C1 (1 ) = さ の :C1 (2) =34: 1 ( さ ) = さ 日 : 1(4) =493C1 (5) =44s 
C1 (6) =46:C1(7) =4 昌 1 (BB) =52: じ 1 (9) =56= じ 1(19) =69= ビ 1 
(11) =65:C1(12) =6B:C1(1 さ ) = の 
7 の C2(1 ) =25 の : 2 (2) =22 ロ : C2 ( さ ) =229: C2(4) =219sC2 (5) 
=265: C2(6) =299: ビ 2(7) =195: C2 (日 ) =185: 2(9) =18 の 2( 
19) =175:C2(1 1) =169:C2(12) =155: C2(1 さ ) = 日 5 
B の し し $=" 

":ZL*=" の の 9 の " 
19 の BOBUB2999= CLS 
11 さ BUSUB9 の 99: TX1=ー125: TY1= ニ 6 の 9: TX2=125』 TIY2= の = GDB 
UB7999: し INE (TX1。TY1) 一 (TX2。 TY2) 。PSET。 2。B 
115 BUSUB4099: 1 X1= ニ ー125: TY1= ニ 6 の の = 1X2=12: TY2= の s GDS 
UB7999 と 
117 LINE(IX1。TY1) 一 (IX2。 TY2) 。 PSET,7。 BsFURI=OTU6 の 9 
STEP 19 の = 1X1=1 15: 1TY1=T: TX2=125: 1Y2=T : BUSUB7 の 9 の 9s LT 
NE (TX1。TY1) 一 (IX2。 TY2) , PSET 。7= NEXTT : TX1=ー1 の : ITY1= の 





177 





リス ト 1 








: 1X2=19: IY2= の 』 GUSUB7O9 の 69: LINE(TX1。IY1) 一 (IX2。 TIY2) 。 
PSET, 4: READHX , HZ 

129 DX=9』 DY=4 の 9:DZ=1 : ビニ =ー4 の 9: D= の 』 ビニ の 

13 さ の GUSUBSG の 9 

29 の "KK GHUT XX※ 

210 SC1= の :JT= の : YO ニ 。 1 : 7 の =1 : X の = の : PP=4 : GB= の @ 

229 BUHSUB69 の 9: GC の =SC の + 1 : SC1=SC1+1 : CHLHR7: LUCATE6 
さ , さ : FRINTLCEL 多 :LUCRTE6 マ さ , る: PRINTJ*(JT) : LUCATE67。2: 
PRINTSC 1 : GUHSUB9 の 9 の: BHSUB 1 の 9 の : BUSUB69 の の 

2 さ の _PM=PMー1 : TFPM く = ニ 2THENPM=2 

235 IFJT く >ORNDCL=1 THENCL=2 

2 さ 7 IFCL=1 さ THENVO=PMX2xC2(CL ) /2 の の: = の 9:S1=C1(CL ) = 
F 9= の : G2= ニ り ソ +9 の 9: GUTH25 の 

249 BUSUB6199: V9=PMX2xC2(CL ) /22 の 9+M1XCUS( (ソソ ーMO) ※ 
FI ) / さ : = の : 1= じ 1 (CL ) : FO=MW1*SIN( (いり ソーWO ) *P 1 ) / 4 : 52=V 
V+99 

25 の 6 IFJT=2THENVG=VO 日 :F の =FO+RND( 1 ) 一 . 5 

269 IFJT く >4THEN3 の の 

279 IFCL く 4THENF の =FO+(RND( 1 ) -。 5) * さ : V の =V の *((RND(1) 
ォ 15 の +59) / ビ 2(CL ) ) : BUTU さ 99 

289 IFCL=1 さ THEN22 の 

299 IFCL>19THENV の =VG* (RND( 1 ) /4+。75) *C1(CL) /68:F の 
=F9+(RND( 1 ) 一 . 紀 ) / 4: BUTU さ 99 

295 F の =FO+(RND(1 ) 一 . 5) *2』 VO の =VO* 。 6 

る の 99 BUSUB69 の の 』 "MX BLL 半 革 

395 IFCL=1 さ THENRS=. 1ELSERS=V の G/ さ 5: GUSUB6 さ の 99 

さ 97 IF INT (V9 ) = の THEN5 の 9 

さ 98 IFS1 く BTHENS1= の : =. 4:Y1= の Os Z1=VOxTCUS(S2xPTI)+ 
Z9: X1=VOXTxGIN(S2#P 1 ) +X9: VO=V の # 。 日 5: 79=Z 1 : XO=X1:G 
UT0 さ 69 

さ 19 Y1=VOXGIN(S1XP1I ) *T 一 。SXG#TKT+YO 

さ 29 7Z1=V9wCHUS(S1*P1) x*TCHS(S2PT )+Z の 

ささ の X1=VOXCHS(S1xFPI)*TKSIN(S2xFPTI)+XO 

さ 49 T=T+。4 

さ 59 IFY1 く の THENT= の : V の =VO 。 4:G1=S1X。 ら 6』 Z の ニ Z 1 : X の =X1 
さ 69 XP1=INT(X1 ) :YP1=INT(Z1) 

さ 79 XP2=G1x(X1-DX)+Q2x(Y1 一 DY)+Q3x(Z1 一 DZ ) : YP2=Q4 テ 
(X1-DX)+Q5X(Y1-DY) 一 6X(Z1-DZ ) : ZP2=Q7X(X1 一 DX ) +RB テ 
(Y1-DY)+Q9x(Z1-DZ ) 

さ 72 XF2=INT(XP2/ZP2x24 の 9) +23③9』 YP2=INT(YP2/ZP2x1969 
) +99: YP2=2 の 9-YP 

さ B9 IX1=XP1』 ITY1=YP1: GUSUB7O99』 XXP=IX1: YYP=IY1sGH 
SUBB9O99: FP=PCC : IFYP1 >699HRYP 1 く の OURXP1 >125HRXP 1 ベー1 
25THENBEEP : PP=2』 GUTU569 

3 PSET(IX1。1Y1。6) 

る 5 IFZP2 く <= の 6URXP2>47BURXP2 く 10RYP2>19BURYP2 く 1THEN 
395 

387 IF Y1 く < の THEN395 

399 R=INT (RS/ZP2x24 の ) : IFR く =2THEN さ 9 さ 

3 さ 92 CIRCLE(XP2,YP2) , R,6:PAINT (XP2。 YP2) , 6,6: GUT ロ さ 
95 

さ 393 PSET (XP2。YP2。6) 

395 IFSQR((HXーX1 ) 2+(HZ-Z 1 )^2) く 。BQNDY1 く . SANDV ら くさ 
・5THENJT=7: GUT05B の 9 

4 の 69 IFS1 >=BTHENS2=S2ーF の 

419 1FY1>5THEN さ 97 

429 IFY1 く = の GTHEN44 の 9 

4 さ 3 の IFPP= さ THENV の = い の * 。 2 

4 さ 5 BOT397 

44 の O IFFP= の THENV の =V の * 。 6:G1=S1。 ら 6 

45 の 9 IFPP=7THEN5 の 9 

455 IFPP= さ THENVO=V の * 。 2 BHTU さ 9 ア 

469 IFPP=1HRPP=2THENV の =9』 GUTU5 の 9 

479 GOTOS97 

599 YPP=IY1: GHSUB699 の 

51 の 9 IFPP=6THENYPP=YPP- 1 : XXP=1X1:YYP=YPFi GDBUBB の の 
の 6: PP=PCC: GUT0519 

529 IFPP く >4THENS4 の ELSEJT=1 

53 の IFSRR((HX-X1 ) へ 2+ (HZ-Z 1 ) へ 2 ) く 5 の THENJT= さ 

549 IFPF=7THENJT=4: GUSUB649 の 9 

55 の IFPP=1 THENJT=5: BUTU さ の 99 

5S69 IFPP=2THENJT=6』 GUTH さ 99@6 

57 の 6 IFPP= さ DRPP= の THENJT=2 5 

589 LUCATE6 さ , マ : CHLUR7g PRINTLCLWg LOCATE6 さ , さ : PRTNT 
J$(JT) 

SBS IF JT= さ OR Z1>HZ-15 THEN BB=GB+1ELSE BG=@ 
599 IFJT=7THENBUSUB6299s BHTU7 の 9 

699 IF BB>1 THEN DX=HX: DZ= ニ HZー25: Y の =。 1 : XO ニ X 1 s Z9=Z 
1 : ビ = ニー46: BHTH229 

ら 61 の IF JT= く る ロ R Z1>HZ-15 THEN DX=HX:DZ=HZ2: YO=。 
1 : X9 ニ X 1 : Z9 ニ =Z 1 : ビニ ー46:』 BHTH6 さ 9 

62O DX=X 1 : DZ ニ Z 1 : Y の = ニ 。 1 : X の = ニ X 1 : 7 の =Z 1 : ビニ ー4 の 

639 GUHSUB999: BUTH22 の 9 

799 "XXXX GCURE CARD XX 

719 HOU(H) =SC 1 : HH+ 1 : IF =19 UR 日 =19 THEN 73 の @ 

72 の GOTO19G 

73 の 9 LUCATE9。9』 CHLUR プ 7 。 の :FUR1=O9TU2 さ : PRTINTL し ま : NEXTT 
ksPFRINTLL ま isLHCATE の 。 1 

99 UUT=9: IN=9:FHR エ =1 TH9』 HUT= ロ UT+HO( 1 ) : IN=IN+HO( 











エ +9) : NEXTI 

759 CULUR4,9:FRINTSPC(21) "< くく SECURE CARD >>pVgPR 

INT: CHLUR7。9 

76 の PRINTSPC (5) " rーーーーーーー ィ ーーー ャ ーーーーーーーーーーーーー ィ ーー 

ーー な ェ ーーー 

7@2 PRENTSPE5)"IHHEE1 1 12 1 さき |4 151@12 
4 1 の ml.BMT 1 

7G4IBRENTSEEi(S) り ーー 

ココ ーーー オ ーーー ナ ーー " 

766 FRINTSPC (5) " IMet 。 | る 62 156 1172 1332 1358 1467 13 日 

21147 1 さ 48 13 の 76m Il" 

76 ヨ PRINTSPC(5) " トーーー オ ーーー キ ーーーーーー サ ーーー オ ーーー キ ーーー キ ーー 

ET か sn 

779 PRINTSFC(S)"IPAR 14 151314 141514 
ド Ss Sg 。 

772 PRINTSPC (5) " ヒーーーーーー ビ ーー キーーー キ ーーー キ ーーー トーーー オ ーー 

-ー+ オ ーー キーー キ ーーーー ゴ " 

774 PRINT USING " INNME | 拉 販 | 社 補 | 拉 幸 大 析 | 欄 埋 | 

福村 | 柏 桁 時 拉 | 幸 拝 | 析 料 大 193HOU(1)3HOU(2) 3HO( う ) 』 HH(4)* 

HO (5) 』 HU(6) iHO(7) 3 HU(B) 』HO(9) 5 OUT 


76nPERXNIG ビ Gt 科 トニ ーーーー ーーー ーー ドー ーー ーーーーーー ーー 
ーー レーーーー ナ ーーーー ト ーー ーー』 


77B PRINT: IFH=19THENBG9 

789 COLOR5,9:FRINTSPC(5) "PUSH SPACE BAR"』COLOR7, 

9 

799 ド K9$= ニ INKEY$:』 IFK9$=" "THEN19 の OoELSEBUTO799 

B99 PRINTSPC (5) "エーーーーーーー イ ーーー デ ーー ィ ーーー ィ ーーー ィ ーーー ィ ーー 

テニ に ニー ンー ニー ーー ュー ューーー、 

B92 PRINTSPC(5) " IHULEI1 の 9 111 112 113 I14 1I15 116 
I17 I18 1 IN ITOTALI" 

B94..PRINTSPG.(5) "ーーー ビ ーー モー 

ビー ーーーー ーーー ーーーーーーーーー ーーーーーーーー hu』 

B96 PRINTSPC(5) "IMet | う 7 さ 1155 1332 1441 1 さ 66 1 く 72 132 

8 113 14 ヨ 2 12987m 16963m 1" 

Bo8 FRINTSPC (5) " ヒーーーーーーーーー キ ーーー キ ーーー キ ーーー ト ーーーーー 

すこ es ここ テー 

819 FRINTSPC(5)"IPAR 14 1 さる 3 14 15141414 
IS に SU 還る きす 1 の の 1 

B12 PRINTSPC (5) " トーーー キ ーー キオ ーーー キーーー キ ーーー ト ーーー キ ーーー キ ーー 

ー ト ーー トキ ーー ビーーーーーーーー 一 | " 

14 PRINT USING " INRNE | 枠 桂 | 秩 秩 昌 埋 販 上 埋 販 香草 

補 析 | 幸 幸 埋 寿 埋 杵 | 粧 砕 | 乾 埋 匠 178HU(19)』HO(11)j』HO(1 

2) HU(13) 3 HU(14) 3HU(15) 』 HU(16) 』HO(17)』HO(1 日 ) 』 INi 

SC の 9 

816 PRINTSPC(5) "ーーーーーーーー ト ーーーー ト ーーーー ユ ーーーー ト ーーーー ト ーー トニ ーー 

ーー 

829 PRINTs COLUR5, の 』 PRINT" 

(Y) or (N) KEY"i :LUCATE の の 

B3 さ 9O KB$= ニ INKEY$: IFK 日 $="N" THENB ヨ SO 

B49 IFK 昌 $="Y"THEN HARDC 1:BUTOBS9 

845 GUT0B さ 9 

BS の CULOR7。 の 』 END 

29 の X=X の : YB=Y の : Z 日 =Z の 

1 の XFP9=Q1*X(X 日 DX ) +Q2x(Y 昌 DY ) + 品 x ( Z 日 DZ ) : YP9=Q4 

(X 日 DX ) +Q5* (Y 日 DY ) 口 6 (Z 日 DZ ) : ZP ワ = ロア (X 日 DX ) +Q 日 

(Y ヨ -DY ) + ロ x (Z 晶 一 DZ ) 

2 の XP9=INT (XP9/ZP9x24 の 9) + つ 3③9: YP9=INT (YP9/ZP9x 1 の の 

) +99: YP ワ =29 の -YP9 

3 の IFZP9 く =O0RXP9>47BURXP9 く 1HRYF9>19 ヨ 0RYP9< 1 THEN 

RETURN 

4 の 9 PSET(XP9。YP9。2) : RETURN 

1999 ビ L=1 =: BEEF 

1 の 1 の LOUCATE76,2:PRINTC$(CL ) : に = ニ INKEY$:TFK の = リリ "THE 

N191 の 9 

1 の 15 QAS=ASC(K$) : IF QAS=&HOD THEN 1199 

1929 IF AS=&H1C THEN CL=CL+1 

1 の 3 の 9 IF AS=&H1D THEN CL=CL-1 

1 の 4 の 1IF CL= の 9 THEN CL=1 さ 

1959 IF CL=14 THEN CL=1 

1969 BUTOU191 の 

1199 V ソ = ニー9 の 

1129 GBDSUB9699』 に $=TNKEY も : 1F に 名" "THEN1 129 

1125 QAS=QSC(K$) : IF AG=&HOD THEN 1299 

113O IF QAS=&H1C THEN V ソ =V ソ +5 

114 の IF QS=&H1D THEN V ソ =V ソ ー5 

1142 IF AS=&H1E THEN VV=VV+99 

1144 ITF QAS=&H1F THEN V ソ =V ソ ー5 の 

115O IF V ソ =365 THEN ソソ = の 

116 の IF い ソ =-5 THEN V ソ = さ 55 

1179 GOUTO1129 

12 の の PM=1 :UD=1 

1219 LUCATE61 。 25ーPM: IF UD=1 THEN CC=3 ELSE CC=@G 

1229 COLUR CC:PRINT" 還 " ぉ 

123 の O に K$=INKEY も : IF に K$=" ! THEN RETURN 

124 ら FM=PM+UD: IF PM= の THEN PM=1:UD=1 

125 の 9 IF PM=21 THEN _PM= ニ 2 の =:UD=ー1 

126 の 9 BUTU1219 

2999 "XX _ READ DATR # 

2 の 1 の LUCATEO。 の OkF TI$="H"+TRTBHT$(STR$(H) ,。LEN(STR$(H 


PRINT QUT ? PUSH 
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) ) -1) iPRINTFT エ 第 

2929 UPFEN "1 。 菩 1。F エ 生 TINFUT 拉 1 。N 

2 の 3 の FURI=1 TUN: INFUT 社 1 。DI(1) :NEXT1I: CLOSE 共 1 : RETUR 
N 

さ の OO "XX 日 。B 区 

3 の 19 BOSUB65O9』 R ロ =1 の 9』 CHLUR7: LUCATE6 さ 。 さ : PRTNTLCL も 
s LUCATE6 さ 。 さ 』 FRINTJ$ も (JT) 

さ の 29 KO=@ 

さ @ さ の 9 FUZ=INT(RUxSIN(KU*FP 1 )+Z 1 ) = FUX=INT (RDCOUS (KO 
PT )+X1 ) 

さ 949 TIX1=POX: ITY1=POZ: BUSUB7 の 99:』 XXP=IX1: YYP=IY1iG 
USUBB の OO9: PF ロ =FCC: TFPP ロ = の ORPP ロ =4THEN さ 945ELSEBHT ロ マ 
@59 

さ 94 ロ IFFUZX699ANDP0UZ > の 9QNDPUX ヾ 1 25ANDPUX >ー-1 25THENS 
965 

さ 959 KO=K ロ +15』 ITFKU く > さ 69THEN さ の さら の 

さ の 6 の 9 RU=R ロ + 1 の 』 BUDTH3 の 2 の 

さ @965 IFFPH=OTHENJT=2ELSEJT=1 

さ 97 の 9 X1=PUX』 Z1=P ロ Z 』 BC の =SC の +2 ょ SC1=SC1+2:PSET(IX1。 
IY1。6) g BHTH61 の 

499 の 9 *"%% CHURSE DISFP SUB。 # 光 

4 の 1 の エニ =2』CQ=2 

492 の 9 IFD1I( エ + さ ) =、5THENRETURN 

4 の 4 の IFDI( エ + さ ) >9QANDDT( エ + さ ) く 1THEN497 の 

4 の 5 の IX1=INT(DI(1I) ) iTY1=INT(DI( エ +2) ) : 1X2=INT(DI( 
[+ さ ) ) : TIY2=INT (DI (1+ ロ ) ) : BUSUB7 の 9 の 9』 LINE(TX1。IY1) 一 ( 
1X2。 1Y2) ,PSET。CQ 

4 の 6 の 1= エ + さ 』 BHTU492 の 

4 の 7 の ON CQ BUSUB 4199,41 の 6 の,420 の 。41 の 9 の, 419 の 。41996,4 
1 の の 。41 の 9 の 。416 の 


4 の 98 の 1=1+4: GUTH492 の 9 

4199 REQADIX1。IY1』GUBUB7 の 29』 PQINT(IX1。IY1) , CB。CGs 
CQ=DT( エ + さ ) *1 の 6』 RETURN 

4269 RETURN 

5 の 9 の 9 "XX さ ーD SUB。 』 DX。DY,DZ : C=X カ 2。D=Y カ フ 。E ビ =Z 
カフ % 交 

5919 1=1 

5912 DN(1) =DI(1I) 』 IFDI (1 ) =ー、97THEN5 の 29ELSET= エ + 1 s BD 
TOS912 

5929 1=1』"%# DX。DY,DZ ※※% 

5925 IFDI(1) =ー.9THEN5 の 4 の 9 

5926 IFDI(1 ) = の THEN5G さ の 

927 IFDI(1I) >ー1QNDDI (TI) く 1THEN エ = エ +1 : BHTU5925 

59 さ 9 DN(1 ) =DN( 1 ) DX DN( エ +1 ) =DN( エ +1 ) 一 DYs DN( エ +2) =D 
N(1+2) 一 DZ 

59 さ 5 エ = エ + さ 』 GTD5925 

5949 "XX PICTH。HERDINB。 BANK ※ テ # 

595 の 9 Q1=CHS(DxP1 ) *CHS (EXPT)+SIN(D*PI い XSIN(EXPI)※ 
SIN(C*PI ) 

5969 Q2=SIN(D*F1 ) *SIN(CP1 ) XCUS(EXPI) 一 CHS(DXPI)※ 
SIN(E*P1 ) 

5979 QS=STIN(DxPI ) *CHS (CxF1 ) 

5989 QR4=SIN(E*PI ) CHB (CXP TI ) : ロ G=CUS(E*P 1 ) *CHB( じ XP 
1) : ロ 6=SIN(CF1 ) 

5999 Q7=CUS(DxPI ) *SIN(CXPI) SIN(EXPI) 一 SIN(DXPI)※ 
COS(E*P1 ) 

5199 GB=SIN(EXP1I ) *SIN(DxPI ) +CHS(DxPI) x*SIN(CPI ) = 
9=CUS(DxP1 ) *CHS (CXPI ) 

511 の O =1 

5115 IFDI (1 ) =ー.9THENS1 6 の 

5116 IFDI(1I) = の THEN5129 

5117 IFDI(I) >ー1ANDDI(1T) く 1THENI= エ +1 : GHTO51 15 

5129 X1=DN(T):Y1=DN( エ +1 ) s Z1=DN( エ +2) 

5139 DN(1)=1XX1+ ロ 2XY1+ 晶 さ %Z1 

呈 149 DN( エ 1+1 ) =G4XX1+Q5XY1 ロ 6%Z1 

5145 DN(1+2) =7XX1+QBXY1+QR9Z1 

5159 エ =1+ さ る 』 BUT ロ 51 15 

5169 LUCATE9。 の 』 CULOR7 9:FURT= の TU23: FRINTLL ま s NEXT 
ITgPRINTLL ま ss LHCATE9。⑨ 

161 LINE(②』9) 一 (479。199) 。FSET。 7。B 

5164 1=2 

5S165 IFD1I( エ + る ) = ニー。 BTHEN57 の 9 

5166 IFDI( エ + マ ) =9THEN5 1 79 

167 IFDI( エ + さ ) >ー1QNDD 1T( エ + さ ) く 1THENCG=D エ ( エ + さ ) 1 の =s 1 
=I+4』 BOT ロ 5165 

5179 X(⑨) =DN(1 ) sg Y(⑨9) =DN( エ +1 ) : Z(⑨) =DN( エ +2) 

5S189 X(4)=DN( エ + さ ) : Y(4) =DN( エ +4) : Z(4) =DN( エ +5) 

5199 FORA=GT ロ 4 STEP4 

5299 F() = ウ 9:F(+1 ) = の =sF(+2) = ウ sF (人 Q+ る ) = の 

5219 IFX() で ヾ -Z (AA) THENF (人 Q) =1 

S22 の 9 IFX() >Z() THENF (人 Q+1 ) =1 

5239 IFY(Q) ミ ーZ(Q) THENF (人 Q+2) =1 

5249 IFY(A) >Z(Q) THENF (人 Q+ さ ) =1 

5259 NEXTA 

5269 FUR= の TS 

527 の IFF(Q) =9THEN5299 

52 ヨ 9 IFF(A)=F(Q+4) THEN56B の 

529 の 6 NEXTA 

5 さ 99 FURA=9T マ 








5 さ 1 の IFF(R)=1THEN5379 

53 さ 2 の NEXTA 

5 さ 39 FORA=4TO7 

5349 IFF(Q)=1THENS53B@ 

5359 NEXTA 

369 BUTOUS69 の 9 

5 さ 7 の =O:』B=4: BHTU5399 

ら 53B9 =4:B= の 9 

5 さ 9 の IFF(A)=1THENS54 昌 9 

54 の 9 TIFF(a+1 ) =1THEN5449 

41 の 9 IFF(Q+2) =1 THEN552 の 9 

542 の 9 ITFF(R+ さ )=1 THEN556 の 9 

543 の 9 GUTHS699 

544G ドニ =(Z (Ra) 一 X (Rn) ) /(X(B) 一 X(Q) 一 Z(B)+Z (NR) ) 

5459 X(R)= ニ K*(Z(B) 一 Z( 全 ) )+Z( 介 ) 

コ 46@6 Y(a)= ニ Ex(Y(B)-Y(R) )+Y(a) : Z (人) =X(R) 

547 の 9 BUT05199 

54B9 ド =(Z()+X(R) ) /(X() 一 X(B) 一 Z(B)+Z( 人 N) ) 

549 の 9 X()= ニ に K*(Z(Q) -Z(B) ) 一 Z (NR) 

55@O Y(Q)=Kx(Y(B)-Y(a) )+Y(Q) :Z(R) = ニーX ( 代 ) 

5519 BUT ロ 5199 

552 の 9 ド =(Z()+Y(a) ) /(Y()-Y(B) 一 Z(B)+Z(R) ) 

55 さ 9 X()=Kx(X(B) 一 X() )+X(R) 

5549 Y(Q)=K#(Z(Q) 一 Z(B) ) Z (人) :Z(Q) = ニーY ( 介 ) 

5559 BUT ロ 5199 

556 の 9 ド =(Z (人) -Y(R) ) /(Y(B)-Y(Q) 一 Z(B)+Z (AN) ) 

5579 X()= ド EX(X(B) 一 X() )+X(Q) 

5589 Y(Q)= ド K#(Z(B) 一 Z( 人 ) )+Z():Z(Q) =Y(R) 

5599 BUTB199 

5699 IFINT(Z (②⑨) ) = の THEN5689 

5619 IFINT(Z(4) ) =9THEN56B9 

962O X1=INT(X(9⑨) /Z (9) #239 ) +2 さ 9 

5639 Y1=INT(Y(⑨) /Z(⑨) *199) +9⑦』 Y 1= ニ 2 の 9ーY 1 

5659 X2= ニ INT(X(4) /Z(4) x*2③9) +2 さ 9 

5669 YS2=INT(Y(4) /Z(4) 19 の )+99』 Y フ =299ー-Y2 

5679 BUSUB569 の 

56B の エニ = エ + さ 3』 BHTH5165 

5699 LINE(X1』Y1) 一 (X2。Y2) 。FSET 。7: RETURN 

5799 1 エニ エ +4 

571 の IFDI(1)=ー.9THENRETURN 

5715 IFDI(1) =6THEN57 さ の 

5729 IFDI(1) >ー1QANDDT(1) く 1THENCG= ニ DI (1T)*1 の 9』 エ = ニ エ +1s( 
UT0S719 

5725 IFDN( エ +2) マニ の THENSB の 9 

573 の 9 FX=INT(DN( 1 ) /DN ( エ +2) *249) +239 

5749 PY=INT(DN( ユ エ +1) /DN( エ +2) *1 の 9) +99:PY=299-PY 
5759 IFPX:47BTHENSB99 

576@9 IFPX く 1THENSB99 

577 の 9 IFPY>19BTHEN5B9 の 

57 ヨ 9 1IFPY く 1THENSB99 

5799 PC ロ =FHINT (FX。PY) : IF PC ロ =-1 THEN 5Bo9 ELSE P 
RINT(PX。PY) 。CG。 7 

589O 1= エ + マ : BHTU57 1 の 9 

6999 "XX%% GUUND BUB。 \#※ 半 

6199 _ SOUND6。 15: SHUND7』 7』 SUUNDB。 16』 BUHUND9。 16: SUU 
D19。16: SHUND12。9:』 SHUND13。 さ 』 RETURN 

629 の 9 SUND7。 &HF 日 : SHUND の 。 1 の 9』 SHUND 1 。 さ 』 SDUND2,2 の 』 B ロ 
UND く , 7: SHUND4 , さら : SHUND5, の 』 SDUND6, 15: SUUNDB 。 16』 SO 
UND9。 16: SUUND 19。 16』 SUUND12。25: SHUND1 さ , さ : RETURN 
6399 SUUND6。 さ 9: SDUND7 , 7』 SUUND 日 , 4: SHUND 12, 259』 SDU 
ND1 く , 1 iRETURN 

6499 SUUND6。69』 SHUND7,&HF7』 SHUND 昌 16: SDUND12, さ *S 
DUND13。 1 : RETURN 

6569 SUUND の 。9』 SHUND1 。 1 1 : SDUND7,&HFE: SUUND 有 日 。 16 0 
UND12。59:』 SHUND13。3』 RETURN 

6969 SUUNDO。 の 』 SHUND 1 。 9: SUUND2』 の: SHUND さ , の : SHUND4。 
の : SBHUNDS。@: SHUND6。 の 9』 SUUND7。 56』 SUND 日 , 64: SHUND ら 6 
4: SUUND19。64』 SUUND1 1 。 255: SHUND12, 255』 SUUND1 さ 。 の iR 
ETURN 

7 の 99 IX1= ニ INT(1IX1 テ 136/25 の +572 ) : IX2=TNT (IX2x1 さ 6/25 
の +572) : IY1=INT(199ーIY1X144/699) s IY2=INT(199ーIY2 
144/69 の ) 

7 の 1 の IFIX1>6 さ 9THEN1 X 1=6 さ 9 

792 の TFTIX2>63③9THENT X2=6③9 

7939 IFIY1>199THENIY1=199 

794 の IFIY2>199THENTY2=199 

795 の RETURN 

BOO の  '※%※ 基 

B の 1 の 9 GETGA(XXP。YYP) 一 (XXP, YYP) 。CX。 は 

の 2 の HE1 ま =HEX 生 (じん (の ) ) : HE2$= ニ HEX$( ビ X(1 ) ) 

89 の 3 の IF LEN(HE1*)= ニ 4 THEN B949 ELSE LA=4-LEN(HE1$ 
) s HE1 ま =LEFT 生 (Z し ま 。 Ln) +HE1 

B の 4 の 9 IF LEN(HE2*)=4 THEN Oo5O ELSE LB=4-LEN(HE2$ 
) : HE2 ま =LEF 丁 生ま (Z し ま 。LB) +HE2* 

9 の 5 の 9 RG1=VaL ("&H"+LEFT 和 ま (HE1$。2) ) : RB2=VQL ("&H"+RI 
BHT も (HE1 も 。 つ ) ) : RB さ =VaL ( "&H"+LEFT$(HE2 ま 。2) ) 

の 6 の RG1=RG1 AND &HBO: RG2=RG2 QRND &HB の Os RG さ =RB さ Aa 
ND &HB9 

の 7 の IFRB1 く > の OTHENRG1 =1 
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98 の 9 ITFRB2 く > の THENRG2=2 

8999 IFRG3 く > の THENRG さ =4 

1 ら 9 PCC=(RB1 HR RB2 _UR RG る ) : RETURN 

9 の 999 ”※XX% GCREEN 

991 の 9 LHCRTE63。 の 9: CHLOR6: PRINT "HULE" 

9962 の 9 LUCATE63。 1 : CHLORS: PRINT "PQR" 

293 の 9 LHCATE6 さ 。2: CULUR4: PRINT "SHOT ": LHCEATE71 。 2 CO 
LUR3:g PRINT "CLUB" 

9949 CIRCLE (532。 4 る ) 。 24』6: CIRELE(612。4 さ ) 。 24。6: PAI 
NT (532。 43) 。5。 6』 PRINT (612。43) 。5。6 

659 COULUR7』 LUCATE67。 の s PRINTHs READP。 しま sLUCATE67。 
1sPRINTP" "し = MO=RND( 1 ) * さ 6 の 9 ょ 1= ニ TNT (RND (1 ) *9+1 ) 
95 の 9 の "XXX% MIND DISP SUB。 *\X% キ 

51 の LINE (32。 4 う ) 一 (XL。 YL ) 。 PSET 。 呈 : XL=INT( (MM1X2+2) 
\CHS (MG*PT ) +532) s Y ヒ = ニ INT( (MM1*2+2) *。4495*GIN(MOxPT 
)+43) gsLINE(532 43) (XL。YL) 。 PSET 。 2: RETURN 

96 の 99 "XX% 電 VECTUR DIBP BUB。 X%※ え 

961 の 9 LINE(612。43) 一 (XE。 YE ) 。 PSET 。: XE= ニ 2 の 9*CHS (VV*P[ 
)+612』 YE=29*。4495xGTN(VVXFT)+4 さ :LTNE(612。 4 さ ) 一 (XE 
> YE) 。 FSET。 1 : RETURN 

11999 DATA 4。 マ 73m。 の 。 9 の , う の 。 1B の 。 一 49。 35 の 。 5 日 。 さ 96。 一 
6 の 9。 さ の 9 の 9』ー19。 1 日 の 。ー49。 さ 66。 人 4 の 9。 さら 66。 4 の 9。 る ら 6 

1299 の 9 DATQ ,S の Bm 。 の 。 55 の 。 の 。 259 。 49。 499 4 の 9。 469。 の 。 
37 の 。 2 の 。 1 日 の 9。ー46。419。ー46。 419。ー46。419 

13 の 99 DATA さ 。172m。 の 。5 の 9, さら 6。 1 の 9 の 。 一 6 の 。 1 6 の 。 日 。 126。 
ー64。 164。ー64。164。ー64。164 

14 の 9 の 9 DRTA 4。 さ ささ m。 の 。59 の 9。 の, 199。 の, ささ の 。 ロ O。 さ 9 の 。 の 。 2 日 の 
ュー 人 4。 う 24。ー4。 う 24。 4。 う 24 

15999 DATA 4。 さ 5Bm。 の,5 の 9。 この 。 229 。 の 。 ささ ひ 。 一 2 の 。 さ 79 。 2 の 





, 27 の 9,4。32 日 。 4, さ 2B。 4。 さ 2 
16999 DATQ 5,467m。 の 。5 の の, の, 29 の , 69。 449。 9, さ 95。 一 
2 の , 215。-2 さ 。 さ 15。 3 日 。 67 。 64。 45 の 。 64 。 4 の 

1799 の DATA 4』 さ B2m。 の ,5 の 9 の, の ,17 の ,-69。 さ B9。ー1 さ 。 さ 99,』 7 
B, さ 26。 - う コ 。 1 の ②。ー69, さ 7 の 』 6 ら の 』 さ 7 の 。 6 ら の 。 さ 7 の 

1899 の DATA さ 』147m。 の 。5 の 9, 49。 149。 25。 99,ー56。 174。 一 
32。 149, - さ 2。 14 の 32。 14 の 

19 の の 9 DATA 4。 さ 48m, の 。5 の の , 2 の, 19 の 。 の , ささ の B6。 2 の 6 
155, 9, 1 の 。 64, さ 26, 64 。 さ 26。 64。 さ 26 

2199 の DATQ 4, さ 73m。 の 。5 の , の , 69。 7 の 。3B の ,59, さ 49。 7 の 』 ささ 
の 。 7 の 。 さ の 。 6 の 9。 さ の 9 の 」 12。 さ 1 昌一 6 の 。 1 昌 の , 7 の ささ の 

229 の の DATA さ ,155m。9,59 の 。 6 の 14 の 9,76。』 196。 16。 12 の 。 69。 
149」 69。』 149。 6②, 149 

23 の 9 の DATA 4, さ さ 2m, の ,59 の , 4 の , 149。 5 の 。 2B9, 15, さ 19, さ 
ロ 。 25 の 。 1 4。 19 の 。 49。 299 。 4 の 29 の 4 の 」 29 の 

2499 の DATA 5,441m, の,55 の ,-49, さ の の 。 7 の 。 44 の , 26。419。 
ー79, さ 49 。 6 の 。 2 さ の 。 6 の 。 44 の 。 69。 449』 6 の 。 449 

25999 DATQ 4, さ 66m。 の 。5 の の , 5 の 20 の 一 5 の , さら の, 5 の 。 さ 1 の, 9 
日 199。-69。 さ 5 の 6 の さ 5 の , 6 の 。 さ 5 の 

2699 の DATA 4, さ 72m。 の 。5 の 9, の, 16 の 。 6 の , 25 の , - 紀 。 269 。 - 呈 
5, 294, 7 の 9, 25 の , 7 の , 25 の 』 7 の , 25 の 

2796 の DATA 4, さ 2Bm, の ②。5 の の , 4 の 17 の 。 2 の , さ 1 の 9, 4 の 。 さ 4 日 , 一 1 
日 。 142。 さ の 。 26 の 。 さ の , さ 1 の 。 さ の , さ 1 の 。 さ の 。 さ 1 の 

2B99 の DATA さ ,13Bm, の,5 の 6 の, の ,59, の 。 14 の 5 の , 149, 18。 17 日 
ュー19。 14 の 1 の 。 14 の 。 一 19。 14 の 

2999 の DATA 5,4B2m, の 。5 の の , 69。』 249。 6 の 。』 4 さ の , 6。 426, 46 
, さ 16,-6 の 。 さ 7 の 。 4 日 。 1 7 の 。 6 の 。 43 の 』 6 の 』 4 さ の 6 の 。 4 さ の 





トウ の OU イデ ー タ 


・ リ スト (H 1 -- 9 ) EE 





5 の FUR J=1 TO 1:PRINT#1。DT(J) : NEXTJ: CLDSE キ 1 s GBDT ロ 
2 の 9 

11999 "XXX HDLE1 DATA XX 

1111 の DQTA 、2。29。9』9。74。』 9。149。 日 9。9。 164。 78。 の 。199。 
18,9, マ 14。 日 。 の, さ 18」 1 の, の 。 さ 2 の 。 一 14, の 。 さ 26。ー4。 の 。 さ 49, の 。 
の 。 369 一 14」 の 。 4 の 』ー46。 の 。 429。 日 6』 9。 41 の 9 日 。 の 。 さ の 。 9 
4 の 。 さ の 6」 62。 の 。 2 の 9。ー44。 の, 149。-2 の 。 の 。 の 。29。 の 。 の 

11129 DATA .4。,4』9』19。14。 の 。49。69。9。 169。5 日 。 の 。 186。2 
の , 9』 269。ー14。 の 。 さ の の 』 一 2 日 の, 29 日 。 3B, 9。 2BO。 42。 の 。 259。 
ー4 日 9」 249』ー ロ 9』 の 』 219。ー マ 日 。 9。169, 一 1 日 。9。 6 の 。ー19。9。 29。 
ー4,9』19。4。9。19 

111 さ 9 DATA .4,- さ 6, 9, ささ ゆ 。ー26』 の, ささ ら 。 一 1 日 。 の 。 さ 4 日 。 1 日 。 
9, さ 64」ー24。9。 さ 76』ー49。 の 。 日 2 ー ロ 6 。 9。 3 日 9。 一 6 日 。 9。 さ ブ 9。ー7 
っ, の 。 さ 54, 6 日 。 9, さ 42』ー54 。 の 。 さ さる 。ー さ ら 。 9。 さ さ の 

11149 DQT .7,ー39。9。 さ 94。ー46。9。 496。ー64。 の 。 494。 7 の 。 
の 』 394 7 日 。 の, さ BB』-B4』 の, さ B9。 日 4 。 の, さ 6 日 。 の 。 9。 さ 6 。 - ら 
日 。 9, 3B4, ロウ 。 の 。 399。ー さ 2 の 。 の 。 さ 99。 さら 。 9。 さ 94 

1115O DATA .7。ー69。』9』274。ー54。 の ,276。ー46。②。299。』ー42。 
の , さ 16」 44。 の 。 さ 1 日 。 一 6」 の 9, 31 の 。ー62。 の , さ 12。ー72。 の 。 さ 2 日 。ー7 
B, 9、3 さ 4」 の 。 の, ささ の 』ー79, の , さ の 9。 6B」 9。 2B4 。 69。 の 。 274 

11169 DATA .7』4,9』166。6。9』1 昌 6。 の 。9。197。ー19。 の 。299。 
ー2 の 9, の 219, 一 2 日 。 の 。 2 の 日 。 一 26 の 。 196。 2 日 。9。 18 日 。 -26。 の 。 1 
っ 。ー14。 の 。16 の 。ー14」9』149。ー12。 の 。13B, 4。9。 166 

11179 DATA .6,-49,9。 さ 65。, - さ 9.64 。 の 。 さ 65. 64。ー マ 9。 コ 。 
の さら 66」』ー さ 9。 64』 9』 さ 66. さ ら 。 49。9。』 さ ら 66.。 呈 。 49、 さら の 。 さ 66。 さ 
6。 49.5, の 6, さら 66」ー49. さ 6, 9。 さ 65。 64 49。9。 さ 6 ロ 。5 

111B9 DAT .6,』-49, の , さ 6 ら 6。 49。 王 。 さ 66。 る 9。 4 . さ 。 さ 66。ー4 
@, 4, さ 66 

11199 DATA . さ ,ー さ O』 の 』219』ー29。 の 。219。ー29。 さ 。210。ー プ 」。 
っ 。 21 の 9。 27。 さ 。 21 の 」 29。 1 の 。 つ 1 の 。 一 さ 9。 1 の 。2 つ 1 の 。 一 く 2。 さ 。21 の 。 
ー さ 2。2。219、ー さ の , さ 。21 の 。 る の 。 の 。21 の 

1129 の DaTA . さ 。49。9』1 さ の 」41 9。13 の 。41。 さ 。 139。 4 さ 。2。1 さ 
の , 4 さ , さ 。 1 の 。 41 。 19, 1 さ の , 4 の 。 1 の , 1 さ の , さ 日 。 さ 。 1 さ の , さ , 2。 1 さ の 
。 4, さ 。 1 さ の 。 4 の 。 の 。 1 さ の 

1121 の DATA .5,- さ 9999, の, さ の 9 の 99, さ の 9 の 。 9, さ 9999, . 2。 一 
6, の,41 の 。 一 1 の 9 の の , の , 1 の 9 の 9 の 

11229 DAQTA 一 .B,、4,20, の 。 1 の , 1 昌 , 9, 23 日 。 一 2 の, の , 297 。 - さ 
6。 の , 2B の 。 52」 の, さ 5 の 。 一 2 日 。 の , さ 5 の 24 。 の 。 さ 72。 56。 の さ 7 日 。 
・7。 ーB, の 。 1 の , の, の, 192。 26。 の 。 266, 5 日 。 の 。 294。 46。 の 。 さ 1 
2。 75, の , さ 27 。 一 さき 4, の, さ 9 さ 。 5 日 。 の, さ 96。 日 の 。 の 』 さ B の 

1123 の DATA 。 さ ,-29.5。5。21 の 。 4 の .5,。 13 の 。 、5, の, 199。 19 
の 09」。 1 , 9。 の 。 2 の の の 」。2。ー1 の の , の さ 9 の 』ー1 1 の 。 の 』 さ 7 の , 一 1 の 9。 の 。 
269』ー.9 

12999 DATA .2,59, の, の 。4。 の 。164。19。 の 。 192。79, の , 269。 日 
2 の 。 さ 19。 一 19。 の , 469。 の 。 の 。 4B 日 。 9 の 。 の 。 4B9。 196。 の 。 44 の 
ッ ー52。 の,。 さ 2 の 。ー44。 の, 292」ー10 の 」 の 。192。 一 194。②。 174。 9 日,9 
15 の, さら 。 の 。 の の 。 の 。 の 

12 の 1 の DATA .4,14, の ,16。26, の,49, 一 6。 の 。 179。 の, の, 194,4 
日 , 9, 25 の , 6 の の 。 2B9。 5 日 。 の 。 さ の の 』 24。 の 。 さ 49。 4』 の 。 さ 4 日 。 4。 の 。 
さ 44。 6, の , さら 9。 16, の , 2 の 。 日 の 。 の 。 21 の 。 94。 の 。 18 の 。ー9 の 。 の 
。 16 の 。ー さ 4 。 9。 さ の 。ー19。9。 1 の 14。9。16 











19 DIMDI(799) | 12eze DATA .4,-19,9,419,-16, の, 42B。-39,。 9。 4 日 。 4 日 。 
2 の !=1 9, 43 日 。 69。 の 。 4 さ の 。 一 6 日 。 の 。 414。 6 日 。 6。 さ 96。 6 の の 。 さ 晶 6 4 
9 READ DI(I):TF DI(1I)=ー.9 THEN 49 ELSE 1=I+1:GO || 日 ,6, さ B9,- さ 9。 の , さ B2。-14。 の 。394。 一 1 の 。 の 。 419 
Tn@ 129 さ の DATA .7。ー39。 の 。 459。 26。 の 。 456。 さ の 。 の 466 4 の 。 
49 BEEP: INPUT"FILE NAME"』FT*: UPEN " ロ "。 昔 1。F エ =PRT の , 472,-64。 の , 469, 4。 の , 454。 8 日 , 9, 449, の, の, 4 さ 9。 7 
NT#1 , 4, 9。 432。 6 の 。 の 。 44 日 。 5 の 。 の 。 452。 - さ の 。 の 。 45 の 


12949 DATA .7,24。 の 。 さ 56, さ の , の, さら 64。 さ の 。 の, さ 74。 2 の 。 の, さ 9 
の , 16, の 。 496。 19。 の 。 46 日 。 4 の, 464。 の 。 の 。39 の 。ー1 の 。 の 。 さ 7 の 。 一 4 
の @, の 。 さ 66。 5 の 。 の , さ 7 の , 6 の の 』 さ 72。ー66, の 』 さ 6 日 。 64。⑨。 さ 6 の 。 
ー52。 の, さ 5 の 。 4 の 。 の, ささ ら 』 ー さ 2。 の 。 さ 2 日 。 29。9。 さ 49。 12。 の 。 さ 5 
4,-4, 9, さ 69。 24 。 の さ 56 

1205 の DATA .7。ー6, の,296』 2 の 』214。ー4。 の , 226,。 日 。 9, 22 
6, 一 さ の 。 の 。 2 の 9 。 日 9。 1 日 の 。ー24 の 。16 の 。ー22。 の 。 1 さら 。 2 の の 。 
149』 14 の,142, 一 1 の 。 の 。179, 6, の , 296 

12 の 6 の DATA .6。-46。9。469. ロ 4 呈 。 64, 9, 499。64。 45。。 
の @, 419, 一 45。 64, の,419. さ 6』ー46, の 9, 419. ロ 46. さ 6, の 9。419。 さ 
6 一 46. 呈 9。 419。 46. さ ら 6。 の 。 499。64。 46。9。 499。 呈 

12979 DaTA .6,-46。9,419,-46,5。419。-47。4. さ 。419, 一 4 
6, 4。419 

129 ヨ GO DATA . さ ,- さ の, の ,2BO,-29。 の , 2BO,ー29。」 さ 。 2B の 』ー27 。 
2 っ, 2B の 」ー27 。 さ 。 2B の ,ー29。 1 の 。 2BO』 さら 。 1 の 。 2BO」 32。 さ 。 2BO。 
ー ミ 2」 2」 2B の , - さ の , さ 。 2BO。 さら の 。 9。 2B の 

1299 の DATA . さ 。-59。9。 1 の 9。』ー49。 の 。1 の 9』ー49。 さ 。 1 の 9』ー47 。 
2, 109,-47。 さ 。199。ー49。 1 の 10 の 』ーO。 19。 199。- ロ 2。 さ 。 199。 
ー52, 2」 199。 5 の 。 さ 。 199。 の 。 9。 199 

1219 の DATR .5,- さ 9999。 の , さ の 9999。 さ OO の 9, 9, マ 9 の 9 の 』 。 2。 5 
っ, の 。 さ 2 の 。ー19 の 9 の 9 の 一 199G の 

12119 DATA 一. .4,ー69, の 』189,20。 の, さ 2 の , 24, 9。 さ 3 日 。 4 。 
9, さ 46」 さら 。 9。 41 の 6。 の 。 41 の 。 1 日 。 9。 426。 5 日 。 の 。 42 昌 。 . 7 
ュー22」 の 。 1 昌 の 』ー14, の 。 2 日 。 6』 の 9。 224。 一 さ 4 の, さ 5 の 。ー62。 の , さら 
日 , 14,9。 う 7 日 。 12。 の 9。499。ー74。 9。446』ー49。 の 。46 の 。 - さ 2。 9。 46 
4 

1212 の DaTA . さ ,-29.5。5。 2B の ,-49、5。, 199。 . 呈 。 9。 199, 1 
の 999」. 1 。 の 。9。 20 の 9。. つ 。ー1 の の 。 の 』1 さ の 。 一 7 の 。 の 。 2B の 。 52。 の 。 さ 
16,ー.9 

1399 の DATA .2,129, の 。 の , さ 9, の, さら 6。 2 の 。 の , さ 5。 9。 の 。 2 日 , 日 。 
の , さ 2」 その 。 の 。 9 の 。ー22。9。 1 の の 。 22。 の 。106。 る の 。 の 。 112。 3 日 。 
の @, 1 19」 42。 の 。12 の 。ー さ 2。 の 』149, 一 16。 の 。 154。 14, の 。164。ー マ 
9,9。 189 

1 さ O1 の DQT - さ 2,9 の , 199。 一 4 日 , の, 29 の 。ー66。 の 。 196。 日 4 の 』 1 
9 ー9 日 。。 174。ー194。9。 15 の 。』ー194。 の 。 144。ー9 の 。9。116。ー74 
6」11 の 。 54。 9。』 1 1 日 。 46。 の 』1 16, 4 つ 。 の 11 の, 一 4 日 。 の 。 1 の 4。 一 
59。9,96。 一 44。 の 。 日 。 - さ 4 。 9。 日 6ー12。 の,。 2 日 14。 9。 1 日 。 49。 
の , 9』120。9。9 

1 さ 920 DATA .4,ー さ 2。@。94』ー2 昌 の 。 1 の 2』ー さ 9。 の 。 1 の 6。ー49, の 
19 ロコ 。ー44。9。1 の の 。ー44。 の 。 96。ー4 の 。 9。 92』ー う 2。 の 。94 

1 さ 9 さ G DATA .4。- さ 4。 の 。156。ー さ 5。 の ②。 174。 44。9。 1 昌 4』ー62。 
の 1B マ 。 7 日 。 9。 176, 日 4。 16 の 日 つ 。 9。 146,ー72。 の 。 1 さら 6。ー ら 6 
の @, の 。136。 一 44。 の 。17 つる 4。 の 。 156 

13949 DATA .7。ー64。9。122。ー66。 の 。 1 さ の 一 76。 9。 1 さ 2。 日 6。 
の 」 142。ー9 の 。 の 。162。ー94。 の 。16 の ,-96。 の 。 1 の 。ー92。 9。 139, 日 
4, の, 12 の 。 7 日 。 9。1 1 日 。 64 。 の 。 122 

1 さ 95 の DATA .6,-64。 の 。16 さ .5。ー6 さ 。64。 の 。 16 さ 。64。ー6 さ 。 王 。 
9, 164, 一 6 さ 。 64。9』164。 さ ら 6。 一 64 の 。 164。 王 64. さ ら 6。 の 。 164。 さ 
6」 64.5。 の 9。164』ー64. さ ら 6。 の 』 16 さ .64。-64。 の 。16 さ 。 呈 

13969 DATA .6。』ー64,9。164。ー64。 呈 。 164。ー6 弓 4. さ 。 164。ー ら 
4,4。164 





180 
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1 さ 979 DATA 、 さ 。ー49。 の ,199,ー マ 9。 の 。199,ー マ 9。 さ 。199。ー マ 7 。 
つ 。 19 の 。ー ラ 7。 う 。 19 の 。ー さ 9」 1 の 」199。ー4 の 』 1 の 。 19 の 。 42。 さ 。199。 
ー42。2。 199。ー49, さ 。 19 の 。 一 4 の 』 9, 199 

13 さ OB の DAT . ロ 。 39999。 の 。 さ の 9999。 さ の 9 の 9。 の 。 さ O999。。 さ 。ー1 
@4, 9。 15 の 。-5 の 9 の 。 159。 5 の 9。 の 。 144。-194。 の, 144 

13999 DATQ .2。1 の 2』9,27 の 。114」 の 。』299。 112。 の , さ 19。114。 
9, 327。 192。 の 。 さ 49。 日 の 。9。 さ 3 日 , 69」 の 。 さ 4 の 。 49。 の, ささ の 。 さ 6。 の 。 
さ の 9 の, 42。9。 2B の 」 6 の 。 9。 27 の 。 79』9。 264。BO。9。 264。 192。 の, 27 
@ 

1 さ 199 DATA .4,5 の 。 の 。 さ 99, 69, 9。 2 日 ロ , 4, 9, 282。 1 9 の, の,2 
94」102。9。 さ 14」 94。 の 。 さ 26。』 7 の 」 の 。 さ さ の 。 ロコ 2。 の 。 さ 16。 の 。 の , さら の 
1 さ 11 の DATA 一.B。.4。- さ 6。 の, 1 の の 9。ー7 の 。9。』 159。ー59。 の 。 179。 
ー49, の 。 17 日 。 76。 9。 1 74。 。 7 9。 の 。 1 2 日 。 67 。 の 。 12 日 。 92。 の 
15 日 。 . さ 。 39. 5。。 199」 . ロ , 9, 199。 1 の 9 の 。 。 1 。 の 。 の 。 299 の 。 一 
7 の 。 の , 9 の 。 の ⑨」1 14。ー196。 の 。 149。 。 4。76。 の, さ 96。ー。 
14099 DATA .2』 さ の , の, の 9。69, の 。』114。 昌 6。 の 。149, 1 の の 。9。179 
199。9』1B6』B6。 9。 20B, 日 6, の, 22 の 9, 99, の, 2 さ 6。 日 99。 さ の 9。 4 
4, の, ささ の 。 2 の 。 9, さら 69。ー16。 の, さ 64。 2 日 。 9。 さ 52。ー る 6。 9, ささ の 一 
19。 の 。 22 の 。 の 。 の 9。 19 の 。 1 の 9, の 。 1 日 6。 19。 の 。 18 の 。ー2。 の 。 169。ー さ の 。 
@, 15 の ,ー49, の, 1 さら 6,ー さ 9 の, の, さ の , の 。 の 

1491 の DQTQA .4, の 。 の 。1 の 。 1 の, の 。 19。 2 日 , の , 2 つら 。 4 の 。 の 。 6 の , 。 
の , 120,74。9。14 の , 9 の, の, 17 の 9, 9 の , の 。 1 の 。 7 日 の,2 の 9。 74。 の, 2 
19。 7 日 。 の 。 249。66。 の 。 266。 さ 4。 の 。 27 日 。 2 の 。 27 の 。 の 。 の 。 24 の 。 4 
の 。 202。 1 日 。 の 。 196。 2 の 。 の 。 1B4。 日 。 9。 156』 14。 の 。 15 の , - さ 9, の 
。 13 の 。 一 2 日 。 9 4 の, 一 2 の 。 9 の, 2 の の 。 の 。 1 の 

14920 DATA .4。9。 の 。 さ の 9。16, の 」 さ 94。 2 の 。 さ 1 日 。 2 日 。 9, ささ 4 
1 日 。 の 。 さ 5 の 。 6。9。 さ 56』ー12。 の , さ 5 つ 。 24 , の 。 さく 日 。 226 の さ 2 の 。 
ー18, の 。 さ 06。 の 。 の, さ 99 

1493 の 9 DATA 。7。64。 の 。29。 6 日 , 9, 2B4 62。 の , さ の の , 52。9。 マ 1 
2 42。 9。314。 さ 6, の 。 さ 19。 さ 6。 の 。 296, 46。 の 。 2 日 4。 64。 の 。 2B の 
14949 DATA .7。』 9 の, の 。269。 1 の , の , 27 日 。 19。 の 。 284。 4。 の 。 299, 
ー2」 の , 299。ー12。 の 。294。ー16。 の 299。 一 16。 の 。 27 日 1 の, の, 264 
ュー4。 の 。 26 の 』 の, の 。269 

1495O DATA 、6,-4。 の 。 さ 2 さ 。 ロ , - さ .64, の , さ 2 さ 。 64。- さ 。,9。 さ 
24, - さ 。 64。 の 。 さ 24 . さ ら 6。 4。 の 』 さ 24 .。ー4。 さ ら 。 の, さ 24 。 さ 6 4.5 
, の, さ 24。 4. さら 6」 の , さ 2 さ 。 64 。 44, の, さ 2 さ 。 王 。 6」 4 の 。 さ 24 。 4 。 
ロ , さ 24, - う 。 4. さ 。 さ 24 。 4。4。 さ 24 

14969 DATA . さ 』29。 の 。20 の ,21 。 の 。 2 の 0 の,21 , さ 。 20 の , 2 さ 。 2。 2 の 
の , 2 さ , さ 。 209。 21 。 1 の 9。 209。 2 の , 1 の, 26 の, 1 日 。 さ 。 26 の 。 1 日 2, 29 の 
。 20。 さ 。 209。 2 の , の 。 26 の 

1497 の DATA . さ ,5 の 。 の 。189,51 , 9, 1 の,51 。 さ 。 1 ヨ の , 5 さ 。 2 1 日 
の , 5 さ 。 さ 。 1B の 1 , 19。 1BO。 5 の , 1 9, 1 の 4 日 。 さ 。 189, 4 日 。 2, 1 の 
, 59, さ 。 1B9, 5 の , の 。 1 の 

149BO DATA .5,- さ の 6699, の 9, さ の 009, さ の 999, の , さ の 669 。 。 2 。 2 の 
。 9。 さ 6 の 。 39909。 の 。 さ の 90 の 。. 2, の 。 の 。 19 の 。 - さ の の 9 の, の 。 15 の の の 
1499 の 9 DATA 一 日, .4。59, の ,』 17 の, 19。 の,23 の , 4 の の,25 の 。 64。 
の 264。 22。 の 。 27 の 。 12。 の 。 さ 26。 一 16』 の 。 さ 26。 一 29。 の 。 ささ 6。 26。 の 
。334 

14199 DATA 。7,52,9。296, 3 日 , の , さ の 日 。52。 の 9, さ 1 の , 4。 の,27 
日 12。 の 。 292。 日 。 9, 24 . さ 。 2 の 。 2 の 。 5 の 。 5。 1 の 」 。5。 
の , 199。 1 9999。 。 1 , の , の 。299 の 。 7 の , の 。 199。 日 。 の 。 2B6, の , の 。 1 日 
の , .2, 69。 の 。 さ 69。 日 。 の 。 さ 65。 一 29。 の , さ 7 の 。 一 。 9 

15 の 9 の DATA .2, さ の , の , の, 26, の , 13 の 。 44。 の 。 16 の , 5 の , の , 29。 
44。 の 。 229, 42, の 27 の, 62。 の, さ 1 日 。 6 の 。 の 。 さ 4 の , 2 の の 3B6, 一 2 の 
の , さ 96。 44。 の, さ 7 日 。 一 4 日 。 の 9, さ 44。 一 さ の 。 の 。 さ 1 の , 一 2 日 。 の 。 さ の 9, 一 
9, の , 2B9, 7 の 。 の 。 24 の 

15 の 619 DAT 99 の, の 。149,ー72, の , 144。 4 日 。 の 9』164。ー16, の , 1 
94。 の , の 。 19 日 。 2 の 196。 の 。 の 。 1 日, 一 さ の 。 の 。 154 69。 の 。 1 の 4 。 一 
B6, の, 9 の , - さ の 。 の 」 の , さ の 。 の 。 の 

1 の 2 の DAT .4。 の 。 の 。19。14, の ,29。 2 の 。 の, 4 の 。 6。 の 。 1 の, 1 の 。 
の , 1.4 の 。 さ 2。 の 18 の , さ の 。 の 。 21 の , の , の 。 25 の , 日 , 6, 2B の 22, の, 2 
B9,ー46。 の 。 264。 一 62。 の 。 2 さ の 』 72。 の 。 144。 4 日 。 の 。 164。 16。 の 
194。 の 。 の 。 19 昌 。 2, の 。 196。 の , の 。 18 日 。 の 。 の 。 154 。 一 6 日 。 9, 1 の 4 
ッ ー42。 の 」 さ 6 一 2 の 。 の 。 14, の 。 の 。 1 の 

15 の 3 の DATA .4。49。 の , さ 2 の , さ B, の , さ さ 2。 2 日 9。 さ 46。 12。 の, る 5 
4。 9 の, の, 354。 一 16。 の 。 さ 46。ー2 の 。 の 。 ささ の 。 一 14。 の 。 さ 16, 一 4。 の 。 さ 6 日 
19。 の 。 さ の 4。1B, の, さ の 4, さ の 。 の , さ の 6。 さ ら 6, の , さ 12。 4 の, の 。 さ 2 の 
15949 DATA .7,29。 の 。 さ 6 日 22, の 。 さ 72。2。 の 。 3B4。 一 14。 の 。 3 日 
6, - マ 4 。 の , さ 7 の , 日 。 の 。 35O 。 4 。 9, ささ 2 ー さ の 。 の ささ の 。 一 24 。 の 。 
さ 59, 12。 の 。 さ 64, 29。 の 。 さ 6 日 

15959 DATA 7, さ の 。 の 。256, さ 6, の 。 2 の 。 さ 4 の 29 の, 26。 の 。 29 
2 12, の 。 299。 6。 の 。 2B6。 1 の 。 の 。 264。14。 の 。 25 の 。 24。 の 23 日 。 2B 
の ,2 さ の 。 さ 2。 の 』 2 さ 2。 さ の 。 の 。 26 

15969 DQTA .6。4。 の 。 さ 27.5。4. さ 6。 の 。 さ 27。 64。 4。5。 の 。 さ 2 日 。 
4.36。 の 。 さ 2 日 。 さ 6。 4。 の 。 さ 2 日 5。 さ . 64。 の 。 さ 2 日 。 さ 6。 さ 。 ロ 。 の 。 さ 2 日 。 
さ 。 64, 9 の 。 さ 27。 64。 4 の 。 さ 27 。 呈 。 . 6。 4。 の 。 さ 2 日 。 4。5。 さ 2 日 。5。 4. さ 
さ 2, 4。 4。 さ 2 

1597 の 9 DAT . さ ,-5 の 。 の 』17 の ,ー49。 の 。17 の 』ー49。 マ 。 17 の 。 47。 
2」17 の 。ー47。 さ 。 17 の 。ー49。 1 の 。17 の 』ー ロ の 。 19。 17 の 。 一 52。 さ 。 1 7 の 。 
ー52,2。 17 の 。-5 の , さ 。 179。-5 の , の, 179 

15GB の DQTQ 。5,- さ の の 99。 の, 3 の 99 。 さ の の の の 。 の 。 さ の 9G9。 。 2 。 2 の 
の, さ 6。 さら の 99, の 。 さ の 999。 。 2 4 日 。 ら 。 さ 44。ー さ の 999。 9。 15 の 9 
の 。.2。ー 日 6。 の 。 9 の 』ー う の 9②9。 の 。 - さ の 9 の 

15999 DATA 一. 日 ,.4。ー19。 の 。』 149, 2 日 。 の 。 2 日 。 29 9。 259。 一 
44, の 。262。ー ワ 』 の 。2 フ 7 。 22。 の 。 さ 24。ー ら 6。 の 。 さ 22。 さら 。 の 。 ささ 9。 1 4 
の 。 さ 42。ー ら の 。 の 。16 ら 6。。 フュ ー2 の 。 の 。 さ 7 の 。 12。 の 。 さ 72。 2 の 。 9。 マ フ 71 。 
22。 9。 279。 14。 9 の 。 2 日 。 さ 2。 の 。 2BB 

15199 DATA . さ 。-49.5。 呈 。 179,.5。 の 。 1 の の 。 19999。 . 1 。9。9。 
2 の 99。 一 5O。 の 。 さ 4 の 。ー7 の 。 の 。 さ の 9。 さ 。 の 。 194。 一 日 9。 の 。129。ー22。 











の , 154, . 2。 9。 の , さ 9 日 。 9。 の , 429。 日 6。 の 。 日 4。ー. 9 
16999 DATQ .2,49。9。9。109。9。1 昌 の 。114。9。25 の 。 192。 の 。2 
フ 6」 日 4。 の, 299。 日 2。 の 。 29 の 。 8 の, 276, 日 4。 の 。266。92。 の, 269。 
94 。 の 」 25 の 9。 9 の 。 9。 2 さ 4, 日 の O, つ さ の 。 6 日 。 9, 22 日 。 62。 9, 232。 5 日 。 
の @。 244。 6②。9。269」 66」 の 』27 の 74。 の 。 2BO。 7 さ 。⑨。 さ の 9 の, の, さ 7 
@ 

16 の 1 の DAT 29,9。429。- さ 4 の ,479。 6 の 。 の 。 4B6。 9。 9。 4 
日 4,ー199。 の 。 469, 一 1 19。 の 。 429』ー196。②。 3 日 6。 日 の 。 @。 さ 4 の -5 
の , の 。26 の 。 一 さ の 。 の, 189,ー29」 の 』 1 の 9。 一 29。9。 の 。 49。9。9 

16 の 2 の DAT 、4。 の 。 の 。19。1 の の 。19。4 の 。9。49。B4。9。 169。94 
。 の 」214。 昌 日 。 の 。 22O。 6 の 。 の 。 222」 コ 2 の, 2 さっ 。 5 の 。 の 256。 62。 9 。 
2 の 。 64 。 9。 299。 つの 。 9, さ 2 の 」 29。 の 。 さ 日 の 。 49。 の 。 さ 92。 52 。 9 。 
392。ー ら 2。 の 。 さ 日 2 ー ら の 」 9。 さ 5 の 。 さら 。 の 。 2BO。 6』 の , 249, 日 。 の 。 1 
99,4。9。 159。ー14,9。B9。ー14。 の 。 さ ら 6。 9。9。 19 

169 さ 9 DATA .4。-44, の 』429』ー さ 4。 の 。4 さ の 。ー マ 4。 の 442』ー44。 
9@, 469, 日 。 9。 479。 79。 の 。 479。 4 。 9。 45 日 。 9 の 。 の 44@。ー ワ 
の , の, 426。 の 』 の 9, 429。-ー62』 の 』416。ー44。9。 42 

16949 DAT .7,- 昌 9。9。 さ 7 日 。 62。 の 。 さ 99。 2。 9。 496。 4 。 
の , 4 日 。 64 。9。 494。ー7 の 。⑨。41 の 日 9。9。419』-99。9。 4 日 。 9 
ら 6」9。 420。 9 日 。 9。 420」 一 192。 の 。 494。ー94。 9。 3B6, 9, の 。 う 7 
16945 DATA .7,9。9,1BO。ー 日 。 9。229。 22。9。24。 一 42。9。2 
74。ー44 。 9。 27 の 。 さら 。 の 。 249。 - さ の 。 の 。 294 。 一 1 日 。9。184。ー14。 の 
156。ー19。 の 。 154。9。9。 1 の 

16959 DATA .1, 一 19, の 。 さ 1 日 。 一 12。 の 。 さ さ 2。ー22。 の 。 さ く 日 。 4 』 
の , ささ 4, 日 。 9 。 さ 20 。 一 さら 。 の 。 292ー26。②。 2 日 222, の 。 2 日 。 2 
9」 の 。 296。 一 14。 の 。 さ 96, 一 19。 の 。 る 1 日 

16969 DATA .7, さ 日 。9。69。44』 の 。79。 4 日 。9』 昌 4。 46,9, 昌 6。 49 
。 9。B4。 さ 2。 9。 76。 2 日 。 9。 64。 2 日 。 の 。56。 さ の 。 9。 ロ 4 。 さ 日 。。 6 の 
16965 DATA .6。-64,9。449. ロ 。ー6 さ 。64。9。』449.64。-6 さ 。。 
の , 45 の 。 一 6 さ 。64 。9。 45O . さら 64』9』 45 の 。。 64 . さ 6, 9, 459。 さ 
6,-64.5。 の, 45 の 9。ー64. さ ら 6。②』 449。64。ー ら 64』9。449。 昌 。 6。ー64 
。9。 459。 64 。。 45 の 。 6 4. さ 。 459。 64。 4。 4 の 

16679 DATA .,ー19999。 の 。19909。 1 の の 9 の 。 の 。 19999。 。 さ 。ー4 
9 の 。 の 」19 の 9 の の 999。 1 の 9 の 9』999 の 。 9。 1 の の の の 」. 2。 9。9。 さ 7 の 。 
20, の, 420。19 の 9 の , の, 19999 

169BO DaTQ 一 . 日 。 4,。49。 の 。 299。9 の 。 9。 214。69。 9。 2 日 。 6。 の 
。 さ 2 の 9, 2 の 。 の 。 さ 74 。 52。 の ②。 さ り の 』 59 。 の 。 44 の 。ー74。9。 4 さ 4 。ー44 
> 9。 457, 日 1 9, 45 晶 

1699 の DAT 。.7,-7 日 , の , さ 94』ー57。』 の 49 さ 。ー97。 の 。416』ー20」 
の の, 214,ー42。 ら 。279。ー26』 の 。 244』 さ ら 6 9。 6 日 。 さ 4 。 9。 76。 46 9, 日 
4。 .5。 4 の の の 。 209。 19999。 6909。 5 の 9。 1 の 9 の 9。. さ 。②。 209。 19 の 
の の 」. 2」 の 9。9。199 の 。。 1 。19 の 。 の 。 490。 24。 の 。 42 の 』72。 の 。24 ロ 2 
4。 の, さ 14。ー さ 2。 の 。 さ さ 2。ー14。②。 339』ー。9 

17999 DATA 2。49。 の 。 の 』 さ 2。 の 。120』59』 の 。 192。 ロ の 』9』212。 
ー6, の, 2B9。ー16」 の , さ 1 の 9。2。 の 。 さ 5B, 2。 の , さ 98。ー19, の 。 426。ー24 
の 。 4 マ 4。 一 日 6。 9。 429』ー1 1 の 9。 の 。 さ 99。ー1 14。 の 。 さ 69。 日 6。9』 さ 9 の 
ッ ー7 の 。 9。 25 の 。 日 9, の 。 299。 一 昌明, 9。 1 6 の,ー6 の 』 9。109。ー さ の 。 の 。 の 
49。 の 。 の 

17919 DATA .4,6,9。19。26, の, さら 6, 1 日 。9。120,22。 の 9。149, さ 
6」9。 194。 さ 2。 の, 219。 4。9。 249。 24 。 9, 2B の 。ー46。 の 。 さ 99。 54 
の 29 日 。 69。 9』 2 日 の 。ー6 の ②。 の 』 で 12」ー74, の 。1 昌 の 』ー74。 の 。169。』 一 
5 の 。9, 19 の 。ー2B。9, マ 2。ー1 の 9。 の 。』 1 の 。6。 の 。1 の 

1792O DATA .4。-69。』9。』 さ 5 の 。-44。9, さ 54。ー さ の 。 の 。 さ 66』 一 2 日 。 
の 9, さ 3B4 , ご 4 。。 492。 9。 の 。 412。ー ブ の 。 の 。419、 日 6。 9。 さ 9 日 。 9 
の , 9, さ 76。 日 6。 9』 さ 6 の 9。ー76。 の 。 さ 2 。ー ら 6 の 。 9。 さ 5 

179 さ の DATA 、7。ー2 の 。9。 さ 62。ー16』 の 』3 ら 69』ー ら 6。 の 。 さ 7 日 。 日 。 9」 
9 日 。 14。9。414。ー マ の 。 の 。 429』ー さ 2。 の 。414。 22。 の 。469。ー1 日 。 
の , さ B の 9, 29。 の さ 62 

17949 DATA .7,ー79。9。 さ 1 の 。』 64。9。 マ 1 日 。 64』 ら 。 さ 2 日 。 6 日 。 
9, ささ 4 , 日 9。。 さ 4 の 。ー96。 の 。 さ ら 62。ー1 の の 」 9。 さ 日 9」 194。 の, さら 6,。 
ー199,9。 さ 49。 日,9, さ 12。-79』 の 』 さ 1 の 

1795 の DATA .7。ー49。』 の 』12 の 』ー さ の 。9。』114』ー20。 の 。116』ー14。 
の @」12 昌 一 12。 の 』142。ー2 の 。 の 。15 の 』ー26。 の 。 154』ー26。 の, 16 の 』ー2 
の , 9。 179。 一 1 日 。 9。 1 日 6。ー2 日 。 の 19 日 日 。 の 。 2 の の, の, 9。 194 。 
ー54, の , 18 の 9, の 。 166。-49。』9』156。-49。 の 。 148, 44。 の 』1 さ 
4。-49, の 。 12 の 

17969 DATA .6,-69。 の 。 さ 69. 59.64。 9, さ 69.64。-59。。 
の , さ 79。 59。 64, の, さ 7 ウ 9. さら 6。 6 の 9, さ 7 の 。 呈 。 6 の 9. さ ら 6。 の 。 さ 7 の 。 さ 
6,ー69。 呈 。 の 。 さ 7 の , 6 の 9。 さ 6。 の 』 さ 69。64 。 6 の 。 の 。 さ ら 69 。6。ー69 
。 の 。 さ 79。ー69。5。 さ 79。 59。 4 . さ 。 う 7 の 。ー6 の 。 4。 さ 7 の 

1767 の 6 DAT . さ ,- さ 9, の 。 さ の 90,ー29。 の 』 マ の 9』ー29 。 さ 。 さ の の 。ー タ プ 。 
2, さ の 9,ー27 。 さ 。 さ の の 。ー29 1 の 。 さ の の 』ー さ の 。 1 の 。 さ の の 。 - さ 2。 さ 。 さ O の 。 
ー さ 2 2。 さ の 9。 一 さ O』 さ 。 さ の 9。ー さ の 。 9 さ 99 

176BO DATA . さ 。-5 の 』 の 。2 の 0,ー49。 の 。 29 ひ 』ー49。 さ 。 2 の 9』ー47 。 
2, 209。ー47。 さ 。 2 の 9, 一 49。 1 の 9。 2 の 9。 59。 1 の 。20 の 。 52, さ 。 2 の 9 。 
ー52, 2。 2 の 9。 5 の さ 。 299。 5O。 の 』 2 の の 

1799 の 6 DATA .5,- さ の の 99。 の 。 さ の 9 の 9 。 さ の の 99。 9。 さ の 999。 . 2 。 2 
4。 の 。 4 さ 4。 6 の 。 の 。479。 5O の の 。 の 。 1 の 9 の 。 。 2。 日 6。 の 。 42 の 9。 1 の 9@。 
の , の 。. 2。ー16。 の 。 さ 19。49。 の 。 さ 6 の 9。』 69。②。 さ 69。 1 の 09, 9, の 。 。2。5 
の 。 の 。 つ 12。99。 の 。 1B9。 1999。 9。 1 の 

1719 の DATA 一 .,.4。9, の 。179。 さ 9。 の, 2 日 。 5 日 , 9, 299 。 5 
。 の 。 296。 4 の 。 の 日 の 。ー72』 の さら 6。 49, の 。 499。 日 2。 9。 さ 94。 。 
フー12。 の 。 さ 4 2 日 。 9,414』ー7 日 9, さ 26。 6 日 。 の 。 さ さ 9。 一 19 の 。 の 
36 日 。 2 日 。 9」 1 さろ 。ー14。 の 。 149』 さら 。 の 。 1 の 。ー29, の 。 1B4。 48 
9。192 

1711 の 6 DATA . さ 。-29.5。,。 さ 99, 一 49.5。 王 。 2 の , . 5, の 。 199, 1 
の 99 の 。 、 1 。 の 。 の 。 9 の の 6 の 。 2 日 の 。ー1 さ 。 の 。 さ 1 の 。 。 2。 6 の 。 の 。 1 。 
54 9, 264。 1 の 9 の, の, 149。ー1 の の 。 の 。 さ 19。 一 19 さ 。 の 。 4 の 6, 69, 9 。 4 
2 の, 1@, の 。 432。 一 
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1899 の DATQ .2。19, の ,19 の 。12, の ,119。 1 の, の, 144, の, の 』156 
ュー29, の , 19 の , 一 4 日 ,O, 19 の , 74, 9 の 。 1 7 日, 日 6, の 。 159, 64, の 。 1 
の 9,-42, の, 日 4, 29, の 日 2,19, の, 10@ 
1B91 の DAT .4。-24, の 」120。ー14, の 。1 さ 2。 一 14。 の 。14 日 一 29。 
の , 169」ー さ 6, の, 166, 52。 の , 162」 64 の, 1 4 日 66。 の , 1 さ 4 。 
6, の, 12 の , 一 49, の,114。 24, の 。12 の 
18929 DATA .7。ー29, の,92。 日 , の 」 194, 4。 の , 1 1 日 。 - ら 。 の, 1 さ 
4, 日, 9,1 さ 4。ー14」 の 」116。 一 2 日 。 の 。1 の 6, 4 の 。 の 。 1 の 6。 52, の 。 1 
12,-54, の 。 1 1 の , 一 59, の 。 9 日 , 一 さら 6, の , 9 の, 一 2 の 9, の,92 
1B9 さ 9 DATA .7。ー2 日 9。 17 日 。 - さ 6。9。 1B2。 59。 の 。 1 昌 2。ー64 
の 。 176」 7 の, 9」162。ー7 の 9。 の 」1556 62 。 の 。 169。 52。 の 。179, 一 さ 
日 9, 1 72, 2 日 、9。 1 7 日 
18949 DATA . ら 6。- さ 2。9。139. 昌 。 一 さ 1 、64。9。 1 さ 9.64。ー マ 1 、。 
9」 149』ー う 1 . 64。9』14 の 9、 さ 6 ら 。ー う 2。9。149. ロ 。 2、 る 6。9。149. マ 
6,ー さ 2。 呈 9。149, きる. さら 。 の, 1 さり 。64。 一 さ 2 の 。 1 さ 9。 昌 。 . 6 さろ 
、9、149。 2、5。 149。 ささ 。 4 . さ 。 149。ー う 2。 4 149 
1895O DaTA ・ さ ,ー さ 9,@。199,-29。9。199。ー29。 さ 199。ー27。 
」199。ー27。 さ 」199。ー29。19。199。- き の 。1 の 。19 の 9。 32。 さ 。199。 
っ MM の 199。- マ 9、9。199 
1B969 DATR ・ さ 9,9,199,1。9,109,1。 う 。199」 さ 2。109。3。 
190。 1, 19。1099,9。19,199, 2。 マ 。199。-2。2。199。9, さ 。 19 
9 9、 の, 199 
18979 DAT .5,-3Oo9。9, さ 99699。 999, 9。 マ 9999。 . 2 8 
6, の, 1 の 。ー92、⑨。174。ー92。 の 。199」 一 弓 6」 9。 25O。ー54。9。276。 
ー42」9、 マ 94。ー46。 9。 る 14。ー56。9。 さ 12。 一 さら O。O。 の 。 2 19。 の 。 1 
の OO, 49。 の 。』124 5 の 。9。 126。 呈 6。 9。 116。54。9。 日 6 
189 ヨ 9 DATA 69。9。BO。74』9。74,7B。9,69。79。 の 。5O。 29, 9。 
49。ー26」 の 。2 つ 9』ー49。 9。9。、2。ー92。 の 9。1B9, 29 ひ 。 の 。 1B9。 、2。 一 
92,9,174,-299,9。 174。. さ 。ー5099 9。B909。 9。 1999。 昌 999, 
5o99, 9。 999 
18999 DATA 一 。 日 ,.4。-49,9。149,-22, 9。 156, 69。 9, 1 48。 
。 フ 。ー24。9」199。ー7。9。 12 昌 1, 9。 199。 56。 9 134。 ー さ 2。 9。 
178,-66,9。162, .3。 29.5,5。 199。1,5。 199。9,590,B999。 
.5。 る 5 の 9 。 55 の 。 99O。 さ 599 。 59 。 日 990. つ 。 の 。 9。 200 の 。 の 。 の 。 
2 の ,。 1 一 29。 の 9。 ら の 』ー96。⑨。179。 9 の 。 の 249。 一 。9 
1996 の 9 DAT 、 つ ,49, の 。 の 。5O』 の 。 6 の 。 5 の 。 9。99。 日 の 。 の 。 1 日 9 の 
の 。169。 9 の, の 』249。 1 の 6 の, の , 266。 1 16, の,294。112, の ,。 さ 49, 1 の 
の 。 9。 さ 6 の 9。76。9, さ 66 5 の 。 の 。 さら 。 4 の の 。 さ 16。52。 の ,299, 59。 の 








1282F9679 2297 GOr6717BzG39: ば 92949 の 39 
19919 DATR .4, の , の 9, 12。19,9,」 1 の, さ の 。 の, 29。 4 の 9, 49 49。 
9。 149, 44, 9。 176,50, の 。1B の 79。9。196, 7 日 9。 22, 7 日 @, 2 
49,64.9,272,56, 9,274,49。 9,264。ー14,9,210。26。 の 。17 
の 。ー2 の 」 の 。 1 さゆ ら 。ー14」 の 。 さ の 。 の 。 9。12 
19929 DATA .4,69,9。 さ 19,79, の , さ 94, 4。9, さ 94 9 日 9, さ 1 
っ 2, 192。 の, さ 2 日 9 日 。 9, さ 49。 99。 9』 さ 49。74。 9, さ 52。 69』 9。 さ 44 。 
54 。9。 さ 26。69」9, さ 19 
199 さ @ DAT .7,BO, の , 25, 日 4。9, 25B, 1 の, の, 2B の , 194, 9 
さ 94 。 1 の 2 の 。 さ G6。 日, の 。 294。 74」9, 29 の 。72。 の , 2 の 7 日 。 の 。 26 
B, ヨ の, や, 25 
19949 DAT .7。59, の 。169, 4 日 , 9, 1 2 の 9, 2」 の, 119, 69。9, 1 さ 
の 9, 7 の 。 9」 149。 日 つ 。 の 。 169。 2。 9,。 1 日 。 7 ら , 9, 199。56。 の 』174。5 
@, 9, 169 
19959 DQTA .1,9, の ,146, 1 の, の 9,1B9, 14,9。219。 1 昌 , の, 224 
」 16 の 22 日 。 1 の の, 224 一 1 の の 。29 の 。 一 14, の 。 1 の 。 一 14。 の 。16 の 
ー6, 9。 144。 9 の, の, 146 
19969 DATA .6,64,9, さ 25.5,64.36,9,325.64,64.5,9, さ 
26, 64.36, 9。 さ 26. さ 6, 64, 9。 さ 26.5。 6 マ 。64。9。 さ 26. さ ら 。 6。5 
の, さ 26。 6 さ 。 64 。 の, さ 25。64。64。9, さ 25.5。 . 6。64, の 326,。 64。 
5, さ 26。 6 4 . さ 。 26。 64。4。 さ 26 
19979 DATA . さ ,49, の ,1B の ,41, の , 1 の,41, さ , 1BO, 4 さ , 2, 1 昌 
の 9, 4 さ 。 さ 。 1 の 41 19, 1B9。 4 の 。 19。 1 の, 3 日 , さ 。 1 の , 3 日 。 2。 1 の 
, 49, さ 。 1 の , 4 の の 。 1B の 
199 ヨ の O DQTA . さ , 一 1 の , の ,79,-9, の 7 の 。ー9」 さ 。』 7 の 。ー7』 2。 7 の 一 
7」 さ 。 7 の 』ー9」 1 の 9, 7 の 1 の 」 1 の 』7 の 。ー12。 さ 7 の 。ー12。2。 7 の 9。ー19。 
さ , 79。 一 19, の ,。 7 の 
1999 の DATA .5,- さ 909 の, の , さ 6969, さ の 969, の, さ の 9 の 9 。 2。 1 の 
@, 9 の, さ 69」 1 の 99 の , の 。 199 の の 
1919 の 、 DQT 一 . 日 ,.4, さ 9, の, 1 の ,69, の, 279,B の , の , さ 29, 69。 
の @, さ 4 の 96, 9。 さ 3 日 . 7, 6 の, 2B の 。 1 の 1 の, さ の 9。 77, の 9。 227 。 6 の 
> の 。 15 の , 59, の, 171 79。 の, 185。 1, の, の, 1B9, 15, の , 224 
1911 の DQTA . さ ,49.5,5, 1 の 。-9.55。 5, 7 の 。 . 5, の 19 の, 1 の 9 の 
の 9,. 1, 9, の, 2 の . 2, の , の, 11 の 9, 1 1 の, の ,179, 1 の 6, の 9, さ 59。』 11 
4, の 69, 一 
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・1 の DIMDI(7@9) 

29 1=1 

さ 9 READ DI(I):IF DI(I)=-.9 THEN 49 ELSE 【=1I+1:GO 
Tnse 

49 BEEF: INFUT"FILE NAME"iFT$:UPEN " ロ "。 共 1。F1 ま :FRI 
NTW1,I 

59 FDR J=1 TO I:PRINT#1』DI(J) :NEXTJi CLOSE#1: GTO 
2 の 

21999 "XXX HULE1O DATA XX 

2191 の DQTR .2,2B, の 。 の , さ 6, の , 49。 日 。 9, 1BO, 日 。 の 。 192。 7 の 。 
9, 289, 199。9, さ 49, 194, 0, さ B4。 79。 の , 419,22。 の, 3 日 6。ー69。 
の 」2B の 』ー96。 9』216」 一 19 の 9, の 。 17 の 。-7 の 。 9。 1 1 の 。 さ O。 の 。 の 。 2 日 。 
@,9 

21929 DATA .4。 日 ,O。19」16, の , さ 6。 2 の 。 9 の 。 69。 日 。 9, 17 の , 1 
の , 9。 199」ー4」9。219。 さ 2。 の, 26 の 。 さ 4 。 の, 274」 24。 の 。 294 。 の 。 の 。 
296, 2 の, の 299」 52 の, 269。ー76。9。 222。 6 , の , 2 日 。 日 4 。 
9, 1 の , 日 9」 16 の 52」 の 。19 の 9。ー26』 の 。 2 の 』ー19。 の 。 1 の 9。 日 。 の 
19 

219 さ 9 DQTA .7。B4, の ,358, 日 , 9, さ 66, 日 2。 9, さ 日 9』 7 つ 。 の さり 
の @, 69。 の, さ 日 54 。 9, さ B6」 5 の 。 の , さ B の 9 。 52 。 の 9。 さ 72。 62。 の 。 さ 72。7 
@, 9, さ 6 日 。 7B, 9, さ 5, 日 4,9。 さ 58 

21949 DQT .4。72, の 。 さ 329, 日 2,。 さ さ 2。 日 の 。 の 。 さ 46, 6 日 。 の 。 さら 
の ,52, の, さ 66, 4 の の, さら 66」 さ の , の, さら 2 24 の, さ 52。 2 日 。 の, ささら 6。 4 
の 9, 322」 9。9。 さ 18, 72。 の, 32 の 

2195G DATA .6。79.5。 の, ささ O, 79. さ 6, の 。 ささ 9 . さら 」 79。 の, ささ の 
.5。69.64 の, ささ 9. 64, 69 。 呈 の , ささ の 69 64。 の 。 さ 29.64。 7 の 。 の 
, さ 29.5,79. さ 6, の, さ 29。 64。 79. 昌 。 9, ささ 9 

21969 DATA .6,』79,9。 さ さ の 9。 79。 呈 。 さ さ の 。71 。 4. ささ さら 。 7 の 。 4 。 
ミュ 9 

21979 DATA .7,69, の ,299」79。②。294。76, の, さ の 9 76, の , さ 1 
の , 72。 の, マ 14。 6 日 。 9」 さ 14,54。9, マ 19。 4 日 。 9, さ 1 の 6。 42。 の 。 さ 12。 さ 
日 , 9, さ 19, 日, 9, さ の 9, 4 日 」 9 ょ 299, 69。 9, 299 

っ 19BO DATA .7。14。9。 さ OO。 22。 9。319。 29。9。 さ 29。 24 の, さく 
の, 24 9, さ 40。 29, の, さ 42。 12, 9, さ 日 。 4。 の 。 さ 24 。2。 9, さ 19。6。9 
) さ の の 9。 14。 の, さら の 

2199 の 6 DATA .7。-56, の ,156, 59。9, 15 日 。-46」9。166。 5 の 。 
9, 1 日, 5O。 9。 1 9 日 , 5 日 。 2 日 。 一 6 日 。 の 。 207 。 7 ら 。 の 。 29 の 。 7 
日 9。 182。ー72。 の 』166。-62。 の, 156,ー5 ら 6。9。 156 

21109 DATR . マ 。ー7。9,75。ー フ 。 さ 。 75。 一 。 2 75。 5, さ 。 75。 7 
16, 75。 日 , 19, 75, ー10, さ 。 75。 10。2。 75。 日 。。 75, 9, 7 
5, -7。 の, 75 

21119 DAT . さ ,ー17,9。225,-17。。 225。 15, 2。 225,ー15。 
マ , 225, 一 17。 19。 225。 1 日 。1 の 9」 22 ロ , 2 の さ 。 225, 2 の 。 2 22 。 
ー1 日 , さ 。 225。 1 日, の, 225。ー17, の 。225 

っ 1 129 DAT .5。-39099, 9 さ OO99。 さ OO99, 9, さ の 99。 . 2。 79 
の 。2BO, 1 の 099。9。 一 1 の OO の 。. 2 69。 の 。 2BO。ー1 の の 99。 の, 一 199 
@9 

211 さ の DaTA -. 日 ,.4。20, の,290。- さ 9。 の 。199。 29。 の , 2B9 52 








9。 さ 42。.7, 7 の 。 の, 3 日 9, 6 の 」 の, さ の 2。 12」 の , マ 1 日 , 62。 の, 1B2。 。 
5, @, 19 の 0。 19099。. 1 の 9, 9。 200 の 」 2 79。 9129, 一 120」 の 。 1 の 
7 の 。 の 269』ー1 の 9 ⑨。 2 さ の 。 。 さ 。ー7 5。5。 75 

21149 DQTA 17. ロ , 呈 22 . 4, 76。 の, ささ 7」。 7 ュー64。 の, 266。 
2 の 9, の 。 さ 49」 2 。 の 。 さ 日 の, 49, の , さ OB。 4, さり 。 の 。 さ 56』 9 

22 の 0 の "XXX HULE11 DQTA XX 

2291 の DQTA 、2,99, の,99。11 日 , の 9。129。 129。 の 149。114。9, 
16 昌 92 の, 16。72」 の, 1BB,5O, の, 17 日 , さ 4, の, 18 の 。 16。 の 。 18B の 
」4。 の 。16 さ 。ー2。 の 。14 の 9。 9。 の 。12 の 」1 の 。 の 。96, さ 9。 9。 9 日 69。 9。 日 
B, 99, の ,99 

229 の 2 の DATA .4,94」9, 1 さら 6,96」9』146。 日, 9。162」79, 9。17 
の, 5 の 。 9。 1 6 日 , さ つ 。 の 」162」26。 の 。15 の 。 26。 の,149。 さ 4。9。12 日 。4 
6」 9。 12 の 0, 69。9。 120,BO』 の, 124」94。 の 9, 136 


"229 さ の DQTA .7」 9 の, の 」1 の の 9,92 つ 、9。』1 14』92。 の 。12 の 9。 日 6。 の 』12 


2。 7 日 。 9。116。79。 の, 114。69,9。114,54。9。 1 日 ,54,9。 9 62 
っ 9。92。 7 の 9。 の 994. 日 2。 の 9。92。99。 の 9。 1 の 9 

22649 DATA 7, 2 の, の 9。 194。 さ 2。 の 。 1 1 の 9。 う 34, の 9。 116,。24。 の 9。 12 

6。 18。 の 9, 142。 16。 の 。 142。19。 @。 136,』 6。 @。 12 の 。 1 の 9。 の 9。1 1 の 。29 

,@,194 

2295@ DATA .6,69。 の 。139.5, 69. さ ら 。 の, 1 る 39.64。69. 昌 。 の , 1 

4 の 9。 69 . さら 6。 9。1 4 の 9. さ ら 6。 69。 の 。 149。 呈 。 紀 9.64 。9。 149. る 6,59.。5 

の 。14O」59.64。 の 。 139.64。6 の 9。9。1 さ 9.5 

22969 DATA 6,69。9。 149。69。5。 149。61 。4. さ 。 149。 69。 4。 

149 

2297 の 9 DaTA . マ ,22。 の 9。 1 の 9, 2 う 。 の 。 1 の 9, 2 さ 。 さ 。 189。 25。2。 1 日 

の, 25。 うさ 。 1 の 。 2 マ 。 1 の 9。 1 の 9。 22。 19。 1B, 29。 3。 1B9, 29,。 2。 1 の 
22。 さ 。 1 の, 22。 の 。 18 の 

22oBo DATA ., 一 つの 9 の 9 。 9 , さ の 999 。 の 9 の 9 の 9 の, さ の の 99 の 。 . 2 99 

9。99, 19999。 の , 19999。 2。 114。 @。 16 日 。 19996, の 9。 19999 

2299@ DaTA 一 . 日 。. 4。69。 の 9, 124。99。 の 。 149, さ 9。 @, 146, .7, 

76, 9。 196。BB, 9, 118, 69。 の , 112。 16。9, 120。16, 9 13B。 9。 

の 」 1 14。.2。120, の 。166。 . さ 。 22 5。 ロ 。 1 日 の 。 ., 9」1 の の 0, 199 の 9 。 

。1 の 。 の 。 29 の の 9。. 2。 1 16。 の 。167。. 1 。 さ の 。 の 9, 96。ー。9 

2 さ OOO "XX HULE1 つ DQATN *\%% 

23919 DaQTR .2, さ の 。 の 。 の 。 日 の , の 。 1 の 9,94。 9 の 。 1 日 の 94。9。296。 

6 の 9。 の 。 2 つ 6 の 。 一 4 。 の ②, ささ の 。 - さ の 。 の 。 ささ 6, 一 74 , の 。 さ 2 の 。 9 の , の 。 2B の 

ー79。 の ②。 24 の 9。 - さ 4 の 。 229』ー16。 の 。 14 の 9, 20。 の 。 の 。 さ の 。 の 。 9 

2 さく 926 DATA 、4, の , の ,2 の 。 1 の, の ,29, 49, の ,49。74, の , 1 さ の , 日 6 

> の, 19 の 。 日 4 9。2 つ 1 の 9。52。 の, 269。 さ の 。 の 。 26 日 。 1 の 。 の , 269。 日 。 の 。 

246。 一 14, の 。22 の 9」 一 16, の 。 196。 日 ,。 9。 16 の , 4, の, 1 さ 4』ー19。 の 。 

4 の 。 の 。 の 。 2 の 9 

2 さ の 3@ DAT 4, 一 6 の 9, の 9。 さ の の 9。 一 72。 の, 29 の 。ー76。 の 9』 274。ー76。 

の 。 266。 一 7 の 9。 の 。 254 , 5 日 。 9, 25 の 9。 44 。 の, 25 の 。 一 さ の 。 の 262 。 一 2 

の , の 。 2 日 の 一 22 。 の , 2 つ 92 , 一 さ の 9 。 の さ の 4 。 一 44 の , さ の 6 6 の , 9, さ G9 

2 さ の 4 の DATA .7,ー2。 の 9。 さ の 9 。 4。 の 。 マ 14。ー14。 の 。 さ 24 。 一 さら 。 の 。 

さ 22。 46。 の , さ 12, 一 44。O。 さ 1 の 。 一 さ 2。 の 。 さ 1 の ,。 一 2 の 9, の,。 さ の 4 。 一 16。 

の 。 2 つ 9 の 9, 一 1 6。 の, 2B の 』ー19。 9, 22。ー2。 の, さ の 9 

23 の 5 の DaQTQ .7,29, の, 25 の 9, 2 の , 9, 244 24。 の 9,24 の , さ の 。 の 。 2 マ 
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リス ト 3 








日 , 49。 9。 2 さ 4 。 46。 の 。 234 。 5 の 。 9。 242。 46。9。 256, さ O。 9。 26 つ 。 2 
2。 の 。 25 日 , 29,9。 25G 
2 さ の 69 DATA 1. の, の ,222。- 日 。 9, 294。- 日 。 9。196, 4。 9。186 
ュー2。 の 。17 の 。 ら 。 の 9。169。 29。 の 。 1 5 日, さ 9。 9。 1 69。 さ 6, 9, 179。 さ 4。 
@, 176, さ 日 。 9。 1 昌 4, 日 。9。 194 。 さ の , 9, 292。 GO。 の 2 日, 1 つの 。 
26。 6, 9。 229。 9。9。 222 

<979 DATA .6,-49。9,289.5,- く 9.64, 0。289.64,- く 9.5。 
CE 
6, 一 4 . 5。 の, 299」 49. さ 6。 の 。 2B9. 64, 一 49,9。2B9.5 
239BO DATA .6,-49。9,299。ー49。 王 , 290, 一 さ 9。 4 . さ 。 29 の 。 一 4 
@,4, 299 
23999 DATA . さ ,42,9,129,4 さ 。 9。 129。4 さ , さ 。 129, 4 ロ 。 2。 1 っ 
@。 45, さ 。 129, 4 さ 。 19。 120。 42。 10。 120。 40。 さ 。 129。 49。 2。 129 
,42。 さ 。 120,42。9,120 
2 さ 1 の DRT .5。- さ 9999, の , さ 99 , さら 999, 9。 さ 9999」 . 2。ー1 
の 09 の , 9。 さ の 9 の 。 の 。 1 さ O9, さ の の GO, さ 5O の の 。 の 。 さ GOO の 
2 さ 119 の DATa 一. 日 ,.4,69, の ,24 の 。 - さ の の, 299, 5 の の , 275。 一 
7 の , の , 2 の, 2 の 。 12 の, さ の, の 。 6 の, の, 259。 。 7, さ 4 。 の 。 24 日 。 4 
4, の, 254, 24。 の 9, 256」 一 12。 の, さ 1 の 9, 44。 9, さ 12。 1 。14。 の ,199 
) の, の, 219, さ 9, の, 209。 . さ 。 42。 ロ ,。 1 2 の . 5 1 の の 99。 さ 99, さ の 
の 99, . さ , の ,BO9, さ の 999, . 2, の, の, 1 の 0 の, 一. 
24909 "XX HDLE1 さ 3 DATA xx 
24919 DATA .2, さ O, の, の, 49,9,79,26, の, 229」 12, の , 2B の , の 
, 9, 45 の 26。 9, 4 日 2 。 一 6 日 。 9, 5 の 9, 9 の 。 の , 5O の 。 一 1 1 4。 9。 4 7 日 。 
ー1 16, の ,49 の , 一 1 1 の , の, 269, 一 79,③。 1 の の,ー29, の の, この 。 の, の 
24929 DATA 、4。19, の 。 1 の,24, の ,69。14, の 。 2 の の , の 。 の 。 269, 一 
6, 9, ささ 9, 一 1 日 の 。 さ 62, さら 6, の 。 さ 日, 6 の 6, の, 39 6, の , さ 72。 
ー199。 の , さ 2 の 。 9 の 。 の 。 2 さ の 』 7 の 。 の 。 149」 一 1 の, の 。 1 の 。 1 の 。 の 。 1 の 
249 さ の DATA .4。-49,9,45 の ,-59, の, 466。 62。 の 。 472。 日 @。 
の , 479, 96。 9。 469, 19 の 9, の 。 45 の 。 1 の, の 44 の 94。 9。 42 の 。 
ーB2, 9 の, 419, -66, の , 4 日 52。 の 9,416, 一 42。 の, 4 さ 9, 49。 9。 45 
@ 
24949 DATA .7,- 日 , の 。 さ 94,ー19, の,』419, 一 16, の 9, 429。 一 14。 の 
。 4 さ 6, 一 2 の 。 9 4 4 日 , 一 さ 9。9。 489, 一 6 。 の 。 442。 さら, の 。 4 さら 。 46 
の, 419。-46, の , 49 の 。ー49。 の, さり 9。ー さ の 。 9。 3 日 2。 1 日 。 の 。 さ 2 一 
12, の, マ B4, - 日 。 9, さ 94 
2495 の DATA .7。-59,9, さ 42,-52, の 9, さ 56,ー64 。9, さ 62 。ー7 の 。 
の , 369, -B9 。 9。 さ 54 , 日 。 9, 49。 99。 の 。 ささ の, 日 日 , 〇 。 さ 1 4。 日 
の ,9。 さ 16, 一 79,9, さ 22。 5 日 , の , ささ 9 。 5 の, さ 42 
24969 DATA 1 。-29。9。220』ー2 の 9。 9, つき の 。 さら 。 の 246。ー46。 
の , 254 , 69, 9。 266,ー72。 の, 269』 一 B9。 9。 25 日 , 6, 9, 24 日 。 
4。 9。 239。ー76。 の 。 214。 一 6 日 。 9。19 日 54, の 。194』ー44。9。29 の 6。 
ー26, の, 294。 29」 の 229 
24979 DATA .6。ー69, 9。4 さ 9.5, 59.64 。9。4 さ 9.64。-59.5。 
の 。 449, 59. 64 。9,449。 さ ら 6」ー ら 69』 の, 44 の 。 呈 。 69. さら 。 9。 44 の 9. る 
6, 69.5, の 。449, 69. さ ら 6。 の, 4 さ 9. 64。 69。 の 。 4 さ 9. 呈 
249B9 DAT .6,-69。9。 449。ー69。 己 。 449。ー61 , 4. さ 。 44 の 。ー ら 6 
@, 4。449 
2 っ 4999 DATR . さ 。-3B,9, 149,- さ 7。 の 149,ー さ 7。 さ 。 149。ー さ 5。 
っ, 149, - 旨 。。 149」ー う 7」 19。 149』ー ミ 日 。 19。149。 49。 さ 。 149。 
ー49。2。 149。-3 日 。 さ 。 149。 日 9, 149 
2 っ 4199 DATR 、 さ ,-B。9。249。 7 の 。249」ー7。 さ 。 249。 5、2。 24 


9, 5, さ 。249。ー7。 19, 249。 日 19 249, 16, さ 。 240」 10。2。2 
49。 - 日 。 さ 。 249, 日 , 9 24 
24119 DATA .5, く ら 999, 9, さ 9999, さ 9999。9, さ 9999。 . 2。ー1 


MR キン キキ も 19999。9。ー1 の 

999 

2412O DATA 一 . 日 ,.4。-49,9。 さ 99。ー7⑨」 9。 449』ー4 日 。9。457 。 
ー94。 9, 4 日 。 69。 9 さ 76。 一 29 。 9』 さ ら の 。 92 9。 さ 4 の 。 2 つり 。 の 。 16 

の , 。 1 , 59。 の , 2 さ 9, る 9。 の, 242。 2。 の 24 

241 さ 9 DAT .7。ー26』9』419。ー29。9。 444』ー う 2。 の 。 444。ー7 の 。 

9, さ 49, -54。9, さ 54。 9。9。 さ 59 。 . 6 。 ー69 。9。 44 の 6 の 。9』 449 
降 和 ー ミ 7 . 5。 5。 149。-7.5。5。 249。 . コ 。 9。 199。 19999。・ 1,9。9 
259O 2 の 。9。 の 。759。 一 .9 

25OO9 XX HULE14 DAT xx% 

25919 DAT .2。 さ の, の 。⑨。1OO。 の 。149。1 1 の 9。 の 。18O。19B、 の 。2 
19。 1 の,9。 る 69, 一 16, の 。 さ 99, 一 59。。 499』ー74。 9。 さ 9 の 。ー9 の 6 。 の 。 
ミ 79。-90, の 。 さ 49 一 6 らら 。9。 2B。 ー29。 の , 23 の 9,6。9。219』16。9。1 
92。16」 の 9。179」 の 。9。144』ー2 の 。 9。 129。 -3O。 9。 B, さら 。 9。 46。 
ー2O。9』9。 さ の 。9。 の 

2592 の DATA .4,29,9。19。69。9。199,89,9。189,B9,9。209 
72。 9。22O』 さ の 。 の 。 2 つ 9O。ー4 。 9, さ 19』 2 の 。O。 さ 96。 一 2 日 。 9。 2 。 
ー26」 9, 27 の 」 ら 6, の, 22O。22、 の 。196。22。 の 。179。 4。9。129。ー14 
9。69」9。9。19。 2O。9。19 

259 さ 9 DQTA .4。-14。9。 さ 54。-2O。 の 』 さ 74。- さ 4 。 の 。 さ B4 。 56。 
9 の, 3B4 。 72。 ら 。 さ 76。 日 9。 9。 さら 9 。 日 の 。 の 。 さ 46」 7 の の 。 ささ の 。 
6, の, さ 24。 一 4。 の 9。 さ 2 ら 6 ー2 の 。 の さく 日 。 一 14。 9, さ 54 

25949 DATA .7。-5O。9, さ 99。 - さ 日 。 9。 さら 6。 4。 の 。 マ 1 日 さら 6。 
の @, さ 2 , 日 。 9。 さ 1 日 66。9, さ 29, 一 76。 の , さ 2 日 。 一 76。⑨。 さ 29 , 一 7 
ひ 。9。 さ 19、-5 日 , 。 さ O ら 。 5 の 。 の 。 さら の 

2595@ DATA .7,199。 の 。17 の 6。194。 の 9,1BO。104。 の 。199,162。 

9。299, 日 。 9。 229。 日 4 の 9』 21 日 4。 9。212。 6。 の, 296。B4 。 の 。 1 

92。 日 4 の, 1 ヨ 2,9 の 。 の 9』179。94。 の,16 昌 , 199, の 。17@ 

25969 DATA .6。-69。9。 さ 49. ロ 。 59. 64 。9, マ 49.64。 59 5。 

の , さ 5 の , 59. 64 の, さ 5 の . さら 。 一 69。9。 さ 5 の . 一 69. さら 。 9, 35 の . さ 
6,-69.55。9。35 ら 。 69. さ ら 6 の 。 さ 49.64。ー69。 9。 さ 49.5 

25979 DATA . ら 6。-69。 の 。 さ 59。ー69。, さ 5 の 』ー61 。 4. さ 。 さ 59。 ー ら 6 

9@。4,359 

25oB9 DATA . さ 。 さ 2 





。 ら 。 2 の , ささ 。 9。 299, ささ 。 さ 。 2 の 9。 ココ 。 2 。 2 の 


! の DaTR . さ 。 








fo, さる 。 10。 200。 32。 19。200。 さ 9。 さ 。 299。 


。 さっ 。 さ 29 。 さ 2。 の, の 


の, つ 。 つら の 








。 2 さ の 。 日 さ 。 さ 。 2 さ の 。 5。 さ 


、B2。 19。 2 さ の , 日 9。 さ 。 2 さ 9。 9 。 






ら , 85。 ミ 。239。B3) 19. 
,B2、 ミ 82。 の 。 2S の 
25199 DQTQR . ロ 。ー さ の 99 の 9。9。 さ O9 の 9 。 さ の 999 の 。 の 9。 さ の の 9 の 9。。 2。ー5 












9、9。499。 さら 999。 の 。 る O999 
25119 DaTA 8 . 4,-ー さ ら 6。 の,」 さ 54 』ー7 の , の, さ ロ 5 ー2。 9。 さ 72。 
の 8 39。9、 2B9。ー4 。 の 。 う 97。ー1 日 。 9。 394 。。 7 ュー ロ 6。 9 さ 1 






38B,9, さ 16。 一 74 。 の , さ 24。 92,9。 188, 8 日 。 1 る 人 2: 呈 
CE B2.5。5。2 り 。 ロロ 、 ウ 9。 199。 19999。 。 ュ りう,。 の 。 2 つの 99。19。9 の 
19 日 。. 2。ー19。9。4 さ 9。 49。 9, さ 59 。 1 14, 8 0 ど ぎ 良 
2 つ 6 の の の " ※ え HOLE15 DATR XX\ 

26919 DATN . つ 。49。 の 9。9。199。 の 。 日 9。12 つ 9。 の 。 149。129。 の 9。 2 の 

の 。 9 の 9。9。 つ 49。ー49。9。 19。 日 り 。 9。 さら 9。 96 。 9 。 つら 69。 日 の 。 の 。 2 
2 の 。 49。9 、179,29。9。 176。 さ 4。 の 9。 169。 一 29。9。 の 。 49。9。 ら 

2692 の DaTa. 4, ミ 9。9 19。69。 9 の 。199。9。 12 の 。114、9。169 

ュ 114、9。199. 昌 9、 の 2 さら 。 つ の 。 の 9。 SO 一 1 の 。9,。 2 さら 。 49。9。 19 の 

>ー マ さら 6。 9。 1HO。9。9。 1 ヨ 9。 さ の 9。 9。 1 日 6。 4 日 。 ウ 。 179。 46。 の 。 159。 の 。 

@。』 4 の 0」 ら 6」 の 。16。2 の 9。 の 。 1 の 9、 さ の 。 の 。 1 の 

269 さ 9 DaTQ .4。 ー69。 9 224 、 ー46。9。 23 の 。 2。 の 。 242。 2 日 

の @。269。 さら 6。 の 。27 日 。 ー52。 の 。2B4。ー74。 の 。276。- 昌 4, の, 25 日 。 日 

っ ) 9。249。ー72。 の 。 22 日 。 6 の 。9。 224 

2694 の 9 DQTR 、 プ 7。19。9。269。 日 。 9。2 つ 66。ー4。 の 9。274。ー22。 の 927 

ら 。ー26。 の 9。27 の 9。ー22、 の, つら 6 の 9。 2 の 。 9。 24 日 。 1 4。9。246。 4 の 9, 25 

2。 1 の 9,。9。269 

2695o DATA .7。- ミ さ 4, の 。2H6。ー49』 の 。29 日 , 56。 の 9。 さ の 92, 79。 

@。294。 76。9。 2B2。ー76。 9。 27 日 。 64 。 9。 2B6』 46。 9。 2 日 。 - さ 

8, 9、2B4 。 - さ 4 。 の, 2B6 

26969 DATQ .6, 一 7 の 9, の 9, 249.5。 一 69.64。9, 249.64 。-69。5。 

@。 259。 一 69 64 。 9。 2 つ コ 9. さら, 一 7 の 9 。 の 9。 259 5。ー7 の 9. さら 6。 9, 259。 さ 

6,ー79. 呈 9。 259。ー79. さ 6 。 9。 249.64。ー79。 9,249.5 

2697 の DATR . ら 6。ー7 の , の 。 225 の, 7 の 。 5。 25 の 。 69。 4 . さ 。 259 。 7 

9,4。259 

26989 DATQ . さ 。 う 2。9。 179, う ささ 。 の 。 179, ささ, うさ 。 17 の 9。 さ 5 る 。 17 

の , 35。 さ 。 179。 ささ 。 1 の 9。 179。 さ 2。 1 の 9。 179。 39, 3。 17@, る の 9。 2, 17 の 

。 さ 2。 さ 。 1 79。 さ 2。 の, 17 の 

26999 DaTA - さ 。 42。9。169。 4 さ 。9。169。 43。 さ 。 169, 45」 2。16 

9, 45, さ 。 169。 4 さ 。 19。 169。 42。19。169。49。 さ 。 16 の , 4 の 9。2。169 

> 42 。 さ 。 169, 42。 の 。169 

26199 DQTQ . さ ,B2。 の 。18O,B3。9, 18O, 日 さ 。 さ 。 1 の, 5, 2。 18 

9 の, 日 5, さ , 1 の 。 日 さ 。 19。 1B9, ヨ 2。 19。 1 昌 9。 9 , ミ 。 1B@, の , 2。1B9 

,B2。3。 189, B2, の , 189 

26119 DQTQ .5, 一 さ O999, の, さ O の 9 の 9 。 さ O の GO の 9, の さ の 999。 . 2 ー4 

の 9。9, さ 1 9, 29 の 9 。 の 9, 56 の 9 

2612 の DaQTQ 一 . 日 。.4。 昌 9。 の, 169, 9 の, 2 さ の 。 さ の 。 の, 246。 一 14 

。 9。 229, 日 。 の , 274 。 56。 の, 254』ー76, の 。244」。7。ー19。 の, つら 6 

の 6, の 9。264 一 22 の ,272。 56, の , 294 。 一 さら 6。 の , 2B7。 . さ 。 32 5) 

5。 179, 42.5。5, 1 69,B2 5 5 189 

261 さ 9 DQTQ 5, の, 19 の 9, 1 の 9 の の, 1 , の の, 2 の 99, 24 , 9。 164。。 

2 129。 の 。 12 の 。 ロ 9, 9。 さ の 9。 一 1 の 9。9。 さ 1 の , 一 . ワ 

279 の の "XX※ HOULE16 DATR \%※ 

27 の 19 DQTQ 、2,29, の 。 の 。24。 の, 6 の 9。 1 の , の 。 159, 1 の 。 の 。 1 の 6 

B, 9 の,。 さ 99, 7 の 9。 の 9, さ 4 の 。 48, の, さ 62」29」 の 9, さ 62。ー2 の, さ 46。 296。 

の ⑨, さ 16。 2 の 9。 の, さ の の 。 1 の 9。 の, 296。 一 2, の, 2B6。 4 の 。274。 一 2 日 。 

の , 262, 一 さ 4 。 の 。 27 の , 32。 の , 2B4 一 4 の 9, の, 286』ー9 の 9, の, 29 の 9 。 9 

4 の 。 166。 一 2 の 。 の , の 。 29。 の , の 

27 の 2 の DATA 。4。 の , の ,19。 1 の , の , 4 の,-4, の 。14 の 。ー4,9。 17 の , 1 

の 。 の 。 222 の, 14。 の, 24 日 。 の 。 の 。 2 つ 64 。 一 2 の の, つら 62 。 一 52, の, 2 さ の 。 76 

> 9, 1 日 , 7 日 , の 。 1 62, 一 さ の , の 。 4 の 。 一 1 の , の 。 19。9,9, 1 の 

2793 の 9 DATR .4,29。9。284,49,9。2B6,59, の, さ の 9, ロ 2 の 。 さ 1 

6。 4 の 9, の, ささ 4 。 26。 の 。 さ る 日 12, の, ささ 日 の, の, ささ 2 6, の, さ 22 。 一 

> 9。 さ 19。 一 2。 の, 296, 2 の 。 の , 2B4 

27949 DAT .7。12, の , さ 46。14, の , さ 42, 2 の, の , さ 4 の 9, さ 6 の 。 さ 4 

2。 48, の, ささ 4 。54 , の , さ 24 , 5B。 の , さ 26。 6 の の 。 ささ 2 54 9, さ 5 の 。 4 

の , の 9。 さ 56, 26。 の , さ 56, 12。 の 。 さ 46 

2795 の DATQ .7,- 日 。9。126, 日 , 9。1 さ 4 一 19。 の 。 144。 日 。 9。 1 

52。ー12。 の, 15B。 29。 の 。 15 晶 , 一 26, の 。 152。 一 28。 の 。 142。 22 の 

ょ 12B, 12。 の 。 124, 一 日 。9。 126 

27 の 69 DQTRQ .1。29,9。24 日 , 2 日 , の 9, 244。 42。 の ,269, 44。 の 9。27 

の 。 さ 4, の, 276。 29。 の 9。274 。 14」 の 。 279。 14。 の 。264。 1 日 。 の ,269。2 

9,9。248 

27979 _DQTQ .6, さ 9, の ,3 の 99 .5, さ の . さ 6 の ⑨, さ 99 64。 さ の. 呈 , の 。 る 

19, さ の . さ 6。 の 。 さ 1 の . さ 6。 さ 9。 の 。 さ 1 の 、 ロ 29. 64,9。 さ 1 の . さ 6。 29。5 

の 9, さ 1 の 。29.64 。 の, さ 99.64。 る の 。 の 。 さ 69 

27989 DQTQ .6。, さ 9。 の , さ 1 の 。 さ 9 の 。5。 さ 1 の 。 マ 1 。4.。 さ 19。 さ の 。 4。 

さ 19 

27999 DATA . さ ,-58B, 9 の, 17 の ,-57。 の , 179。-57, さ 。 179。 55。 
。 1 7 の,。 55, さ 。 1 7 の 。 57 。 1 の 。 1 7 の 。 一 SB。 1 の 。 1 7 の 。 6 の 。 さ 。 179。 

ー6@。 2 17 の 。 5 日, さ 。 179。 5。 の , 17 の 

27199 DAT . さ 。-1 昌 。9。169。 17。@。169。ー17, さ 。 16 の 9。 一 15。 

2。 169, 一 15, さ 。 169。-17。 1 の 9。 16 の , 一 1 日 , 1 の 。 169, 一 29, さ 。 1 6 の 。 

ー2 の 9。 つ 。169。 一 1 日 , さ 。 169。 一 1 日 。 の 。 169 

27119 DAQTA .,- ご GOOO, の , さ の 999 。 さ の の 9 の 。 9 。 の の 99」- 2。 2 の 

。 の 。 る 62。 2 つの 99。 の 。19 の の 

2712 の 6 DAQTA 一 日 。. 4。ー42 つ 。 の 。17 の 』 1 の, の ,229。 一 5 , 9。 226。 

の 。 の 9。269。19。9。 さ 1 の 9。49。 の 9。 る 1 の 9。 一 4。 の 。 る 29。。7。 49。9。 さ 4 日 。 1 

6, の ,」 さ 46,。 一 1 日 。9。142。 一 1 の 。 の 。 152。-24。9。 15 の 

271 さ の DaTA . さ 。-57.5。5。179。-ー17.。 弓 。 1 6 の 。 。 1 ,。 さ 9。 9, 26 








183 
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2, 42, の 。26 日 。 16、 の 。26 日 。9。 の, 2 の 99、 6, の 。 2BB 。 。 王 。 9, 199。 1 

の の の の 。. で 。 ロ 9。 の 。 さら 6。 日 の 』9。 さ 7 の 。 1 の 9』 の 。 269。 一 。 9 

2BG69 "XX HULE17 DQTQ xx 

2B91 の 9 DRTN .2。49。 の 9。 の 。 日 の 。⑨。99, 日 9。 の 。149。49』9。194。 の 

の 。200。49。9。1B9。 42。 の, 17 人 2。ー さ ら 。 の 。179。 一 29。 9。 17B。 

19。9。176。-14。9。179。- さ 4。9。156, 36。9。 13B。 29。 9。 114 

、 5 の, の 。1 1 の 。5 日 。。196。56」 の 。199。 の 。⑨。96。』ー う 6。 9。 日 9。ー さ 日 。 

の , 56。 さら 。9』9。 4 の 。9。9 

2B929 DATA .4。19。』 の ,19, 2 の 0, の 9。 さ の ,24。 の 。69。 日 。9,79。ー19 

の 。 7 の 。ー22 の 。 ら 9』ー2 の 。 の 。 人 4 の 。ー19。 の 。19。 19。 の 。19 

289 さ の DATA .4。12。 の 。11 日 、26, の 9。 126, さ 4。 の 。149, さ 2。 の 。15 

2, 2 の 。9。164。ー2。 9。166。 2 の 。9。 16 の 。 2B。9。 149。ー24 9。 12 

日 。 19,9。 129。12。9。11 日 

2B@49 DATA .7。49,9。129。52。9。11 昌 ,62。9。 1 さ 9。56。9。 15 

2。 49。9。179』 さ ら 。 9。16 日 。 49。9。 159, さ 日 。9。 1 さ 4。 49。9。 12 の 

2B959 DaTA .1。29。9。 12 208, 9。 179。 さ 2,9。176, 20。9。18 

4, 4.9。1B6。ー6。9。17 日 2。9。172, 29。9。172 

2Be69 DaTA 6。ー19。9。139。。 9。64。9。 1 さ 9。64。-9。8, 9, 

149」ー9.64。9。149. さ ら 。ー1 の 9。9。14 の 9、 ロ 。ー19.。 さ ら 6。9。 149。 さ 6。 一 

19.5。9」14 の 』ー19. さ 6。 の 。 1 さ 9.64。ー19。9。 1 さ 9 

28979 DATA 6』ー19。9。149。ー19。5。149。ー1 1 4. さ 。 149。ー1 

@,4,149 

2B989 DATA . マ 。ー3 日 , の 。18O,- さ 7。9。 1 の 。ー ミ 7。 さ 。 1B9 、 る 

っ, 18 の 。 さる ロ 。 さ 。 1 日 9。ー ミ 7 。 19。 1 日 9。 日 。 19。 1 の 。ー49。 さ 。 1 ヨ 9。 

ー4 の 2 19。 3 日 。 さ 。189 3 日 , 9。 1 

2B99 の 9 DATA . さ 。 つ 」 の 9』199, さ 。9。199。 さ 。 さ 。 199。。2。 199。 是 

さ , 19 の 」 さ 。 19。 19 の 9。 2。19。199。 の 。 さ 。199。 の 9。2。199。2。 さ 。199。 

2 の, 199 

2B19 の DATA . ロ 19999。 の ,19999, 19909。9。19 の 99。 . さ 。 日 

99 の 。 の 。19 の 99』 の 。 日 09。1 の 990 の 。 909」 9』19999。。、 で 。 の 。9。 29 の 。 

ー さ 900 の 69。 599 

26119 DAT -・B,.4。9,9。59。 

9, 2B」 の, 152。ー2 の 9。 の 9』 149。。7。59。9。149。54。9。159。 さ 日 。@。 

167, .5。-7999。269。19999, 5999。 2 19999。. さ 。9、299。 1 

9999。 . 2。 の, の, 1999。 . 1。-69。9。189。 一 14。 の 。 174。54) 9。 194 
ー19, 9, 2 の ,。 さ , 2.5,5。 199,- さ 7。5, 5。189 

2B129 DAT 1。 12。9。 17B, 2B。9。176。 。 さ 。2.5。 日 .5。 199。 2 

、5, さ . 19 の , 一 。9 

29999 "xx% HULE1B DATAX 

2991 の DATA .2, さ 9, の, の 。116。 の 。 1 さ の 。 1 の 9。 の , 269。 72。 の 。 さ 4 


20、 の 69。-2 の 9。 の ,69。 19。 の 。1 














の , 19, の, 45 の 。 6 日 9」 476。 一 1 19。 9。44 の 一 1 の 6。 9』 3 日 6 7 の 。 の 
ささ 9。 4 。 の 。 249。 14』 の, 1 さ の 。- さ の 。 の 。 の, さ の 。 の 。 の 

2992 の 9 DATA .4』2 の 』 の 」1 の 。1 の 9。 の 9。124。194。 の 。176, 92。 の 。2 

9。 7 の 。 の 。 さ 2 の 。 6」 の , さ の 。ー12。 9, さ BB。 26。 9』 さ 74』ー さ 9。②。 さ 

46。 の 。 の, さ の 9』 26。 の 。 2O9。 さら 。 9。149。 の 9。 6 の 。 6。 の 。 14。 6 @。 

6,29。9。1 の 

299 さ @ DQTA .4。-5O。9。 4 の ②。ー さ の 。 9』414』ー24 。 の 。 4 さ ⑨。 の 。 

の , 459。 一 4 日 。 9。 469。 6 の 。 9。 462。ーB の 。 9。 452。ー99。 の, 4 さ の 9。 一 日 

6」9。419。ー79。 の 。 499』 5 の 。 の 。 499 

29949 DATA .7。19。9,41B。12。9, 4 さ 2。 9。9。 459。 29, 9。 44 

61 日 , 9。429 、 さ の 。 9, 4 の 。 24。9。 さ 92。ー2。9。 4 の 。 19。9。41 

B 

2995O DATA .7。69,9,294。66。9。 さ の 4,54。9。 さ さ の 。 さら 6。 9。 さ さ 

6, 2B。 9 ささ 2。 さ 9。 の 。 う 29。 4 の 9。 394。69。9。294 

29669 DATA .1。- さ B。9。 さ 49, 49。9。 さ 69。 36。 9, さ B9 49。 

の @, さ BB ー ら の 。 ら 。 さ 9 の 。』 日 の 。 の 。 49②。ー99。 の 。 さ 96。ー94。 9。 3B9。 日 

B,9。 さ 69。ー6 日 。9, さ 3 日 。 42 。 の 。 さ さら 6。 日 。 9。 さ 49 

2997 ら DATA .1。46』9。124,54。9。12 昌 ,69。9, 169。56。9。19 

4,49』9, 214。 さ 4。 の 9」212。 さ O。 の 。 2O。 さ 日 の 。 179。 4S」 の 。 139。4 

6,9。 124 

299B9 DATA .6,-69,9,429.5。-59.64。9。429.64。-59.5。 

9, 439。 59。 64 。 9。 4 さり 。 さ ら 。ー ら 9』 9』 4 さ の 。 呈 。 6 の . さら の, 4 さ の 。 さ 

6』-69.5, の 。 4 さら 9。ー69。 さ ら 。9。429.64 。 一 69。 9。 429。 王 

2999 の DATR .6』ー69』 の ,4 さ の 。ー69。。 4 さり 。 59。 4。 さ 。 4 さ 9。 6 

の , 4。 4 さ 9 

29199 DATA . マ 。-18, の ,2B9,ー17,9, 2 の 。ー17。 さ 。 2B9。 1 

っ, 2B の 。ー15。 さ 。 2B の 』ー17。 19。 2 の 。 一 1 日 。 19。2H9。 2 、 さ 。 2 日 9。 
ー26 2。 2B9。 1 日 。 さ 。 2B9 一 1 日 。9。 2B@ 

29119 DQT 、,- さ OO の 9。9。 さ 9999 。 さ O999。 9。 さ 999 の 

29129 DATA .7。219,。19,.2 の 9。219』19。49 の 。 1 さ の 。19。499。 1 

さ 9」19。2O9。 19。19。20 の 9。 2 つつ O。9。199」129。9。199。129。9。4 

19,1 さ 9、19。499。 1 る の,19。20 の 9。129。9,199 

291 さ の DaT 一 日 。 4。B9、 の , 149,6②。9。 2BO。26、②。 376。ー12 

9, さ B5 49。 の 。 4 さ の 。ー76。⑨。4 さ 9, ー さ 4。9。 459。 9 , 9。 44 日 。 。 

7,46」9。 さ 16。52』 の 。 さ 2 日 。 さ 1 。 9。 さ さ 1 。 6, の 9。 426。 の 。⑨。 447。ー1 

B,9,444 

2914 の DATA .1」-66,9。 さ 79。-49。9。 さ 2。 BB 9。 さ 94 。 4 日 。 

0204626:208S8 き 219. ど 3: リ 7SSo5t Pdo' SL 88 

の 999。. 2、 〇 。 の 9。 日 の 9。 . 弓 。 125。 コ 。 さ 99。 1 さ 5。。 195。 7。 149。1 の 9 

。 さ 99。 15 ら 。 19」 さ 69。 一 、9 





ン テ ィ ニ ュー コマ ンド の 使い 方 


FM-8 デ ィ ス プレ イ ・ サ ブシ ステ ム の 説明 の な か っ た Con- 
tinue コ マン ド の 使い 方 を 説明 し ます (FM-7 の シス テム 仕様 
書 に 書か れ て いま す ). 

コマ ンド & バ パラ メー タ 

相 の 値 | 記号 | 内 
Don't care 
S'= 1 の 時 。 デー タ が 継 
続 す る こと を 示す . 

C コマ ンド ・ コ ー ド $64 
N 今回 転送 する バイ ト 数 | 1 一 120 
ECETO2ICOP3I デニ タ 転送 デー タ 











| S' | 継続 フラ グ ・ ビ ピッ ト (MSB) 
| 
| 








了 
3 
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この コマ ンド は 転送 する デー タ 数 が 多く , 一 回 で 転送 し き 
れ な い 場 合 に 使い ます . 初め に 送る コマ ンド の 継続 フラ グ ・ 
ピッ ト S' を すす に し そお きま す 。, 

コン ティ ニュ ー コ マン ド も S' を 1 に する こと で どん どん デ 
ー タ 転送 が 可能 で す . 





拡張 BASIC 使 用 上 の 注意 


た と えば , ^F- BASIC EXPANDER′ の 拡張 BASIC を 使う 
場合 EN ト を 作っ て くだ さい . こ 
うし な いと 中 間 言 語 が 決定 し な いた め に , 後 か ら 拡張 し て も 
2 












戦車 の 動き に リア ル 感 寺 遇 すす た め , 縦 方 向 に 1 ドット , 横 
方 向 に 3 ドット の 移動 と し , 移動 中 は キャ タビ ラ 部 の 回 転 
を 表現 し て いま す . 表示 な ど に 関す る プロ グラ ム が 1K バ 
イト 強 サ ブシ ステ ム へ 送り 込ま れ ま す が . ブロ ッ ク 転 送 の 
た め 1 秒 以 内 で 転送 を 終了 し ます . 

また , ゲー ム 中 で も [| STOP 3 は の 3 


も BASIC の モニ タ に 復帰 し Ready 状態 に 
CONT 命 令 は 使え を ませ ん . その 他 の 命令 は 表示 も 含め て す 
べ で て OKS で すし 

音 出 力 は 。 サブ か ら メ イン へ の 高速 割り 込み (FIRQ) で 
処理 し て いま す . た だ し , 低音 域 の ノイ ズ の 減衰 の た め , 
本 体内 部 の スピ ー カ ー で は 低 域 の 音 絡 処理 が まっ た く な さき 
で ゆな いい ので 。 どう し で も あの ズー ドド ドド ー シ と か ド 
ドド ー ン と いう 音 が 出 ま せん . そこ で 必ず 外部 スピ ー カ ー 
を 必要 と し ます . カモ ッ ト ・ イ ンタ ー フ ェ イ ス の リー ド 線 
(MIC) に 出力 し て いま す . 高音 は 下げ た 方 が よい か も し れ 
ませ ん . 

デジ タル で 表現 され る 減 裏 音 は , 何 か 物 を 引き 肌 く よう 
な 音 を 伴 な っ た 独特 の 音 で , 結果 的 に 味 の あ る バク ハツ 音 
が 得 ら れ ま し た . 許さ れる 男 囲 で 音量 を 上 げ て プレ イ す る 
と , 相手 を や っ つけ た と き の 快 感 は 一 段 と 増し . ス トレ ス 解 
消 に も な り ま す . 


プロ グラ ム の マシ ン 語 エリ ア は $ 5000 一 $658E で す . ゲ 


ー ム ・ ス ター ト は BASIC か ら RUN し て くだ さい . 


な 。D まお だ だ し 。 





全部 で 5 面 の ゲー ム で , 5 面 全 部 クリ ア す る と あな た が 
陸軍 大 佐 に 任命 され る , と いう ct ミレ ーション 的 
ゲー ム に な っ て いま すす (深く 追求 し な い ). 

各 面 クリ ア ご と に レベ ル が 上 が り , 最初 は 2 耕 の 戦車 で 
す が 最 大 レベ ル 5 で は 10 耕 の 戦車 を 相手 に 戦い ます . 

各 面 を 1 分 以内 で クリ ア し た 場合 、 そ の 時 間 に 応じ て 次 
の 式 で 計算 し た 数 の バリ ア が 与え られ ます (7 一 秒 /10). た 
だ し 最大 9 個 ま で で す . 

高 レ ベル に そなえ て 低 レ ベル で 早く ク ! 
ア を 獲得 し て お きま し ょ う . 

相手 と の 対戦 で は 必ず 相手 の 後方 より 攻撃 し て . す ば や 
くそ の 場所 か らら 立ち去り ます . 向かい あっ て の 撃ち あい は , 
必ず あな た が 勝つ と は 限り ませ ん . 

バリ ア は 原則 と し て どこ の 場所 で も 張れ ます が , 交差点 
近辺 で は 戦車 に 対し て 効き め の な いと き が あり ます か ら 注 
江 じ て で てく だ さい 、。 し が し 、 弾丸 に 諸 し で ば ず べ て の ど と の 
で 効き め が あ り ま す . 

また , バリ ア は あな た の 戦車 が 通る と 壊れ ます . バリ ア 
に 近づい て 弾丸 を 発射 し て も 壊れ ます が , 1 キャラ クタ 分 
以上 問 が ある と 壊れ ませ ん . な お 速度 は プレ イヤ ー の 方 が 
相手 の 倍速 に な っ て いま す . キー 操作 は TV 画面 を 見 て く 
7 の さ し S。 


ア し 多く の バリ 


図 1 バリ ヤ の 張り 方 の 良い 例 


に に 
必 包 





際 間 
PLAYER3 
本 


| | 隊 議 
1 1 8 


9 フレイ ヤー の 戦車 [バリ アァ 
注 ) レベ ル 4 か 5 に 入っ た 直後 。 この 3 箇所 に バリ ヤ が 張れ 
る と クリ ア 間 違い な し . 
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ぐら いで と ま ど い ます が , 少し や っ で 目 が 慣れ で くる と , 
レベ ル 3 一 4 ぐら いま で は バリ ア な し で も 勝て る よう に な 
り ま す . 問題 は レ し ベル 4 一 5 に ある よう で す . 

な お , カセ モッ ト ・ サ ービス で は FM-7/8 用 が 一 本 に な っ て 
完全 な オリ ジ ナ ル ・ ゲ ー ム の た だ ため, 最初 は レベ ル 2 一 3 いま す . 


口 
口 
口 
加 | 
口 


HHHHHH 日 








BASIC プ ログ ラム ・ リス ト EE 還 還 昌 昌 昌 昌 
19 COLR7 Oi MIDTHBO 。SOI DIMAZ (1 昌 ) BYMEBDL (160。10) 。" XX GAME Meg5ga ロ MX%% り 2 ブフ 





20 LHCATEO 。 さ PRTNT" セ シ シ | / 7 か n、 カニ ソル 7 ウオ 7 寺 JMKVM し コノ カニ ヨ デ ( 人 (トウ ササ EX 
"saFRTINTEFRINT" テ fE リリ スパ 5ー ス キー。 "saPRINT FRTNT" 7 ミリ チイ 8 セカ 、 0 吾 家 作 8 
すす %。 "sgFRTNTgFRTINT" DS リヤ 9 セ C2 も | エニ DU 下方 リノ ケー キー 9 オシ マヌ 。" 

さ QO_ FRINTsPRTNT "テキ / f-E ル ヤ ヲ コウ ケ " キ スル トキ ) カナ ラス " テキ ./ セ - 小 7 の ウロ へ マリ zz や カカ " つり カエ 
リ チ アナ ヲ コウ が! スル マエ ニ テイ Ez/ シテ コウ か "中 シタ アト スリ リヤ ソ ./ "ショ カラ タチ サリ ゅ テ の "サイ 。 村 三 力 れ 三 


ムカ イア リ テ ノコ ウケ "キリ アナ タカ" カナ ラッ " カリ トル カキ "リマ セ -7。 "FRTNT 

40 PRINT" の 上" リヤ ) コウ サテ ーッ ノシ ジュー バン 人 リ テキ ノ セン シャ ー ニ ダイ ガミ テ キキ メ フナ ゴト キ カ " EVEN アリ マヌ 。 7 タテ 
コウ サテ -。 ./ ナカ リ ソノ フタ ノ トコ ロト ト "ウヨ ウ ニ コウ リョ 2 か" アリ ッ ス 。 。 ゲッ カリン ニニ タイ マル キメ リリ スペ パテ ノ トコ ロ 
テ " コウ リョ カカ" アリ マス 。 ソレ ソレ し ニノ し ペ " ル ラ イリ フッ フ イナ イ テ " ウリ ヤー スル ト = が カン ニ オオ が テ リト リヤ カ 、 イカ 
サレ マス 。(9 コ マテ " )" 

BOT%=INFUT$(1 ) : MTDTHBO 。20 ーーーーー コノ MIDTHBO 』EO ) フフ 10 ニ カカ ワラ メ " カナ ラリ ルル 7 の" 11 
60 LINE(O』O) (6 さ 9。199) ,FSET 。 4 ,BF FURY=OTU6 さ 9STEPSELTNE(Y。O) 一 (Y。199) 。FBET 。 SE NEXT 
70 BOBUE220』 GBDSUE2 さ QBHSUBS40』 BYMBOL (G6 さ BZ) 。 "LEVEL 呈 "。2。1 2:FHKE&H6526 。10: SYMEO 
し (272。97) "FLAYER ネリ 。1」1。0:BYMBDL (27S。107) 。 "BARRTER 9"。1。1。OIFURE&H6 昌 2 プ 。 人 で 量 5 EXE 
C&H5OQO』 エ =FEEF (&H652B) : TFT= ミ THENBHSUB2SOs BUSUBS さ O BHTUBOELBE7Q 

BO_ FMSUE=S』LEVEL=1:FPLAYER= さ : EARR=0 ュ BYHEHL (160。122) "GAME BTQART"。4。2 EFDRT=OTDSO 
OO NEXT』i GUSUBR2SOI TITME ま ="OOEOOIOO" BUTD17O 

90 BOBUE22O 

100 IFFM=1THENLEVEL=LEVEL+1 :FMBUB=FMSUB+S BUTH12O 

110 1FFM=2THENFLAYER=FLAYER-1 』 BUTD160 

120 BYMEDL (360。184) "TIME  "+TIME$。2。1。0FHRT= ニ OTD2OOQOINEXT: BHSUE22O 

13 さ Q IFATIME:>QTHEN15QELSET= ア ーINT (BTIME/10) : TFTSOTHENT=Q 

140 EARR=RARR+T = ITFBARR >9THENEARR=9 

15Q ITFLEVEL=6THENGDSUE220:』 BYMEDL (日 122) "コノ コミ レー リア ナタ ヲリ ウリ グイ ササ ニー ニニ メイ ジマ マ e 
人 。15gLHCATEO 。O END 

160 BUSUB2 さ O 

170 1 中 =BTR ま (LEVEL ) : SYMEUL (26 さ 。 日 7) "LEVEL" キ エ 事 2。1 2sFUKE&H6 后 26 。FMSUE 

180 1 中 =SBTR ま (PLAYER) : BYHEDL (7S ワウ 97) "FLAYER "+ エ 1。1。0 

190 1 まま =BTR ま (BARR ) : SYMBUL (272 107) 』"BQRRTER"+ エ ま 。1 。 1 0:FUEEH6527 。 BARR 

2Q00 IFFLAYER=QTHENSYMBDL (172 ,122) "BRME VER" ,4。2。2rFHRT=OTU5OOOI NEXTI GUTD7O 

210 EXEC&H5OOO: EARR=FEE ド (&H6527) ょ FM=FEE ド (SH6 王 2 日) : TITME=FEEFE (&H6529) : ETIME=PEEF ( 
H6529) 』 GOTD9O 

220 FURY=4TD1208TEP5Bi LTNE (日 。Y) (6 さ 1 。Y+17) 。FSET , 司 ,BFELINE (日 。Y+18)-(55。Y+57) 。FSET 
) ロ ,BFELINE(200。Y+18) (247。Y+ 呈 7) , PSET , 呈 。BF LTNE ( さ 9 人 2 。Y+1 昌 ) (4 さ 9。Y+57) ,PSET 日,BFELI 

NE (5B4 ,Y+1 昌 ) (6 さ 1 』Y+ ロ 7) 。PSET 。 品 。BF s NEXTY:LITNE (日 。17B) (6 さ 1 195) 。FBET 。 己 。BF gs RETURN 
230 LTNE(25B 5) -( さ B1 ,114) 。PSET ,6。EF : RETURN 

240 SYMBDL (165。122) 。"DEMDNBTRATIUN" 。 さ 。8。7 

250 RESTORE260 ょ FURT=24BT ロ エフ 768TEF ミ 2gFHRJ=OT ロ 1 READAX (J) : NEXTJgFUT@( エ +1 6 ミ )ー(T+16 
ぅ 7) 。 AZ。PSET 。OsFUT@(T 。6 さ ) 一 (エキ 1。7B) 。Z。FPBET ,0: NEXTT RETURN 

260 DaQTA-2 昌 12B ,ー2B120 。ー2 フ 612 。 さ るー466』ー27664 。 一 2 日 1 347 日 2B126。 2 日 126」ー492 。4116。 

4104」-48B 。4196 。448B2 

279 DATA256 」ー2 256 。 2556 。 さ 2764 。 16644 ,16644 , さ 2 フ 64 。16644 16644 。 さ 2764 ,256 256 」ー2 256 。 
6 

2BO DATAO 。16 さ 76 日 200 。 16 さ 76 日 200 。 16 さ 76 0』ー2 BZ04 。16124 。 昌 70B , 15940 , ヨ 744 11792。ー ミ 54 
4。710 

290 DATA2OBO 。10BB 』ー ミ 0 4 。 さ 2 さ 24 。 16964 。 16964 。 さ 2 さ S4 。 16964 。16964 , さ 2324 。 16964 16900 。1 
6900 。 17932 

さ QO DAQTA-2 日 1 2B』ー2 日 120 。 一 27612 。 さ 8。ー466 2 フ 664 。 2 日 12 日 47 日 。2B126 一 2B126。-492。4116。 
4104』-4BB。4196』44B2 








Ps 放言 ダ ンプ ・ リ ス ト as 











dd  +O 1 +2 + さ +4 + 王 すら 6 + プ + 日 +19 +Q +B +C +D +E +F Sum Sum: B6 QF 1BR 45 BQ 7 76 OD D2 2 BE DB E1 DD BB 28 :D1 
5000 B6 FD 05 2B FB 1A 50 6 BQ B7 FD Q5 B7 FD 05 CE BE 

5O10 FC BO さ QO BD QQO 96 C6 4 Q6 BO 7 CO 5Q 26F9 7F se64 dd +O +1 +2 + さ +4 +55 +6 +7 +8 +9 + +B + ビ +D +E +F Bum 
5O20 FD 05 7F FD OS BE QOO CB さ Q 1F 26 FC CE 62 75 BE si7D 1QOO 76 E6 FD Q4 日 4 Q2 26 17 BE Q1 EQO BEF FF F6 6 40 ziD9 
5Q さ O_D1 OO B6 Q9 C6 さ 1 ヨ D ささ ミ フ 7F FD 0O5 7F FD 05 CE 64 』4B 11O BZ FD Q5 B7 FD QOS さ 0 BD FF 91 aF 69 35 76 3 る BE 6 』4 ミ 
SQO40 29 BE 7E BO 6 OB C6 3QO BD 21 7F FD 0O5 7F FD O5 sE9 ら 512O BO BZ7 FD O5 BZ FD 0O5 BZ7 FD 0O5 FC FC FE 10 BE FC soBH 
05Q ささ BBD Q1 DF BE BE 8Q 6 54 C6 さ 4 BD OE 日 6 O1 B7 』19 513Q FO 7F FD QOS5 7F FD 05 C1 FF 27 CD C1 OO 26 02 20 kaF 
5060 FC BO 7F FD QOS 7F FD O5 16 QO 9 DD OO B6 FD 05 』B2 5140 DB C1 QO4 24 Q9 FD 65 27 10 BF 65 29 20 CE CO 05 66 
5070 2B FE D7 O1 6 8O BE7 FD O5 BZ7 FD 05 BF FC FE さ 』69 515O 26 06 さ Q BD QQO 14 20 C2 5a 26 Q6 30 BD QQO SE 20 9D 
5OBO 10 BE FC Ca a6 CO 7 aO QA Q1 26 F F7 FC BO 7F 』2C ら 5160O B ワ 5 26 BB さ O BD QO BB 20 EQO 6 CB 97 QQO BE AO si1C 
5090 FD O5 7F FD QOS B6 FD QO5 2E FB 6 8O BZ FD 0Q5 BZ ziD7 5170 OO 6 BO 2EB 10 7F FD QO さ 1 さ F 31 ミ F 4 26 F4 Oa :29 
OO _FD Q5 B6 FC 0 26 EB Oa QQO 26 CZ 39 OO OO SF 59 siQA 518O QQ 26 EE 20 07 C6 41 F フ 7 FD OO 20 EC 6 64 97 Q0O :E さ 
SOEO 41 4D 41 55 4 ミ 48 49 9 くさ D ミ BF 90 B7 D4 QA B6 D4 s9C 5190 A6 BQ 2B 17 7F FD QO D6 QO 5 ミ QA QQO 26 03 16 FF 55 
SQCQO OB B6 D4 O9 B6 D4 Oa 7F D3 BO 7F D ミ BO 7F D ミ 8BO za5 51QO_ 5C 5 12 12 26 FB 4 26 E9 20 E5 C6 41 F フ 7 FD QQ gi52 
5ODO B6 D4 QA _B6 D ミ BO 27 FB 1 Q1 27 15 BZ D4 Qa BE7 .:C6 ・51BO_D6 QO 58B QA QO 26 Ea 16 FF 4 さ CC O1 2C DD OO DD :5 ミ 
SOEQ D4 QR FE D さ FE BE D さ 3 CA E6 8BO EZ7 CO 4 26 F9 20 kz6E 1CO_O02 BE AO QOQO A6 8BQ 2B 18 7F FD OO 97 Q5 DC QQO CS 』5QO 
SOFQO _D6 7E BE BO さ 0 BD QQO OZ BF FF F6 1C OO 20 FE さ 4 sz78 呈 1DO _QO_O2 DD QO 日 ミ QO _O1 26 FE 96 05 4 26 EB 20 E4 』79 
ご と テー ニー デビ デニ ニニ ビニ ーー デデデ ニ ニニ デニ ニー ニー ニー ニー ニー ニー ニー デー ビニ ニニ ニ テニ ニー ニ デニ デニ ニニ ニニ ニテ ー デ 51EO_ C6 41 F7 FD OO 97 05 DC O2 ヨミ 3 OO _O2 DD 02 26 E4 :E さ 
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戦車 最前 線 





マシ ン 語 ダン プ ・ リ スト 














dd +O 1 +2 + さ +4 + ロ +6 + プ + 日 +9 +A +B +C ビ +D +E +F Sum 
5700 2 さ BB 54 日 1 FC 26 QOS 4F さ Q 1F 6 21 7 2 くさ 16 Q2 』B5 
5710 15 97 さ 2 96 4F QAQ 21 10 24 FE BD 6 QOa 97 さ 33 CE so6B 
720 DO 59 EC C4 ささ 49 91 32 27 QD QA 3 ミ 5 26 F4 17 FE 』BB 
dd 。 +O 1 +2 + オ さ +4 + 品 + せ 6 + ブ + 日 +9 + +BH +C +D +E +F Bum 73O 9 さ 4 27 CB 16 QO2 68 E1 21 24 EF D1 4F 2 さ EB 16 』^a6 
5200 QQ_Q1 DD QO 3 QQO Q1 26 FB DC Q2 8 QQO Q1 DD Q02 sgC4 5740 FE 5 さ 4 10 26 FE 71 EC 89 7E 70 CS Q0QO Q1 1Q0 26 』9a 
5210 26 0O3 16 FE EB BE QQO QQ 97 05 6 BQ 4 Q1 26 QC kgCC 5750 FE 62 EC A4 BO Q4 91 4E 26 2D 96 0Q DO 4F 24 14 』E さ 
220 7F FD OO 96 Q5 ミ QQO O1 26 EE 20 CE 6 41 BZ7 FD 1 5760 5 さ CO QB 1Q0 25 FE 2E 日 1 0Q さ 26 1C 17 FE 6 4 27 』2E 
52 さ O_ 00 20 FO 20 24 BE CO OO 6F 8Q BC CZ7 DO 26 F9 86 sz59 577O さ 2 16 FE 21 CO 10 10 25 FE 1B 1 O1 26 0Q9 17 FE 45 
5240 07 A7 BQ BC PF QAQO 26 F9 6 FF BZ7 D さ FF B6 D4 04 :E4 コ 7B0 55 48 27 6 16 FB QE 96 4F E6 21 ビ 1 Q ミ 3 26 45 日 1 』E9 
5250 B6 D4 O4 BEB6 D4 Q4 7E EQ 27 BH7 D4 Qa B7 D4 Qa 3 さ QO :FH 5770 Q5 10 25 QO DB a6 a4 日 1 日 2 26 2E 96 15 4 OQ1 10 』F さ 
260 BD FF D2 EF DO QO B6 D4 Q2 1C OO 16 OE 10 Aa6 4 』1 ミ 7AO 26 QO C さ 6 9 7F B4 4 さ 1O 26 FE QB A6 9 7F BB 30 
5270 C6 50 さ D 1F O1 E6 21 さ QA6 4 4 さ 10 27 0 さ 39 6 sz5a 57BO 4 さく 10 26 FD FF 17 Q1 2 さ QO 9 279 20 6 Q1 a7 22 giD1 
2BO 22 E6 24 10 27 QQO 8 Ga 27 03 16 0 2H E6 25 6C sgFA 57CO_ A6 a4 BO Q4 7 a4 16 Qi 64 日 1 4B 27 CE 1 OE 27 iQ 
5290 25 CO OF 27 14 6 22 4 10 27 Q6 91 4 10 27 Q06 96 57DO _D2 16 QQO 92 C1 1B 26 52 B1 1D 24 06 日 1 16 1Q 24 』61 
52A0 46 4 10 27 Q6 0 16 055 FE 6F 24 6F 25 6 22 4 :9C 57EO _QQ BB 6 4 日 1 ヨ B2 26 さ 0 96 QC 4 Q1 26 AD 6 B9 gi5Z 
52BO 26 Q7 C6 Q3 EZ7 22 16 06 6D 4 26 09 C6 Q04 E7 22 :D4 7FO 7F QAD 43 10 26 FD BD 6 9 7F 9 4 さ 10 26 FD BE4 iEO 
260 日 D 16 16 QE 'DF 49'26 0Z' 6 01 7 22 16 06 BE 6 :24 || ニー ラー デー ニーー ニ ニー ニー デー ニー ニー コー マー ニー ニー ニニ ーー ニー ニー ニー ニー マー ニニ ーー ピー デー ニニ ビ エー ニー デニ ピピ 
52DO 0O2 EZ7 22 BD 0 16 06 QF 34 10 17 06 7D 35 90 4 :EB ミ Sum:i D さ AH 7 ミ さ E2 QA4 9 ミ さ E5 77 SE 1E F2 C6 E さ さ Q QB 36 sEB 
52EQ 10 26 Q1 60 EC 9 0 F6 3 QQO O1 10 26 02 CS EC zi2F 
52FO 4 CB 05 D1 4F 26 2D D6 5O 9o 4E 24 12 4 ミ B0 2 zo の dd  +O 1 +2 + さ +4 + 品 + ら 6 +7 + 日 +9 +A +B + ピ +D +E +F Bum 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 5BQOO 17 Q1 7 30 9 279 1C 6 22 a6 a4 BO Q4 a7 a4 6 』08 
Suum: RE DO ED F 4D 0 5E 9F 2 49 D5 0 ミ F2 26 FB 0OC :S5C 5B1O 21 BO Q4 7 21 16 01 QE 日 1 4 27 CC BB1 QE 26 46 1』49 
SB20 96 15 4 Q1 1Q0 26 FF 7B 20 C4 C1 ささ 26 1 1 35 saC 
dd +0 キ 1 +2 + ニ +4 日 + す 6 + フ + 昌 +9 + +H +C +D +E+F Bum BB3O 24 04 日 1 2E 24 さ フ 7 a6 a4 日 1 2 27 AC B1 4 27 aB isEA 
55 さ OO 10 25 FF 91 C1 QO4 26 1 ビビ 17 O2 CB 4 日 27 さ 2 16 FF s66 5B40 1 QE 27 DC 20 20 C1 4B 26 1C 1 46 24 1F 6 A4 』74 
呈 る 10 4 O 2F 10 25 FF 7E C1 02 26 09 17 02 BB 4 27 :17 5B5Q B1 B2 26 QB 96 15 4 Q1 26 94 20 Qa 1 4 27 F4 』29 
弓 さ 2 の 0 69 16 FF フ 71 6 Aa4 D6 4E 1 On 26 44 C1 11 10 2 :59 5B60 日 1 OE 27 BA 20 QQ 6 QA4 30 BB BO 20 さ フ 7 D7 ミ 2 96 iCC 
0 QO C1 :EB9 .5870 4E AO 4 1O 24 FD さ 1 6 QQ 97 33 CE DO 59 EC C4 :F5 
10 26 : さ 4 5BBQ D1 さ 2 27 OF ミミ 49 QQ ささ 26 F4 17 FD さ 7 4 27 D6 』9C 
| EB 21 』45 5B90 16 O1 OF 1 4 24 ED 91 4E 25 E9 6 42 B4 Q1 26 』F9 
360 E7 21 16 Q5 2 日 1 2E 27 CF 1 46 27 D く る 16 OO 91 :B2 5BAO E さ 16 F9 F1 CE D1 28 6 4 4 Q1 26 0 CE D1 4C 8BD 
5 さ 370 1 44 26 3 C1 4B 24 06 1 さ 2 10 24 OO 95 6 21 』F フ 7 BEO さ O 9 Oz OO 6 12 97 32 EC C1 ED 4 さ Q0 5Q QA 』CA 
5&BO 81 16 26 さ 32 96 QOC 4 O1 26 AE A6 89 7 E5 43 10 iCD SBCO さ 2 26 F5 さ Q 9 7H SO 6 Q5 C6 50 CE Q3 CO EF B4 』76 
5 さ 90 26 02 21 a6 9 79 C5 4 10 26 02 18 17 05 DS 6 iCO 5BDO 3Q 4 26 FA CE D1 OO 6 QR 97 ミ 2 EC C1 ED 4 3O 』EA 
53AO Q4 人 7 22 さ QO B9 7 65 QA6 4 0 OB A7 4 6 21 BB :DZ SBEO BB SO _OA 2 26 F5 39 CE D1 14 6 QOa 97 32 EC C1 』21 
53BO 05 7 21 16 Q4 EE B1 2E 27 CA 8B1 46 26 4 さ 3 96 15 :5O 5BFO ED 4 3O BB 5O OQ 32 26 F5 6 05 C6 5O CE O ミ 3 CO 』02 
RBO 人 OGA PR 7 の 5 昌 17E 6. ま 昌 .6Y 'B: 24-04 BT る B、 | つう デ で ピピ ビニ マ マニ デビ で アデ ニー ニニ ピ ビー マー ピー テ ゴ ロ ロワ デバ ビビ ニー エラ ビエ マー アロ の ビッ ラテ 
DO 6C 24 40 A6 21 日 1 16 27 Aa7 1 2E 27 D9 日 1 46 27 』99 Sums 9E EE 79 09 DO B9 13 9 A3 5 32 40 2F 7B OB 42 iB4 
5 さ EO _D9 20 1E 日 1 B 26 1 C1 A6 24 2 A6 21 B1 16 26 :C フ 7 
SFO QB 96 15 4 O1 26 QA 20 91 日 1 2E 27 F4 1 46 27 』D1 Rdd 。 +O +1 +2 + さ +4 + 昌 +6 +7 + 日 4 +a + 日 +C +D +E +F Sum 


に ーーー ター ミ こ 1 900 EF B4 さ Q 4 26 FQ CE D2 6C 6 4 B4 Q1 26 0 CE :E9 
Sumi BE 2D CE C5 4E B2 5910 D2 90 さ O 9 7B 5O B6 12 97 さ 2 EC C1 ED 4 3QO BB 』1D 
5920 5O QA さ 2 26 F5 さ 9 さ 4 10 BE 7E BO 20 05 さ 4 10 BE ia7 








dd 。 +O 二 1 +2 + ミ +4 + 品 +6 + ブ + 日 +9 +A +B +C +D +E +F Sum 59 さ O D1 70 E6 2 さ 3 1F 1 ささ 5 10 ヨ D 0Q7 さ Q 9 7D DO D 22 
5400 日 9 6 23 BB 54 B1 FC 26 Q5 4F さ O QO1 6C 21 a7 23 』BO 5940 O1 39 6 0Q7 97 さ 2 EC C1 ED 4 EC C1 ED 02 EC C1 』FZ 
5410 16 O5 1 97 32 96 4F AO 21 10 25 01 BE B6 On 97 』BC 595O ED Q4 3O BB 5O Qa ミ 2 26 ED 39 B6 12 C6 5O CE FF FC 
5420 33 CE DO 9 EC C4 33 49 91 32 27 OD Oa さく 26 F4 』a4 5960 FF EF B4 さ Q 4 26 FA さ O B9 7 60 6 12 EF 4 3 iEE 
543Q 17 Q1 91 4 日 27 CB 16 05 66 E1 21 23 EF D1 4F 24 :BC 5970 4 26 FA 39 86 07 C6 5O CE FF FF EF 4 EF O2 EF 』65 
5440 EB 16 FE 51 4 10 26 O1 6 EC 9 6 EO C ミ OO O1 16 598O0 04 さ Q 4 26 F6 6 07 30 9 7D DO EF 4 EF Q2 EF si8A 
5450 10 26 O1 6O EC 4 BB OE 91 4E 26 2D 96 5O DO 4F :FZ 5990 04 SA 4 26 F6 39 16 0Q2 19 16 Q6 75 16 Q6 Ba A6 ぉ 』EB 
5450 24 14 ロス CO OB 10 25 FE 2C B1 0 さ 26 1C 17 O1 66 sF9 計 9a0 25 10 26 OO CD 6C 25 EC 4 10 B3FF FF 10 27 Q1 』12 
470 4 27 さ 2 16 FE 1F CO 10 1O 25 FE 19 日 1 O1 26 09 』a1 59BO FC ED 26 1Q BC DO 4E 26 Q4 96 5S0 97 B さ E6 22 5 』B5 
5480 17 Q1 紀 ミ 4 27 69 16 FE QC 96 4F E6 21 C1 0 さ 26 』39 59CO 26 10 ささ BD Q6 7 A6 21 BB 06 B1 4E 10 24 Q1 DD iaF 
54?0 44 B1 05 10 25 QO DA A6 4 B1 ミ 6 26 2C 96 15 4 :5B 59DO 7 27 SQ 26 10 3 さ 8BD 06 71 a6 a4 BB 14 B1 BE 10 』CD 
54QAO O1 10 26 QO C4 6 B9 B5 54 4 さ 10 26 O1 Q6 Aa6 B9 :B2 59EQ 24 Q1 CA AZ 26 5 26 10 さ ミ 3 BD Q6 6C Aa6 21 BO_ 02 』 ヵ CZ 
54BO BB 5B 4 さ 10 26 0QO FD 17 04 AO 3Q 89 7E CO 6 22 :91 59FO B1 02 10 25 Q1 B7 7 27 5 26 10 ささ BBD 06 63 A6 s5D 


54CO_A6 A4 BB QOE 7 a4 16 Q4 64 日 1 70 27 DO B1 Aa 10 sgCF 
5490 26 00 96 20 DO C1 1B 26 52 1 1D 24 Q6 日 1 16 10 6F 
紀 4EQO 24 OO BE 6 a4 日 1 36 26 30 96 0C 4 01 26 AE 6 zaAA 





54FQO B9 5 4D 4 さ 10 26 00 BC 6 89 B5 49 4 さ 10 26 OO 』06 Add  +0 +1 +2 + さ +4 +5 + ら 6 +7 +B + す 9 4 HTC 4D E+F Bum 
ーー を こと の 5AQO A4 BO OQ B1 O4 10 25 O1 a4 7 26 BD 5 96 52 10 』 さ 9 
Sum: QA 04 DF C9 39 4 Q7 7D 24 6D ミ O F7 E9 2E D9 aC :OB 5610 2B O1 32 6 22 C6 07 B4 O1 27 O5 CO Q2 3Q0 BB 5Q 6E 


5SDO 39 B6 O2 a7 24 さ 9 34 10 BE DO SD CC QA 09 97 
55EO QA6 4 B1 02 27 Q7 3 OA さ 2 26 F5 96 52.35 90 
SS5FO 10 26 Q1 4E EC B9 BO EE C さ QO Q1 26 B7 EC A4 














5600 4F 26 2D D6 5O 90 4E 24 14 4 さ 0 2 くさ 10 25 FC 5 』7a BEB40 6 27 さ 9 E7 26 39 6 FO 7 9 QQO FQO AZ7 9 Q1 40 s17 
5610 C1 Q4 26 1C 17 FF BF.48 27 32 16 FC 78 BO 2F 10 』C6 5BSO_A7 9 BO FO AZ7 9 B1 40 39 10 BC DO 4E 27 09 B6 3 人 8 
5620 25 FC 72 C1 Q2 26 09 17 FF aC 48 27 62 16 FC 65 :BF 5B6O 01 97 2E CE DO 4E 20 07 CE DO 59 6 OQ 97 2E A6 iCB 
弓 63 さ 0 A6 an4 D6 4E 1 QQ 26 さ D C1 11 1O 25 OO D ミ 6 21 』FD SB7O 42 4 Q1 26 Q6 6 15 C6 Q1 20 Q4 6 QA C6 QO5 DD gsB1 
S640 日 1 ささ 26 26 96 15 4 O1 1Q0 26 OO B3 a6 B9 85 a0 』6D 5BBQO さ 2 EC C4 BO Q3 Ai1 26 2 さ 12 ささ 49 QA 2E 26 EQ DC :F フ 7 
565O 4 さ 10 26 FF 5F A6 B9 BB CO 4 さ 3 1O 26 FF 56 17 0 ささ 6 5B9O FO ED 26 1O BC DO 4E 26 14 20 B6 9B 32 a1 26 25 』56 
5660 1 さ さ O 89 7D DO 6 22 16 02 7D B1 1B 27 D6 B1 OS 』5 フ 7 BAO EB E1 27 22 E4 DE ささ E1 27 25 DE 6C 48 6F 24 6F :C5 
5670 27 DA 16 QO Ba B1 44 26 4 C1 4B 24 06 C1 さ 2 10 』OF 5BBO 25 39 96 04 27 23 OF Q4 5F BO 1C 26 02 C6 O1 4 』B9 
56BO 24 QO BE 6 21 昌 1 ささ 26 2 96 OC B4 O1 26 B5 Aa6 』25 5BCO 26 QO2 C6 Q さ 4 26 02 C6 QO4 4 26 Q2 C6 02 4 27 sDB 
5690 B9 7P EO 4 さ 10 26 FF 1C A6 9 79 CO 4 さ 10 26 FF :59 5BDO 6C C1 OO 27 18 D7 5 OF 57 96 52 1 02 26 07 10 』a9 
6AO 1 さ 17 02 DO さ O B9 7 6O 6C 22 a6 a4 O OB A7 A4 』 さ D 5BEQO BE DO 4E 17 FD BE9 96 57 27 6C 16 Q2 E5 96 52 26 』04 
56BO 16 Q1 F1 日 1 1B 27 D2 B1 0Q さ 26 44 96 15 84 Q1 26 』E1 5BFO EB QF 5B Q ミ 52 10 BE DO 4E 17 FD Aa3 96 52 10 27 』36 
56CO CE 20 B9 日 1 7E 26 1B C1 5 24 Q4 C1 6C 24 42 人 6 』5B | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
56DO 21 1 ささ 27 B4 B1 1B 27 BO 1 0O さ 27 DE 20 20 1 seD Sum: C7 44 4B BB 7D 11 46 CO 90 9B E2 1D 7D 60 aQ 98 』E4 
56EO BB 26 1C C1 6 24 2 6 21 日 1 さく 26 OB 96 15 4 :BZ 
56FO O1 26 9C 2O QA B1 1B 27 F4 B1 Q さ 27 92 20 OO Aa6 :AZ Rdd  +O +1 +2 + さ +4 +55 + ら 6 + フ +B+9 +a +TB +C +D +E ォ + ォ F Sum 
こち と ピ ーーー 和 戸 ロー ニニ ニー ビデ ニ ーー ニー テー ニー ニーー ニ ーー ニー ニニ ニー ニー ニニ ーー ジウ ーー ウー ニー デー 5COO Q2 DO OF 52 QF 5 ミ Bo 7F 7E 10 27 O2 CS 7 7F 7E :BD 
Sumi 57 98 5B 66 97 QB 5 5D AO EZ 76 さ 6 79 CS 16 91 』6Z 5C1O Co 5O CE AA AR BD 1D <QO B9 7D DO CE 55 55 BD 14 iQ1 
5C2O B6 Q7 BD Q さ 7E 7F BE BZ D さ FF B6 D4 Q4 B6 D4 Q4 :7D 











187 


戦車 最前 線 


マシ ン 語 ダン プ ・ リ スト 





| 5Cso Bo D4 04 39 B6 Q7 EF 


5C40 Q4 OoC 57 20 94 8B6 02 
SC5SO O5 BD D2 16 FF B ミ 96 = 
SC60 26 QO AD DC 4E 1 QA 
CZ70 27 275 4 26 72 0C 5O 
SCBO 16 Q2 4F C1 30 27 E6 
BC9O E4 20 54 1 44 26 2 
5CAQ_ CC 97 SO 17 Q3 6B 96 
5CEO 97 4F 16 Q02 1D C1 30 
SCCO 7E 26 OoE C1 1 27 D4 
SCDO 16 C1 18 26 QB 96 5 
SCEQO F4 C1 48 27 FO 20 QQO 
5CFO_Q3 1F 16 Qi1 DD D6 4F 


Add  +O キ 1 +2 + る 3 +4 +55 +6 +7 +B +9 +n +EH +C +D +E +F SBum 
610O 95 96 56 10 26 OO FB 1Q BE O1 F4 さ 1 さ F 26 FC B6 sB^a 
6110 7F 7E 2a OB 6 0O ミ D6 Q4 1Q 26 Oo1 QQO 17 FB 77 96 iE5 
6120 56 10 26 OO Da 20 a5 Aa6 28 1 O1 27 10O BD 23 6 si08 
61 さ Q 28 26 A4 7 7F 7D 269F 8B6 01 16 QQ DF 17 00 9D kiSD 
614Q0 6 22 B4 Q1 26 Q7 17 FB 11 BD Q7 20 BA 17 FB 24 sQE 
615O 2O F7 6 2B 6C 2B 4 26 さ 2 6 Q6 HB7 D さ FF Bo6 D4 szBA 
6160 Q4 B6 D4 O4 B6 D4 04 BD 74 6 22 84 Q1 26 16 ミ Q siDAa 
6170 9 0QO EF AF AB SE CC FF FF ED aA4 17 QO BF 3Q 8B9 gi14 
ら 618O 3C 40 16 OO CF さ Q B9 FF 61 20 EB QE AB 5BE B1 Q4 szB 
6190 26 OZ7 さ O 89 0 OO 16 OO a4 BB1 Q7 26 17 さ QO 8B9 BQ iiE 
61QO F1 CE 7F B2 6 06 97 32 EC C1 ED 4 さ Q BB 50 QA 25 
61BO さ 2 26 FS 39 1 Q9 27 Q1 39 6F 2 CE FF FF BD 10 sg71 
ら 61CO さ O 9 7C 40 BD QQ QAE QB 5B 3Q 9 40 QQO CE QQ QQ0 siB4 
61DO 6 OC C6 SO EF 4 EF O2 さ Q 4Q 26 FB さ 9 6 A4 C6 sFZ 
5o さ D 1F O1 E6 21 さ Q 39 17 FZ7 B4 96 56 26 10 6 giB1 





dd  +O +1 +G つ + ネ +4 + 品 +6 + プ + 日 +19 +n +B +C +D +E +F Sum 
5Doo 4 97 呈 1 81 FC 10 26 Q1 C9 QF 51 OC 4F 16 01 C2 sg4D 
5D10 4 10 26 0O 98 DC 4E C1 Q3 26 26 1 39 26 13 96 gDB 
5D20 5B 4 26 71 17 0 さ Q2 QA 5O 96 4E BB QB 97 4E 16 』24 
5D30 Q1 AO B1 73 27 E9 1 AD 26 SB 96 5 4 27 E5 2Q :BB 
5D40 54 C1 1E 26 2B 日 1 39 26 1 96 5 81 0 さ 26 DO 17 kiFZ 
DS50O Q2 D7 QC 5Q 96 4E BE QB 97 4E 96 4F BQ Q4 97 4F giE さ の 
SDe0 16 QO1 6F 1 73 27 E2 1 AD 27 DE 20 28 C1 33 26 18 ム 62 さ Q 
5D70 OE 1 さ 9 27 D4 日 1 7 27 DO 1 aD 27 CC 2Q0 16 1 siB6 っ 
5DBO 39 26 08 96 5 B1 0 ミ 27 C6 20 on 81 7 さ 3 27 F4 1 :BQO 6 
5D9O AD 26 Q2 20 EE 96 58 1 O4 26 Q5 97 5O 16 O1 32 sB1 62 





6200 50 4 QO1 26 33 17 F7 94 10 BE DO 4E BE 09 C4 30 si17 


に 2 人 に は 8 と 窟 6 の 6 の の る 58 6270 OO OO OO OO OO QF FO 1E 78 18 1 1 1 1E 78 QF 』9a 
0 に 3 が P* らら / 泊 62BO FO Q さ CO 00 QO QO OO FF FF FF FF QQ QQ 00 QO QOS siB2 


5DCO 26 62 17 O2 4C OQ 5O QFP 4F 16 Q1 Q6 C1 1 27 EC saD 2590 
SDDO C1 02 27 EB B1 44 26 24 C1 32 26 16 96 558 1 Q4 sz 日 ミ 
5DEO 26 Da 17 02 2C OC 5O OoC 





人 Qdd  +O 二 1 + す 2 ユラ +4 + +6 + プ + 日 +9 +Q +B + ピ +D +E +F Sum 


EGRNS2。 タ DB IE1 IA 2 の D4D1。 0212 タ ト DO' の 0 が AG い RS 用 み ス 977 Br 各 提 RARE'G つ EZ お る は の Ag 6392 
5E10 26 QB 96 5B B1 Q4 27 CQ 20 Oa C1 10 27 F4 C1 02 』75 
5E20 26 Q2 20 EE 96 5B B1 Q1 26 QB 97 5O 17 Q1 E2 16 :CR || da 
5E さ O OO AO D6 4F C1 0O2 10 27 oo 98 96 51 BR 54 97 51 s05 
5E40 1 FC 10 26 OO BC OF 51 Qa 4F 16 OO B5 DC 4E C1 s7E 
5E5O 0S 26 1D B1 7E 26 OF 96 5B 4a 26 62 17 01 Ca B6 :a2 
SE60 O1 97 5O 16 0Q0 6C B1 44 27 ED B1 QA 27 E9 20 4E :4C 
5E70 C1 1B 26 22 81 7E 26 14 96 5B B1 03 26 D9 17 01 :E6 
5EBO AB QA 5O 96 4F BO 04 97 4F 16 OO 46 1 44 27 EB :B1 
5E90 っ Q 2 2 っ 6 G 

SE9OYB は C.E 20 28)、P+ つう の ら 0E 日 1 2 2Z PB は ME 263 る 04OG 0 お 所 (所 (2BG 2 さる: 38: EE JPE:j 折 SE (EE FE 反 GE 
GE600 そん Bo 8 06 2 20 6 月 7 人 9989 の BOB る コ BaZ0EB'HE- 01 EE EEEENEO-2F BOOG07 FEB、 1E.01 (5 igOF 
SERO 6 .OE:2 が GL 4 る 7 E4 8B す 0 ぞ Z)PG 20C00.26.5 昌 (は 明る 63BO FF FF FF OO 3F FF FF FE ミ 1 BC 63 1 日 FF FF CO OO :2E 
807 の 00 0 B 0285 GR 人 AE 6390 00 0O 1F FF CO 1F FB QO 1F FF CO FC SE OO 1F FF 2E 
SEDO 20 oo 96 4E C6 5O 3D 1F O1 D6 4F 3 10 BE DO 4E 63QO CS FO OF FF FF FF CO FC 3E 0O 1F FF CO 1F FB 0O CE 
SEEO 96: 50 46 227 0B。 4 27 ち Z 3 40.2Z 00.8C AG.Q9'E 昌 63BO 1F FF CO OO OO 00 1F FF FB C6 さ 1 BC 7F FF FF EQ iD4 
SEFO 6 O5 84 OF B1 OF 27 Q4 8B1 QA 26 7 6 89 01 ES 63CO 07 FF FF FF FF 0 さ CO 3F FF FF FC OF FQO 0O QQO FF siFD 
けっ 生 タミー ズー と ビ ニー ニー た の な OR ち IRO 63DO FF Q さ CO さ F FF FF FF EO Q7 FF FF FF FB C6 さ 1 BC :5D 
FF 74 SE 74 29 AS E4 21 63EO 7F FF FF FF FF 1F FB FC 3F 10 OB E1 7 07 EO E7 :1B 
63FO EZ O1 BO FO OF 10 QB FC さ F 1C 3B FC さ F 1C <B FC :99 


+Q +1 +2 + さ + 人 4 + ロ +6 + フ 7 + +9 +Q +B +C +D +E +F Sum 
630O0_BO_QZ7 FF FO _QO7 FE QO_Q7 FF FO_QO _QO _QQ 0Q7 FF FC : フ 7 さ 
6 さ 1O 6 さ 18 C6 さ F FF FF FB Q1 FF FF FF FF CO FO QF FF s さ 1 
6 さ 20 FF FF 0O ミ 3 FC OO OO さ F FF CO FO OF FF FF FF FB Q1 :FO 
6 ささ Q _FF FF FF FC 6 ミ 1 C6 さ F FF FE OO QO 0O QO FF FE 7 さ 
6 さ 40 OO FF CO OQ FF FE Q7 E1 FQO QQ FF FF 1F 8BO 7F FF saF 
6350 FF FF Q7 E1 FO QO FF FE QQ FF CO OO FF FE QQO _QO sBF 





+ 日 +9 +a +B +C +D +E +F Sum 





26 6C 17 Fa 20 さ Q B9 BD 12 Sum: 25 29 B9 3O 92 EC DB CC さ 36 56 1 6 さ 3E 97 A3 44 saB 
CC OF FB BD Q4 ミ QO B9 O1 』D9 

04 39 2EB OF 6 O1 8BD QO4 :62 dd +O +1 + オ 2 + さ +4 +55 +6 + プ + 日 +9 +n +BE +C +D +E +F Sum 
EF 03 39 CC 3F EQ BD 04 :SC 6400 さ F FC さ F FC さ F FF FF 1F FB FF FF 1C 3BFO OF QO1 sz1C 
EF 02 EF QOS E7 05 9 A6 :E さ 6410 BO E7 E7 Q7 EQO E1 B7 10 QB FO OF 1C さ B FC さ F 1C 』:5F 
26 1C ao 89 05 S1 43 27 83 6420 さ B FC さ F FC さ F FC さ F FC さ F FF EO OO QQ QQ OF FF 』11 
3O 89 BA 60 6F B4 6F Q1 iD6 64 さ Q EO OO 7F EO OF FF EO Q1 FO FC QF FF FF FF CO さ 3F 』25 
39 A6 84 B4 FO B1 FO 27 71 6440 OF FF EO O1 FO FC OF FF EQ OO 7F EQO OF FF EQ QO 16 
EO B4 FO B1 FO 27 04 8B1 sDD 6450 OO OO OF FF FC 63 1 C6 3F FF FF FF Bo 1F FF FF :24 
BD DO CE FF FF 96.51 26 :68 6460 FF FO OF O3 FF FC QO OO さ F CO FF FF FF FO QF 0 ミ sFA 
01 EQ 7 Q1 EF OZ EF 0O3 』 さ 6470 FF FF FF FF BO 1F FF FF FC 63 18 C6 3F FF QQO QO 』14 
04 SO B9 01 EO EF Q1 EF seF 64BO OO _QO 7F FF QO QO3 FF QO 7F FF QO OF 7 EO 7F FF iF2 
094 30 89 O1 EO 2 B4 EF sFC 649O FF FE O1 FB 7F FF QO OF 7 EO 7F FF OO 03 FF OO :6a 
Re 84 43 27 04 B1 5S 26 』1E 64QO 7F FF OO OO OO QO 7F FF 18 C6 31 BC 7F FF FF FC :10 
26 BC 17 FB BZ 30 B9 さ B sEC 64EO OO _FF FF FF FF BO 7 1F FF EO QO Q1 FE 07 FF FF :F6 
8B6 OE C6 SO CE EO 07 EF #CC 64CO_FF BO 7B 1F FF FF FF FC QQO FF FF FF 18 C6 さ 1 BC 』a フ 7 


64DQO 7F FB OO OO_QOQO_ Q ミ FF FB QQ 1F FB Q ミ FF FB QO 7C siFE 
QF C さ FF F8 QQO 7C 3F QS FF FB saD 
QQO DG 4FE = ち O 













dd 。 +Q +1 +2 + さ +4 + 呈 + ら 6 + フ + 日 19 +a +B +C +D +E +F Sum 
6OQ00 4 さ Q 4 26 FA 39 96 4E C6 SO さ D 1F O1 D6 4F さ s17 
6010 さ 9 BD F さ 17 F9 5E さ Q 9 BD DO 4F 5F 8D Q4 ミ QO 89 :65 
6020 01 EO ED B4 ED 02 ED 04 さ 39 BD DE 17 F9 2C 3 さ 0 B9 ヵ CB 
60 さ O BA 60 6 12 C6 50 CE OO OO EF B4 さ Q 4 26 FA さ 9 』E6 
6Q040 さ C OO FF FO FF FF 7F QO 7 OO 0 さ O 1F EO 1F F 』B9 
6Q050 OS FO O1 CO O1 0 Q1 BO OO 7C O1 FF FF FF OF FE 』 さ D 
6060 OO さ C O1 BO O1 BO 0Q さ CO OF FB 1F FB 1F EO Q さ CO giE1 
6070 FB さ B 3D EO 7E DF OF FB 0O7 FF 1E 70 さ F さ 3C OF QB 』DA 
60BO OF QC BE DO 4E 6 7B 6F Q 4 26 FB 日 6 Oa C6 0 ミ 3 7B 
6090 CE Q1 QO BE DO 59 10 BE OO OQaQ ED 4 CE 0QZ EF Q2 62 
60aO 3QO QO9 る 1 さ F 26 F4 6 aD C6 0 さ DD 4E B6 O4 97 SO _sSE 
6OBO 97 57 6 OE EO 7F 7D C6 Q ミ BE DO 59 CE FF FF 4 giC1 
6QOCQ 27 OB EF B4 E7 QO4 さ O QO9 20 F5 QF O4 10 BE DO 59 szB5 
6ODO 1O 9F CB 6 28 26 5O 6 24 27 OB 4 27 Q5 4 10 sB4 
6QOEO 27 O1 05 17 F1 BB 10 9E CB <1 29 1O BC DO BS 26 』D2 Bum: 94 FQA D2 FO 96 C4 4 FR 1F D8 Q4 77 5 る 7F C7 szB6 
6QFO DF B6 7F 7E 2 OB 6 Q3 D6 04 10 26 Q1 1E 17 FB :BB 


Rdd  +O +1 +2 る +4 + 昌 + ら 6 + フ + +9 +a +B +C +D +E +F Gum 
6500 FF FF FF EQ Q フ 7 FF FF QO_QOF saAD 
6510 FO さ F FF FF FC Q& CO - EQ OZ FF FF FE sCB 
6520 る 1 C 6 さ 3 1F FF 0O_QO2 FF 'F さ を F。 FF FE 日 sFB 
65 さ O さ 7.3F FE FF 97 7O 1E FO_ OO _QO_QOE EO si97 
6540 QQO_ Q1 EQ FF CO _QQO さき F FF _QO 3 さ B 0Q3 FQO si94 
655O DD CC FB CF さ 】1 EZ7 QF さ O BC 1E BB FF szFC 
656O0 FF 07 FB さ C C6 10 90 30 C6 0O8 3D CS gsDE 
657Q DB GQ 0 ミ さ ど コ sC1 
5BO 8 D 0 








中 
仙 
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較 呈 コリ 占 -1 (どじ 2/ ど と ん レル ん 2/ 7 7 


画 市 川 浩志 





PHHHHRRRHHRRHHH 人 
K コン バイ ラ を 入手 し た の で , さっ そく 3 次 元 迷 路 : 

: の プロ グラ ム を に 用 に コー ディ ング し 直し て み ま し た . 

: その 結果 , BASIC で は 迷路 を 作る の に 1 分 以上 も か か 
っ て いた の が , な ん と K コ ン パ イラ で は わずか 0.7 秒 / : 
イラ イラ する 待ち 時 間 が な く な っ て , ゲー ム が 一 層 楽 : 
し く な り ま し た . 





迷路 内 部 

















た スル 語義 

(X, Y, Z) 
な に つ 
ンー プス /c も の 】 ね | 

迷路 地図 

か ら 12 ま で で す . Z 軸 の 方 向 を 上 下方 向 と 見 な し て , 0 階 DEXIT4E] の 

か ら 12 階 まで の 立体 迷路 と し , 迷路 地図 は 階 別に 表示 し ま Cy を) チャージ 表 示 

す . つま り , Z 座 標 が 4 な ら ば 4 階 , 10 な ら 10 階 と いう こ 

と で す . 地図 の 中 に は , 自分 の いま いる 位置 が “ ロ " で 表 写真 1 この まま いく と 下 に 落ち る ゾ . 


示さ れ ま す . また , 出口 は 白 で 表示 され ます . 

操作 する キー は 次 の 通り です. 

前 に 進む . 

左 に 向き を 変え る . 

右 に 向き を 変え る . 

上 に 向き を 変え る . 

下 に 向き を 変え る . 

後ろ に 向き を 変え る . 

MAP を 見 る (この キー を 近 し た 後 
で , 何 階 か ら 何 階 まで の 地図 を 見 る の 
か を 入力 し ます ) . 

RETURN | MAP を 見 る (この キー で いま 自分 
が いる 階 の 地図 が 表示 され ます ). 
回 GIVE UP (迷路 の 脱出 を あき ら め 写真 2 出口 が わか ら ず GIVE UP 
た と き に 押し て くだ さい . この あと で 
陣 | 以外 の キー を 押せ ば 再 ゲ ー ム に な 
り ま す ). 

以上 の キー を 操作 し て , チャ ー ジ が 0 に な る 前 に 迷路 を 
脱出 し て くだ さい . チャ ー ジ は 時 間 の 経過 と 共に 減っ て い 
きま す . 地図 は 何 回 で も 見 る こと が で きま す が , 1 つの 階 
を 見 る ご と に チャ ー ジ が 減り ます . 得点 は 脱出 まで に か か 
っ た 時 間 と 地図 を 見 た 回 数 を も と に 計算 きれ ます か ら , あ 
まり 多く 地図 を 見 る と 得点 が マイ ナス に な る こと も あり ま 
す w よ 

画面 の 下 の 方 に は , いま いる 位置 の X, Y, Z 座 標 が 表 
示さ れ ま すか ら , 動い た と き の 座 標 の 変化 と MAP と か ら , 








D 








Llk」 
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3 准 元 迷 踏 


自分 が どっ ち を 向い て いる の か を まず つか むこ と が 大 切 で 
9 


Oo い 二 に ーー = の デー 
アス ョ シン ルン < や (も の 】 ム 6 

KK コン パイ ラ の 配列 は 1 次 元 配 列 だ け で す が , 関数 コー 
ル が ある の で 3 次 元 配列 と 同じ 感覚 で プロ グラ ム が 書け ま 
7 が > 

配列 に は 1 バイ ト 配 列 と 2 バイ ト 配 列 が ある の で , 入力 
の と き に 気 を つけ て くだ さい 。 実は ,。 この プロ グラ ム を 作 
っ て し ば らく の 間 バ グ に 悩ま され た の で す が , その 原因 は 
な ん と 負 の 数 を 要素 に 持つ 1 バイ ト 配 列 と 単純 変数 と を 加 
えて し まっ だ こと に あっ た だ の で す . BASICG で は 考え られ な 
い ミ ス で す が , お か げ で SEX 関数 の 存在 理由 が わか り ま し 
7 

ソー ス ・ プ ログ ラム の 40 行 は F-BASIC の RANDOMIZE 
と 同じ よう に 乱数 の 系 列 を 変更 する た め の も の で す . 

ソー ス ・ プ ログ ラム の 変更 は 簡単 で すか ら , ゲー ム に 慣 
れ て きたら 地図 の 減点 を 増やし た り , 制限 時 間 を 短く する 
な ど し て くだ さい . た だ し , メモリ の 余り が 少な い の で プ 
ログ ラム の 追加 は ほとん ど で き ませ ん . 





困 か ンダ ム セ 側 / (cb の 】 ね 





ソー ス ・ プ ログ ラム が 長い の で , コン パイ ル す る に は フ 
テ ァイル 版 の 拡張 K コ ン パ イラ が 必要 で す が , ソー ス ・ プ ロ 
グラ ム の デバ ッ グ 用 に オン ・ メ モリ 版 も 用 意 し て くだ さい . 

と いう の は , カセ モット テ ー プ を ファ イル と し て 使う 場合 
ファ イル 版 の K コ ン パ イラ で コン パイ ル す る と バグ が ある 
た びに ソー ス ・ プ ログ ラム を メモ リ に LOAD し て バグ を 修正 
し , それ を また SAVE し て か ら 新 た に コン パイ ラ を メモ リ 
に 入れ て コン パイ ル す る と いう ぐあい に , 大 変 め ん どう な 
作業 に な る か ら で す . これ で は バグ が 10 箇 所 以上 も ある と 
いい か げん いや に な っ て し まい ます . 

そこ で , ソー ス ・ プ ログ ラム を サブ プルー チン 単位 に 分 割 
し て , その それ ぞ れ を あら か じ め オ ン ・ メ モリ 版 の コン > ッ マ 
イラ で デバ ッ グ し て し まお うと いう わけ で す . も ちろ ん , 
この と き に は サブ プル ー チ ン の 外 に ある ラベ ル に つい て の エ 
ラー は 無視 し ます . な お , オン ・ メ モリ 版 で コン パイ ル で 


きる プロ グラ ム の 長き さき は , エン ド ・ ア ドレ ス が $1D00 ぐ ら 
いま で の も の で すか ら , コン パイ ル す る 前 に モニ タ で $35, 
$36 番 地 の 内 容 が それ より 小さ いこ と を 確認 し て くだ さい . 
デバ ッ グ が 完了 し たら , その ソー ス ・ プ ログ ラム を ASCII 
形式 で SAVE し て お きま す . 他 の サブ ルー チン に つい て も 
同様 に し て , 最後 に それ ら を MERGE し て か ら ASCITI SAVE 
すれ ば 完全 な ソー ス ・ プ ログ ラム が で き あ が り ま す . 

ソー ス ・ プ ログ ラム が で きた ら , ファ イル 版 の K コ ンマ 
イラ と ラン タイ ム ・ ル ー チ ン を LOAD し て , 次 の プロ グラ 
ム で 最終 的 に コン パイ ル し ます . 





10 CLERR 。&H1FFF 

20 INPUT "FILE NRME "iR 
30 _UFEN" 1 。 拉 1。 人 呈 

40 EXEC&H2OQ0O 

5Q CLUSE 拉 1 

60 CLEAR。&H40O0: END 





コン パイ ル が 無事 終了 し た ら , EXEC 錠 HH5000 で 走ら せ 
る こと が で きま す が ,。 も し ラベ ル ・ エ ラー が あっ だ ら , ラ 
ベル の つづ ブ り など が まち が っ て いな いか 点検 し て くだ さい . 
また , 数 値 の まち が いな どの バグ は コン パイ ル ・ エ ラー に 
な り ま せん か ら 慎 重 に 点検 し て お きま し ょ う . 特に 配列 や 
POKE 文 の アド レス を まち が える る と 正常 な 動作 を し な か っ 
だ り , 竣 走 し た り し ます . 


最 後 に 


ファ イル 版 の K コ ン パ イラ に つい て の 詳し いこ と は , 『FM 
-8 活 用 研究 』 を 見 て くだ さい . 

SAVE し た オプ ジェ クト を LOAD す る と き は , あら か じ 
め CLEAR, 科 HH4000 を 必ず 実行 し て くだ さい . そう し な い 
と , Missing Operand エ ラー と な っ て 正常 に 走り ませ ん . 

コン パイ ル し た オプ ジェ クト を SAVE す る と き は , 

SAVEM“ フ ァイル 名 "。 避 還 4D00, 競 H7F8E, 競 H5000 
し で 大江 %。 





避 参 考 文献 
1) マイ コン '82 年 5 月 号 “PASOPIA CAVING" 
2) FM -8 活 用 研究 


人 路 に コン ババ イラ ソー ス ・ リ スト 還 還 還 還 昌 昌 昌 昌 間 昌 


1 の 9 ′ (* ミー-D Maze Ver。 1 の by HH.1I。 ※) 

2 の ′ (X for FM- ドー-Compiler Ver。 1.2 テ *) 

3 の ウ CONST DATR=$4 の 91 の +COUDE まま 1 人 。 和 ま 4 の CUDE ま 1。 ま CE 。 ま 
さ F , 生 FF 

4 の TIMES[]iFUR エ =1 TO TIiDMY=RND(1 ) 』 NEXT 

5 の 'BF=1』BF=g』CF=1 

6 の 「HS=DATAー-12』 人 QR= ニ DATR ェ X ド = に +2197』Y ド モニ X ド +12 ェ 3 Z に =Y に 
+12』D ド = ニ Z ド +12』F ド = ニ D ド +19』 ロ に ビ =P ド +1243R ド = ロ に +124』E ビ ドー ニ R ド + 
124』FJ= ニ E ド +6』 ロサ モビ ゴ + ロ 』 ェ ド ゴ ニ ロロ + ロ 

79 "FUR 1= の TO 5』HS(?) =-1 の の の 』 NEXT 

Bg "BTQART』 SC= の iMC= の 』F1=1』F2=1 

99 "FUR TI=DATA TU DATA+ ま AEFiFURE 1 。 の 』NEXT 

1 の "XR( の ) = ニー1』 X ド ( さ ) =1』 YK(1 ) = ニー1 』 YK(4) =1』ZK(2) ニー1』 
Z ド (5) =1 』 DKi の ) =1 』 DK: 1 ) =5 

11 の "MaZE[]』 INIT[]』 GaME[ ] : SCURE[ ] i BF=BF+ 1 

12 の 9 "LUCE6,91』? リ PLAY ABRTIN 他 (Y/N) "iREPERT 』 エ =GET 
UNTIL 1< > の IF ユ ="N′ DR ='n ロ ′ THEN COUDE ま 1 ビ 。 ま 4 の 』 
END ELSE BELE]』GUTU START』FI 

1 さ 3 の '(* SUB *) 

14 の "MaZEI(* Make Maze *) 

15 の “FUR X=2 TU 1 の STEF 2』FOR Y=2 TO 1 の STEP 2ia 
EX。Y。9。 さ ]』 AEX。Y。12 。 さ ]』NEXTINEXT 

16 の "FUR Y=2 TU 1 の STEFP 2』FOR Z=2 TO 1 の STEP 2』a 
Eg。Y 。Z 。 さ ]』 LE12。Y。Z さ ]』NEXTiNEXT 

17g ウ "FUR Z=2 TO 1 の STEF 2iFUR X=2 TO 1 の STEP 2 ョ 』^ 
EX。 の 9』Z 。 さ 3]』 EX。12。Z る ]iNEXTNEXT 














18 の 'X=RND (5) *2+2』 Y=RND (5) *2+24Z=RND (5) *2+24 EX 。 
Y、Z 」11:FK: の ) =X』 ロ Kr の) =YiRK: の ) =Z』N=O 

19 の "FUR 1 エ = の TO 12 ミ 

ご の の “LOUOF』 ド =RND (N+1 ) 』 X ニ PREK) 』Y ニ RIK) * Z= ニ RKI KR) 』B=1 
ェ = の 

21 の "IF 1LX-2。Y。Z]= ウ THEN ER+ の ) = の 』 T=T+1』E= の ョ FI 
2 の IF 1LX。Yー2。Z] コ = の THEN EEsT)=1』 =T+1』B= ウ ョ FI 
2 さ の IF Q1LX。Y』Z-2]= THEN EK』T) =2』T=T+1 』 B= ニ g ュ ビエ 
24 の 9 「1F 1LX+2」Y。Z]= の THEN EKsT) = さ 』T=T+1』 = ウェ FI 
25 の IF 1EX。Y+2。Z]= ウ THEN EK:T) =4』 =T+1 』 = の ウ ョ F エ 
269 "IF 1EX。Y,Z+2]= ウ の THEN EKs s T=T+1』 HB= の FI 
27 の の “IF B=1 THEN FRK:K)=FRIN) GR:K)=QKsN) IRKI ド ) =R 
Ks N) :N=N-1 : BHTU LUDPsFI 

28 の “D=EEsRND(T) ) 』N=N+1』FK:N) = ニ X+XK(D) *2 DK N) = ニ Y+ 
YK(D) *2sRKiN) =Z+ZE(D) *2k 人 2ED。11』 EPREN) ,QRIN) 。RK 
gN) 。1 コ 

299 "NEXT 

さ の の “X ロ =RND (5) *2+2 ュ Y ロ =RND ( 己 ) *2+2 ュ Z ロ =RND (5) X2+2 ョ ロゴ 
=RND ( さ ) +1 s IF J=1 THEN BUTU し さる ELSE IF J=2 THEN 
BOTD L さ 4 ELSE IF J= ミ さ THEN GUTU L さ 5』FIgFIFI 

さ 1 の し ささ 』 メロ =ーRND (2 ) 』 DU=XUX さ る 』X ロ =XUx ヨ B+ GUTOU しさ 6 
2 の しさ 4』Y ロ =RND(2) 』 DD= ニ YUX さ +1 』 Y ロ =YDxB+2』 GUTDU 上 さら 6 
ささ "しさ Z ロ =RND (2 ) 』 DU= ニ Z ロ ォ ス +2 ョ 7Z ロ =Z ロ 日 +2 

さき 4 "し さら 6』 X ニ 12ーX ロ YY= ニ 1 つ ーYi Z= ニ 12ーZ ロ 』 X ロ =X ロ +XK(DO) 』 YO 
=Y ロ +YK(D ロ ) : Z ロ =Z ロ +Z に (DO) : ALXO』YU。Z ロ 1]』X2=XU+XK(D 
ロ ) 』 Y2=YH+YE (DO) 』 Z2=Z ロ +ZR(DO) AE XS 」Y2 。Z2 2] 
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3 次 元 迷 路 K コンパ イラ 








ミ 5 "し ミ Z』 D=RND(6) 』 IF X+XK(D)<2 QR X+XK(D) >1 の OR 
Y+YK(D) く 2 OR Y+YECD) >1 の DR Z+ZK(D)<2 OR Z+ZK(D) 
>1 の THEN GUTD し ミ 7 ELSE IF ALX,Y,Z。D]=9 THEN BOT 

ロ L ミ ZiFIIFI 

36 の 9 L3B』 D1=RND(6) 』 IF MDDED1 , さ ]=MODLD , さ ] THEN B 

ロ TO L ミ B ELSE TIMEgE]』FTI 

ミ 7 の "RETURN 

ミ B の '(x F & BUE *) 

さ 9 の Ai AEEZ1+Z2*1 コ キル さ %169) =4』RETURN 

4 の 人 13 DMY=AK ェ 21+22 ォ 1 オル さ *169) iRETURN 

41 (2 RiX+XE( 錠 1)+(Y+YK(Z1) ) *1 さ +(Z+ZK(Z1) ) *16 

iRETURN 

420 "人 さ 』 DMY=AK ェ 1+XK (4) キ (22+YK(Z4) ) *1 さ +(% さ +ZK( 
%4) ) x169) :RETURN 

4 さ の 'CDN』 HLT[ ]』 ADDR= ま FCB2』 CFDRE ADDR」1 41 2。25 
25, の 9,% さ 」 の: SUB[ ]: RETURN 


449 "LINE』HLTE ]』 ADDR= ま FEB2iEFUEE DDR , ま 15。 6 25 。 
1 2 全 村 ん さ 韻 。Z4 持 7 ョ SUB[E ] RETURN 

459 CUNNECTIHLTE] ェ = ま FCB2 CFOUEE DDR 。 ま 16。%9 。 
の 4 」 ん 1 拉 ん 爺 韻 。 錠 さ 井 ん 全 揚 名 昔 。 ん 6 井 。 スプ 韻 。 日 杜 : SUB[ ] 』 RETURN 
46 の 「SYMBUL』HLT[F ]』 RDDR= ま FCB2 iCFURE DDR まま 19 5 の 
の ん さん 4 ん 1 拉 2 折ら 6 ん 2919 ん 11 418 ん 1 さそ 。14 
215 216 2 ん 17。218。 219 29 。 21 ん SUE[ ]』 RETURN 
479 "LOCI HLTE]』 ADDR= ま FCBS』 CPUREE DDR 。 ミ そま 12 1 
2 ご 事 11 。7+ ま gs SUB[ ]:RETURN 

4 "HLTi CUDE ま B6 ,$FD , 05 。 ま 2 。 ま FB ェ FUEE FDG 。 *$ 昌 
の CUDE ま 昌 6 。 ま FD 。 ま の 。 ま 2 。FB ェ RETURN 

49 の SUB: PURE ま FDg5 ,9: RETURN 

Sg の GAME』 (* BAME RIHUTINE  *) 

5S19 'L41』 F=DiH=MUD[D+ ミ 。6]』D2=D1iM1=MHDED ,2 

52O 「L42I 1)+D2SsL=MDDEM2 。6]』TF MUDEL 。3]=M 
DED, ミ ] THEN DS BHTU L42 ELSE DS2=D1』FI 

5 さ の 「L4 さ 』 2=6-D ト 1) +D2iR=MUDEM2 、6]』 IF MODER, さ ] 
=MUDFD , そ ] THEN DS=RiGHTU L4 さ ELSE U=D1』G ロ =MODED1+ 
さ ぅ 6]』FI 

54 の "CUNNECT[5 の 。 199 5 。 の 。 4 の 。 。 43 の 。 199 。 1 ]: CDNNE ビ 
TE の 2 の, 4 ,2 の 9,4 ヨ の 。179。 の 。179。1 コ ] 

559 "LINE[ の , の 5 の 2 の の 。 ら 。 の ]』LINE[48 の 。 の 9 ,4 さ の 。 2 の, の 。 ら 6 
59]:』 LINE[ の 。199 5 の 。179 の ,6, の ]』 LINE[ 4 の , 199 。 4 さ 9 。 17 
9。 の 。6。9]』 TF EX。Y。Z 。U]= の ウ THEN BUTU L4iFI 

56 の IF ASEX。Y』Z。L]= の THEN LINEL, の 9,5g, 2 の, の ,1 の ] 
ミ FI 

57 の 9 "IF AS3EX。』Y。Z 』R]= の THEN LINE[48 の 。 の , 4 さ の , 2 の 。 の 。 1 
9]』F1 

58 の 9 CUNNECT[5 の , の 。 ら の 。 2 の 。 4 さ の 。 2 の 。 4 さ の 9 。6] 

59 の 'L4BI ITF 3EX。Y,」Z』R]= の THEN GUTU L52iFI 

6 の の "IF SEX。Y。Z 。U]= THEN LINE[48B の , の 」 4 さ 2 の の 。 1 
ぅ 9]』FI 

61 の "IF SEX 。Y』Z 。B]= の THEN LINE[480 の 199 。43g 。 179 。 
9,1 , の ]』F1 

62 の "CUNNECT[ 4 の 。 2 の , 4 さ の 。2 の 。 4 の 179 。 4 の 179 。6] 

6 さ の LS2I IF 3 上 X。Y,Z は ]= の THEN GUTU L56』FI 

64 の "1F EX。Y』Z。R]= の THEN LINE[4B0 。 199 4 さ の 。179 。 
9,1 の ]』FI 

65 の "1F SEX。Y』Z。L] コ = の THEN LINELg 。199 5 の 。 179. の 。1 
ぅ 9]』FI 

66 の CUNNECT[5 の 。 199 5 の 。 179 。4 さ の 。 179 。43 の 。199。6] 
679 「L56』 IF ASEX』Y。Z 。L]= の 9 THEN BOT L69』F エ I 

6 の "IF ASEX。Y,Z』B]= の THEN LINE[,199 5 の, 179. の 。1 
ぅ 9]』FI 

69 の "1TF 人 Q さ [XY。Z。U]= の THEN LINE[ の 。 の の 。2 の 。 の 9 。 1 の] 
3F エ 

79 の 9 CUNNECT[ の 2 の 。5 の 。 2 の 。 5 の 。 1 79 。 の 9 。179』6] 

71 の 9 'L69』 LINEE51 人 21 ,429 」17 日 。 の 。 1 2] X1 ミ XsY1= ニ YiZ1 
ニ Z 』 2 ニ 5 ロ の 』 ソコ ニコ の ウェ EF ニ 1 

フ 72 の *L61 』 日 1=H2 』 り 1 = りつ 』 ュ 2=H1 / さ x+ 日 の 』 2= リ 1 / ミ * コ + ォ ささ 
日 ミ =48 の ーH1 s 日 4= ニ 4 日 ゆーH2 』 りさ =1 9 ワー リ 1 s 4 オニ 1 9 ワー リョ X1= ニ X1+X 
ド (F) 』 Y1=Y1+YEK(F ) 』 Z1=Z1+Z ド (F ) 』EF=EF+1 

73 の "IF 1EX1,Y1。Z1]=2 THEN LINEEH1 』V1 。 日 ミソ ミ の 5 
ぅ ご]』 ITF EF ぶ SB THEN SYMBUL[H1+22 の /EFー1 日 96 。 ( 1 ミウ /EFー 
2) /1 の 」6/EF の 。 4 4 。 ま 日 。 和 ま 49 。 ま 呈 4] FT GTD LB6 』FI 
74 の 9 "IF 1EX1 。Y1 ,Z1]= の THEN BUTU LBg ELSE LINEEH 
1 。 り 1 」H2 VS の 。 ら の]』 LINEEH マ 」 り 1 。H4 VS の 6 の ]』 LINE[H 
1 V3」H2 。V4 。 の 6 の ]』 LINE[ 上 H さ 。V ミ 。H4 。V4 。 の 9。6。 の ]』FI 

75g 「L64』 ITF 3EX1,Y1 。Z1 ,U]= の THEN GOTU L68iFI 
769 「TF さ [X1 。Y1 。Z1 し ]= の THEN LINE[H1 。V り 1 。H2 。V2 の 
ュ 1 の]iFI 

7 フ 77 "IF a さ [X1 。Y1 。Z1 。R]= の THEN LINE[H さ 。V1 。H4 。V2 の 
s1 の ]』F1 

7Bg LINEFH1 」 り 1 日 。 り 1 。 の 。6 の]』 CUNNECT[H2 。 り 1 。H2 。 り 2 
5H4 ,V2。H4 。V1 。6] 

79 の 9 「L68』 IF 人 A さ FX1 。Y1 。Z1 。R]= の THEN BOT L72』FI 
B9 の ITF EX1 。Y1 。Z1 。U]= の THEN LINE[H さ 。V1 。H4 VS の 
ぅ 1 の ]』FI 

B1 の IF 3[X1 。Y1 。Z1 6]= の THEN LINELH さ 。 り ミ 。H4 』V4 。 の 
ぅ 1 の]』FI 

B2 の "LINE[H さ 。 り 1 。H 。 り さ 。 の 6 。 の ]』 CUNNECTEH さ 。V2 。H4 。V2 
日 4 。V4 日 さ 。 ソ 4 。6] 

B さ の "L72』 IF 3[X1 。Y1 。Z1 .B]= の THEN BUTO L7Z6』FI 

































B4 の ・IF さ [X1,Y1。Z1 ,R]= り THEN LTNE[H ミ , り さ 。H4,V4 ,g 
。1 。 の ]:F1 

B5 の ・IF Q ミ [X1 。Y1 。Z1 し ] コ = の THEN LINE[H1 。 り さ 。H2 。V4 。 の 
。1 9]:FI 

B6g “LINELH ミ 』 り さ 。H1 。V ミ の 。 ら 。 の ]: CDNNECTEH4 りさ,H4 ,V4 
」H2 。V4 。H2 」 り ミ 。6] 2 

BZ の "L76』 1F SLX1」Y1。Z1。L]= の THEN BODTU L61iFI 

BB の ・IF ミ [X1」Y1。Z1,B]= の THEN LINE[H1 , り さ 。H2」V4 , の 
。1 .g]:FI 

B9 の 9 'TF ロミ [X1 。Y1 。Z1 。U]= の THEN LINELFH1 , り 1 。H2」V2 の 
1 の]:FI 

9 の の "LINE[H1 」 ミ 。H1 。 り 1 ,。 ら 6 の]: EDNNECT[H1 。V4 。H2 。V4 
。H2 。V2 。H1 」V2 。6]』 BHTU し 61 

91 の "LB: LINELH1 。 り 1 ,H ミ 』 ソ さ 。 の 』 1 」1]』X1=X1+XK(E) 』Y1 

=Y1+YE(B) :Z1=Z1+ZK (B) 

92 の 1F 人 Q ミ FX1 」Y1。Z1 。U]= の THEN LINE[H1 1 。H さ 。V1 の 
6 9]:FI 

9 "ITF 人 さ [X1。Y1 。Z1 』R コ = の THEN LINE[H さ 」 り 1 ,H さ りさ 。 の 
6 の]:F1 

94 の "1F <FX1」Y1 2Z1。B]= の THEN LINELH さ 』 り ミ ,H1 。V さ 。 の 
」 ら 6, の]:FI 

959 1F a さ EX1 Y1 。21。L]= THEN LINE[H1 , り ミ 。 昌 1 」V1 の 
6, の ]』FI 

96g “LB6s 

979 ′ LOUCL22』2 さ ]』PRINT" (放電 24Y。 
W 革 2。Z。 の ) や 

9 "LREY』 TIMES[ ]』F コ =(MC ォ 1 の +TI ) /6+1』TF F2>197 T 

HEN F2=19 昌 igFTiLINEL4 ヨ 6 」F1 99,F2」 の 4 2]iF1= ニ F2 

999 "IF F2>197 THEN BUTD GIVEUPiF1 

1 の の (LODC[L6B。2 コ 1 の 手合 TH 。 間 人 。TM。" 

EYE] 

1 の 1 の "IF ド Y=*B′ DR RY=' の ′ THEN D=BiBDTU L41 ELBE 
IF KEY=* し ′ ロ R KY='4′ THEN D=LiBDTUD L41 ELSE IF K 

Y=*R′ ロ R RY=*6′ THEN D=Ri GUTD L41』FIiFTiFT 

1 の 2 'TF ド KY=$D THEN GF=ー1』ZM=Z』BDTU MAF1 ELBE 

F_KY=*U′ DR KY='B′ THEN D=Ui D1=B』GUTU L41 ELBE 1 

Y="D′ ロ R KEY='2′ THEN D=GiD1=FiGUTD L41 』FIiFI 





































THEN BUTU BIVEUF ELSE IF EKY=*M* 


1 の さ の "IF KY=*B" 
DR KEY=*+ キ ′ THEN BUTO MAFP ELSE IF KY='F′ QR ド 
THEN BUTD L9 の ELSE BUDTU LKEY』FTiFTiFI 

1 の 4 の *L9:』 1F Q さ FX,Y』Z』F]= の THEN BUTU LREYiFI 
1 の 5 の ・X=X+XR(F) 』 Y=Y+YK(F) :Z= ニ Z+ZK(F) 』TF A1EX』Y。Z] 
>2 THEN BT L41iFI 

1 の 6 の "CDNL の ,49。 の ]:TIMES[ ]:LTNEL。 の 4B2 。199 の 。 王 。2 
]』 SC=( 12 の -T1 ) *15-MCx ミ の 

197 の "BYMBLL65 。40」 さ 1 。1 昌 4 。 生 4 」 和 4 。 あ 47 。 2 。 
ま 41 54 」 お 。 4 じ 」 41 。 4 」 ま 49 4F 。 和 ま 4E あら 1 ]iLTNEEBO 
68 。 4 の の 19 の 。 の の,2] 

1 の 8 の *LOCLB。111]』?"TIME。 
8 

1 の 9 の "LUC[9。1 さ ]』 で "BCPURE " 。 拉 6』B ビ 

11 の の 'L98:』 RETURN 

111 の 9 "(X F & 8B #) 

1129 "MOD』  DMY=%1-%1/2xZ2 ェ RETURN 

11 さ の “TIME の sHLT[ ]: ADDR=* ま FCB2 ェ CFDUKE DDR , さ D ,2 0 。 
り 9, の 9, の 』 SUB[ ]』 RETURN 

114 ウ "TIMEB』HLT[ ]:FDRE * ま FCB2 。 ま さ E ュ SUB[ ] HLT[ ]』 TH= 
PEEK ($FCB) 』 TM=FEEK' ( ま FCB6 ) 』 TB=FEE ド (FCB7 ) 』 T エ =T 
6 の +TB』PUKE * ま FCBO ,*$B の BUB[ ] 』 RETURN 

115 の "KEY』 HLT[]iaDDR=* ま FCB2 CPUKE ADDR ,$29 の 』 BU 
HLTE ] に ド Y=FEEK ($FCB さ ) ょ PDKE * ま FCB,* ま B の SUB[ ] ょ DM 
=KYiRETURN 

116 "BEEP: PUKE *FD の 3 。65』RETURN 

117 の *BEL』 FUKE * ま FDO ミ ,$ 日 1+FUR 1= の TU 25 の の 』NEXTiF 
DKE *FD さ 。 ま BsRETURN 

11Bg *(x BIVE UF *) 

119 の "BIVEUF 

12 の の “BEL[]』 CDNE 1 4 のり]: SC ニー19 の の の 』 SYMBDL[ さ 日 1 。9 
6 」 プ 」 ら 6。 和 49 」 まま 2 の 。 ブ 7 」 和 ま ら 9.。 6E 。 ま 2E] 

121 の "IF GF> の THEN BF=BF-1』FT 

22 の *GOTD L9 

12 さ の "MAPi(xX MAF *) 

124 の 9 ′ LOCL65,12]』 で "FLUOR from "』Z8=INFUTiIF Z 


SB< DR Z5:>12 THEN BEEP[ ]』GOUTD MAP:FI 
25 の "L2』LUCL65」1 さ ]』 で "FLUOR tO 。 "』ZE=INFUTiIF Z 
E< の OR ZE>12 THEN BEEF[ ]』BHTU L2sFI 

126 の 'ZM=Z5 

127g "REFEAT 

12B の 'MAaF1+ ビ F=ー ビ F: ビ =( ビ F+9) /G』 コ =MDD[ ZM 。19]+ ま さ の ミ TF 
ZM<1 の THEN 1=*$2 の ELSE = まさ 1:FI 

129 の "LINE[554 さ 。 1 ささ 。61 の 9。14 の 9。 の ,2。2] 

1 さ の の SYMBDL[54 ミ 1 ささ 。2。 1 」 フ 。4。1。J。 ま 2 の 。 ま 46] 

1 さ 1 の "FDR YNM=g TU 12kFUR XM= の TU 12iMW=Q1ELXM,12-Y 

N,ZM] 

1 ミ 2 の ・1F = の DR = さ THEN SYMEDL[XMxB+525 。 YM*4+1 さ 

日 1 ,1,C」1 。 和 まさ]i BHTU NXTiFI 

1 ささ の "ITF =2 THEN BYMBUL[ XM*B+25 。 Yx4+1 さ 日 。1 。1 , フ 
1 , ま B さ ] ょ BUTUD NXT』FI 


に の 
ら 





TH 。 間 2。TM。 "まり 。 音 2。 征 
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ンー ス ・ リ スト 





3 次 元 迷 路 K コ ン パ イラ ソー ス ・ リ スト 








1 さ 4 の *TF MM=1 THEN SYMEOL[ XMxB+25 。YM*4+1 ミ 日 1 。1 の 
) 1 まさ] ュ F1 

135 の *TF XM=X QND 12-YM=Y QND ZM=Z THEN SYMEBOLLFX 
MxB+525 。 YMx4+1 ミ 日 1 」 1 。7。1 。 和 11:FI 

1 ミ 6 の “NXT: NEXTiNEXT』 BEL[ ] 

1 さ 7 の MC=MC+1』 TF SF=-1 THEN SF=giGBDTO LEEY』FI 
13B の 'ZM=ZM+SBN(ZEーZ5) 

139 の "UNTIL ZM=ZE+SGN(ZEーZ ら 8) 

149 の *BDTD LKEY 

141 の (INITs 

142 CDN[ 1 ,B の 1 ]:』LTNE[ 1 の の ささ B の 15, の,6。2]: SYMBD 
LE114」 ら 2」1 2 の 」16。 和 ささ 。2D 。 44 。 ら 9 。 6D 。 ま ら 5 ロ 。 6 。 フエ 
」 あら 9 。 ら F 。 あら E 。 2 。 4D 。 和 ま ら 1 。 7 。 ま 655] 

14 さ の =MDD[ Z2 」1 の ]+ ま さ 』TF Z2 く 1 の THEN 1=*2 の ELSE 
エニ * さ 1 FI 

144 の 9 *LDC[65』 1 の]』PRTNT" ("。 拉 2』X2 りり 』 埋 24Y2 
"」 提 2」Z2。") "LINE[ 179」192, さ 1 の 。199。 の ,2。2]』 SYMBDL[ 1 
フ 7 。19 さ 。2。1 。 王 。 日 45 。 ま 5 も 49 。 ま 4 。 ま 2 。 T 。J 。 46] 

145 の "LTNE[48 さ ,9 551 さ ,199」 の 9, の ,2]sLTINE[514,74 ,6 さ 9 。 
フ 5」 の , の 9,1 コ 

146 の 9 "LTNE[514 92 ,6 さ 9。94 。 軌 。 の 。2]』 し INE[514 112。6 さ 9 
11 昌 9, の,2] 

147 の 'LINE[514」 の 6 さ 9」7 さ の 。7。1]sLINE[514 ,76。6 さ 9』9 
1 Z1 

148 の 9 "LTNE[4B6 の,599 199 9。 さ 。2]』LINE[48B5, 551 の 1 











99」9,』7,11 

149 の SYMBOL[544 。4 」1 1 。7。B, あ 5H。 ま 2 。 4 , ま 49 。 ま 4D 。 ま 
45 。$2E , $5D] 

15g の "LOCL[71 ,4]』?"B"sLDCE71 3 で "03LUCL69。6]』 で " 
4-5ー6" 


151 の "LUC[ フ 1 7]』 で "1 の iLDCE71 」 日 ]i で "2 リュ LDCE66』155]i マ 
"FE MaAP コ " 

152 の "LINEF514,129,6 さ 9 。199.。 の 』7。1] 

15 さ の "LTNEF515」1 さ の ,6 ミ 日 19 。 の ,2」2] 

154 の 9 "RETURN 

155 の 'SCURE』(* Hi-Score *) 

156 の "IF BF>5 THEN GF=5iFI 

157 の 9 "FUR 1=1 TO 5』IF SC>HS(T) THEN BHTO L16g』Fr 
iNEXT 

15B の L16 の 』 FDR J=4 TU 1 STEP-1:HS(J+1 ) =HS (J) : NE 
XTiHS(T) =SC 

159 の "LUCL5。16]』FRTINT" 苦 間 SPURE EBEST 量 提 #" 


169 ウ 9 の LOCEB。18]sFRINT"E 1 1] テテ そそ コリ 
161 の “LOUCEB。19]sFRINT"[ 2 ] エキ エエ 
1629 "LUCEB,29]iFRINT"[ る ] ド テ エナ 
163 の “LOCEB』21]sFRINT"[ 4 ] MX% り 
164g "LOCEB,。2214PRINT"[  ] えり 


165 の 9 "FOR 1=1 TU BFiLUC[16。1 エ +1 フ ]』 人 で 手 6。HS(T) 』NEXT 
166 の "RETURN 





ダン プ ・ リ スト の 見 方 


最初 に リス ト を 見 て くだ さい . これ は $6F00 番 地 ($” は 
その 後 の 数 値 が 16 進 数 で ある こと を 表わす ) か ら $6FFF 番 
地 ま で の マシ ン 語 ダン プ ・ リ スト で す . 左 か ら ア ドレ ス , デ 
ー タ 。 チェッ ク ・ サ ム , そし て 最 下 段 も チェ ッ ク ・ サ ム を 意 
味 し て いま す . 

アド レス は デー ター ユ つ 1 つ 付 いて いる も の で すす が 記 こ 
で は 一 番 左 に ある アド レス (最少 アド レス ) の み を 表わし て 
いま す . ここ で * ゞ 6F00′ は デー タ “34” の アド レス を 示し て 
いま す . デー タ “34? の 右 隣 に ある “37” は $6FO1 番 地 , そ 
の 隣 の EC” は $6F02 番 地 と な っ て いま す . これ ら デ ー タ 
の リス ト は 独立 モニ タ , 音 声 モ ニタ ,,SUPER MONITOR, ME- 
MORY CHENGER な ど で と れ ま す . 

一 番 右 端 と 最 下段 に ある 数 値 は チェ ッ ク ・ サ ム と 呼ば れる 
も の で , これ は プロ グラ ム ・ デ ー タ で は あり ませ ん .( 入 力 す 
る 必要 は な い ). この チェ ッ ク ・ サ ム は , その 1 行 の デー タ の 
合計 を 示し て いま す . 6FO0H 番 地 か ら 6FOFH 番 地 で は , 34 H 
填 37H 二 ECH 二 … 十 8DH ニ $37E と な り , 下 2 桁 を 取り YE7” 
と な っ て いま す . 

この よう な チェ ッ ク ・ サ ム を あら か じ め リ スト に 付加 する 
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こと に よっ て , リス ト の 入力 ミス し た 箇所 を 素早 く 見 つけ る 
こと が で きま す . た と えば , $6F05 番 地 の い 83? を “82? と 
間違っ て 入力 する と , 横 の チェ ッ ク ・ サ ム は “7D” と な っ て し ま 
いま す . また , この と き の そ の 列 の 最 下段 の チェ ッ ク ・ サ ム 
も ^13′ と な る の で 一 目 瞭 然 で す . 

この よう に 長い リス ト の デー タ の 1 つ 1 つ を 見 直さ な く て 
も チェ ッ ク ・ サ ム だ け を 見 れ ば 間違っ て 入力 し た 箇所 を 発見 

うに な っ て いま す . 





oO _QO 
4 41 








9 2B さ F 2 DF 
この 中 だ け 入 力 す る 

















FM-8 用 高速 ゲー ム を マシ ン 語 で 作っ て み ま し た . この 
ゲー ム は サ プ CPU を 倍速 に し て いる 方 に は 非常 に 難し い 
こと で し ょ う . スリ ル あ ふれ る この ゲー ム を 一 度 試し て み 


て くだ さい . 
IllllllllUUUUUUUUU 


プロ グラ ム の 説明 


初期 設定 と し て サブ CPU に 表示 プロ グラ ム を 送り , 映 
像 処理 を サブ CPU で , 音声 処理 を メイ ン CPU て で 出力 す 
の 人 く CGU な YE や 

音 出力 は サブ プ よ り メ イン に 高速 割り 込み で 処理 し , で き 
る だ け サ ブ 側 の 負担 を 軽く し て いま す . この ゲー ム は スピ 
ド 感 が 命 で すか ら , この 点 を 心掛け て プロ グラ ム し まし 

その 一 つ は 表示 パタ ー ン の 配色 は 一 色 か 二 色 に と ど め , 
表示 速度 を 上 げ て いま す . また , 車 の 走行 は 道路 の 両側 の 
木立 ち を 画面 の 上 か ら 下 まで 車 の スピ ー ド に 応じ て 常時 移 
動き させ , 相対 的 に 走行 を 表現 し て いま す . 

エン ジン 音 な ど は ノイ ズ 十 パルス 波形 を メイ ン で 車 の 速 
度 に 応じ た 周波 数 を 常時 出力 し て いま す . BASIC は 画面 の 
初期 設定 で , 後 は お 3000 を 入口 と する マシ ン 語 に 突入 し ま 
す . マシ ン 語 エリ ア は $3000 か ら $ 3EED ま で で す . 
mllllllllUUUUUUUWMM 


ゲー ム の 説明 

IlllllllUUUUUUUU 

キー 操作 の 説明 は T V 画 面 で し て いま す . 内 容 は 一 定時 
間 で 走っ た 距離 を 記録 し , これ を 更新 する こと で す . が 
あま り ス ピー ド を 上 げ る と 前 を 走っ て いる 車 に 追突 し や す 
く な り ま す . また , ある 程度 スピ ー ド が 出 な いと 方 向 キ ー 
は 効き ませ ん . スピ ー ド は 控え 目 に 

他 の 車 に 当っ た と き と が ガー ド ・ レ ー ル に 当っ だ た と き は , 
スタ ー ト 地点 に 返さ れ て 記録 は ゼロ に な り ま す . 時 間 内 で 
あれ ば 再び 挑戦 で きま す . 
flllllUUUUUUUUUU 


音 出力 に つい て 


IOUUUUUUU 

音 出 力 変更 リス ト の 通り 外部 アン プ お よび スピ ー カ ー を 
利用 する と 一 層 人 迫力 の ある ゲー ム が 楽し め ま す . パル ス 波 
に 少し 高周波 アイ ズ を 加え る と 本 当 に メカ ニカ ル な 回 転 音 


3 ーーーmーー……… 
| RT 


OO 


に な る も の で すね . 外部 スピ ー カ ー だ と スリ ッ プ の タイ ギヤ 
の 音 ま で それ らし く 開 こえ て くる も の で す . カセ ッ ト ・ イ 
ンタ ー フ ェ イ ス の MIC( 赤 ) に 出力 し ます . 

IlUUUUUU 


最後 に 注意 点 を 


IlUUUUUUUU 
メイ ン 側 の 高速 割り 込み の ベク タ ・ ア ドレ ス $FFF6-7 
を ゲー ム ・ ス ター ト と 同時 に 書き 換え て いま す . ゲー ム 中 
[STOP] キ ー が 押さ れる と 本 来 の アド レス ($1E0) に 復帰 
され ます が . プロ グラ ム ・ エ ラー な ど で 復 帰 さ れず に ホッ 
ト ・ ス ター トミ させ た 場合 ,、 CPU は [STOP] キ ー で 病 走 し ま 
す 、 や コウ み で ペク アダ ャ アザ ャ ルス だ 和 あ 杜 る か が 入湯 5 
る 以外 に 方 法 は な い の で 注意 を し て くだ さい ・ 周 辺 機器 が 
誤動作 し ます ノ 
IIUIlllUUUUUMM 
最 後 に 
デ 
間 人 IIUUUUUUUM 
タイ トル に ふさ わし く , メ イン も サブ も 一 体 と な り 明 時 も 
休ま ず , それ ぞ れ の 分 野 で フル 稼動 を し ます . 別 の 名 を “ メ 
イン も サブ も フル 回 転 " と いい ます . 
それ で は FM-8 “メイ ン と サブ の スピ ー ド の 共演 "を 楽 
し ん で くだ さい . 主役 は レー サー の あな た で す -. 
SOUND 出 力 変更 リス ト 








3313 03 00 
331A 
3327 
3332 
3350 
3355 
336E 
3378 
3484 
348F 
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FM ラリ ー 








BASIC プ ログ ラム ・ リス ト 還 還 還 昌 昌 還 昌 間 還 昌 昌和 








10 CULUR4。 Os MIDTHBO。 20: SYMBDL (160。10) 。、 "XXX BaME MaqG \#% り "4242。4 

2O LUCATE。 6 FRINT" コ ノノ ケー ムリ キメ ラル レダ ゴリ テイ ノー ジカン テ " ハシ ジック キョ リ ./ キロ フ ヲ コウ シン ヌル コト カ " モ 
の キディ ズ 

30 LUCRTE』 Bs:FRINT "レー ニッ ウ ” カ ーー./ ソウ サ ルリ カー ソル イト "ウキ ーー ノー ソバ トル 7 ホウ コウ カ " TV カメ フ 2 フッ レイ 
ヤー カー :/ ホウ コウ ニニ ワイ オウ ジテ イマ ズ 。 ソ ツル "トノ 。 ホウ コウ / テイ ソノ ./ キー(SPace) テ " ティ イ =/ シマ Ro。 " 

40 COLORES。 DCATE5。 12sFRINT" 27 ログ" ラム ヲ BUB CPU ニ オフ リ テ ドリ コウ シテ イル ググ メ THF キー 力 " ハタ 
2 キッ EZ が w に ニニ s)NLSUR も で ョ ラ 2REE キ ーー ジョ オミ ケー STHP キ ご 9. 72 テー クタ 33 G 地 回 民 ボ を の 2 が 
ォ オッ メト オト カ ” デ デ ナ 2 ナリ 23。 9 COLHR4.09 

50 LUCRTESO。 1 昌 :FRINT "HIT eny key"i iT 和 ま =ーINPUT 和 まま (1) 

60 CLSILTNE (35O、 SO0) 一 ( 選 60。 1 ヨ 9) 。FSET。 1 。 BF 

70 BYMEDL (350。10) "FM" 」 さ 1: SYMBDL (420。10) 。 "Ra11y"。2。 1 、6: SYMBDL (3BO。 2 日 ) 。" TndiCa 
も OFV』 1。 フ 

BOX= ニ 364: Y= ニ 40: HGSUB9O』 メニ 452: BHSUB9O』 X ニ 516: GSUB90』 BHTU10O 

90 LTNE (X。Y) 一 (X+ き 1 。Y+120) 。PSET 。O。 BF : LINE (X+ さ 。Y+1 ) 一 (X+2 昌 。Y+1 19) , PSET。 己 。 BF si LTNE (X+ 
10。Y+ ロ ) 一 (X+21 。Y+11 昌 ) 。PSET。0。BFs LINE(X』。Y) 一 (X+10。Y+ ロ ) 。FSET 、 Os LTNE (X+ さ 1 。Y) 一 (X+21 。Y+ 
5) ,。 FSET』 0 LTNE (X+10。Y+11) 一 (X。Y+120) 。 PSET。 OL TINE(X+21 。Y+1 1 王 ) ー(X+ ラ 1 。Y+120) 。、PSET,O 
: RETURN 

100 SBYIBOL ( さ 555。 1 655) 。 "RECURD IN RECDRD TIME"。1。1 7 

110 芽 *= リ 10":FURX=45TO15OSTEF1 1 : SYMEOL (41 昌 。X ) 。 了 ま 。 1 1 。7 ェ エニ VQL ( エ 生 ) : エニ エー1 : T ま =STR$ ま (1 ) 
iNEXTiSYMBOL(415。Xー2) "Em 1。1。 ブ ー 

12O_ EXEC&HSOOOIEND 
































OO さ 1 SF 26 DE Co6 
FC 7F FD OS Ce6 05 
DC 07 10 93 09 27 
ヨミ OO 01 DD 07 20 
91 QO Q1 QO 96 00 
QO OO OO OO OO _Q0O 
2O 08 Q1 2C 00 96 
1O ED 8 17 16 OO 
BD 2a BD 79 8D さき 
F8 39 8D 18 8D 2B 


add  +O +1 2 + き +4 + す 日 + ら 6 + フ + +9 +a +B +C +D+E ォ F Sum 
さ O00 B6 FD 05 2H FEB 1 5O 6 BO BZ7 FD 05 CE FC BO さ O =:B1 
さ 3010 BD QO 96 C6 4 Q6 BO a7 CO Ga 26 F9 7F FD O5 CC 6 
さ 020 00 OO 日 3 OO 01 26 FB 33 BD OO CZ7 BE DO FO 3O 8 :32 
3030 CE B6 OD C6 32 BD 31 7F FD 05 7F FD 05 B6 FD 05 :D1 
さ 040 2B FE 33 BD 05 9E BE CO OO 30 BB CC 6 4F C6 34 :2a 
305O0 BD 16 86 O1 BZ FC O 7F FD Q5 7F FD QO5 CC oo oO 2B 
3O6O_ B3 OO O1 26 FB 16 O1 FD DD OO Bo6 FD 0O5 2B FB D7 :4B 
3070 Q1 6 ヨ Q BZ FD Q5 BZ FD 05 3 BF FC FE 10 8E FC :Q6 
さ O08O 7F 』1 ミ 











309O B6 :OE だ か IT) なの 
39O 41 :21 Sum: CQ 6O DD 7 FO DE F4 CO BS 57 C2 5C 2B 17 a4 97 iD5 
さき 0BO D4 :5F 
3QOCO OR :a7 
3oDO FE :OE 
30EO EO sa6 Add +9 +Q TB +C +D +E +F Sum 
30FO 39 :2D 3400 OF BD 1 BD 10 26 F4 :CB 
EC OC ED 2B 39 EC 2 17 
Sums DE :D9 24 3 06 24 01 39 ED :ED 


add  +O +1 +2 + さ +4 +55 +6 + フ +B +9 +a +B +C +D +E +F Sum 
き 100 OO OO 6 12 97 FO B6 BO 97 F3 97 F7 97 FB 39 6 :BE さ 470 OB ED 26 28 O1 さ 9 EC 28 B< OO O1 ED 2B 26 ES さ 9 6C 
さ 110 52 さ 1 BD OO 3 7 2 さ 20 QA B6 a2 31 BD OO 30 a7 :FB 34BO B6 41 BZ FD 0Q3 EC 24 B ミ OO O1 24 FB 4F B7 FD 03 : さ 7 
さ 120 23 20 OB AE C1 6 CO BD 12 6D C4 26 FB 39 さ 4 5Q0 :CE 3490 EC 26 日 3 OO Q1 24 FB さ 9 OO OO OO OO BD 36 17 Oo :CB 
さ 1 さ O BD F3 35 10 さ O BB 5O 35 40 20 EQ C6 08 3D CS DB :F2 34AO E2 BD さ E 26 F7 ミ 9 BD 2C BD さ F BD 35 26 FB <9 BD :2E 
02 C6 OB さ 4 10 6 AO さ 4 Q4 BD 10 BD OE 30 =:19 34BO 23 17 OO 9 ミ D 2B 26 F フ 7 39 BD 19 BD 2C D 1D 17 :FB 
2 35 04 Ba 26 EF 35 10 6 B1 39 46 56 57 :6B 34CO OO B5 BD 1D 26 F さ 39 BD OB BD 7C BD OF BD 1 BD :F2 
57 46 56 57 46 56 57 9D FO 30 1F 39 aE C1 :5D さ 4DO 10 26 F4 39 EC B4 ED 24 EC Q2 ED 26 EC QC ED 28 :F2 
BD 07 6D C4 26 FB a6 CO 3 C6 08 3D CS DB :BE 34EO さ 9 EC 2Q B さ OO O1 ED 2 39 EC Q6 る 4 06 EC QA 36 』7B 










さき 180 02 さ 34 10 6 OB E6 AO 9D FO 3QO BB Bo 4 26 i7E さき 4FO_O6 BD 3C 35 06 3 OO Q1 26 OE EC 24 日 OO Q1 26 』:7 ビ 

さ 190 10 A6 BO 39 さ 3 BD 00 C1 BE 1F 52 17 FF 62 :92 | | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ニニ ーーーーーーー ニ ーーーー ニ ーー ニーーー ニ ーー ニーーーーーー 
さき 180 97 FO_QF F ミ 17 FF 70 33 BD OO QE BE 1F 52 s55 Sum: FC 5C 9C E4 25 2 7E OO 1E CB さ 2 DB 94 2D 1D DE 』a9 

さき 1EO 4F 0O4 F さ QO4 F7 04 FB 16 FF 5D 35 BD QO BB i13 


31CO 6E 17 FF。s4F 











QF 41 OF DZ 6 OS 97 EO 97 E6 97 EZ7 97 E ヨ 30 sg1F 
3 O6 9E 9F 1D 9F 1F 39 BE 70 B2 6 6E 63 B+ 30 gi9F 
さ 640 BB BO 4 26 F ヨ 9F D2 6 01 97 DD BE 30 9F a6 9 si9 昌 
+ る 4 + 品 + す 6 +7 + +9 +Q +B + ビ +D +E +F Sum さ 365O 40 OO 27 OB 7 OB 7 9 4O OB 3Q 8 BO 20 EF BE ia4 
さ B 2O FE BE さ 3O OO 6 96 97 OO ao6 8Q 2B =:36 さ 66Q 4E BF 6 6E 6F 9 40 OO 6F 4 3O0 BB 5QO 4A 26 F4 =sG6 
03 20 05 C6 41 FZ7 FD 0Q3 C6 06 5 26 FD :FO 367O 9F DO CC 24 QB DD 21 OF E1 6 18 97 E2 BD BF 6 saE 
・ 6 41 BZ7 FD 0 ミ 3 10 BE QQO 20 31 さ SF 26 FC 2 さ 3680 O1 97 D4 97 D5 97 Ca 97 DB oOa DD 6 06 97 1C 97 si65 
ささ 3 さ 0 7F FD Q ミ 3 10 BE OO 2O さ 1 さ F 26 FC Oa OO 26 CE 20 3690 ED OF -1B 17 05 FE OF Q4 6 02 17 O1 2 16 0O C5 siEZ 
ささ 40 O1 39 BE さ Q QO 1O 9E Q4 a6 QO 2 Oo フ 7 C6 41 F フ Z FD さき 6QO BD D2 OE BD D1 94 6 Q1 17 O1 1Q 6 03 10 BE 00 si9F 
さる 50_ O ミ 2O O ミ 7F FD Q3 D6 0O6 5 26 FD 48 26 EC ヨ ビ 3 フ さき さ 6BO_OO さ 1 ラコ F 26 FC 4Q 26 F9 16 FF 2F 96 EF 26 31 6 sia1 
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た 7 ラ ゾ ー 


マシ ン 語 ダン プ ・ リ スト 











Rdd 
さ COO 26 FC 4Q 26 E9 BE QO OO 30Q 
さ C10 1E 97 OO C6 5O CE FF FF BC 
さ C20 FF EO OO さ A OR QO 26 FO 39 
さじ さ O OO FF EO OO 3 Oo OO 26 FO 
さき C40 QO 26 E6 39 さき BD QO1 F2 B6 
さ C5O 2O0 24 14 EC C4 FD EQ 0OQ EC 
さき C60 さる 44 QA OO 26 EB 39 BC BB 
さき さ C70 QQO EC 42 FD EQ 0QO 3Q BB SO 
さき CBO 
























人 Add O 3 
3800 DC さ C CS OQ 5O DD さ C 96 E5 27 07 DC 40 CS 00 SO si1C 
3B10 DD 40 17 0O BD DC 21 83 QO FO DD 21 20 46 1 1F :35 
さ B20 























dd  +O 二 1 + 人 2 + る +4 + +6 +Z + 日 +9 +Q +B +C +D +E +F Sum 
3900 ED B4 ED BB 1C EC 42 ED 02 ED 8 1E EC 44 ED 04 :D3 
き 910 





dd +O +1 +2 +: 
3AOO_D ラ 3 3E DD 2 0 
3 さ Q1O EQO OO DD 25 OF さ SF OF E4 96 15 4 OF 4C 97 EB 16 si45 
さ Q2O OO 4 17 02 1F 96 E4 27 OF Oa EZ7 26 79 6 03 97 si1 ビ 
さ Q3O EZ7 CC FF 10 DD さ E 20 6E OQ EB 26 6 OF EH 96 CA :47 
さ Q40 BO QB 2B 2F BE 79 20 D6 15 C4 0 ヌ CB 1 CO 0O4 D1 :35 
さ Q5O ES 24 03 5C 20 F9 CB 04 C1 20 24 4 D7 E4 3 9F :3 ミ 
さ 360 25 96 Ca ヨ 0 Q4 D6 EE C4 O1 27 O1 4 D6 CB 3D DD =:BF 
さ 7O_ さ E 20 ささ BE BE 10 D6 15 C4 03 CB 1 CO O4 D1 E5 :FB 
さ QBO 24 03 5C 20 F9 CE Q4 C1 20 24 1HB D7 E4 さ 3 9F 25 sz44 
さ Q9O_B6 OB 90 Ca D6 EE C4 O1 27 Q1 4C D6 CB 3D DD 00 saO 
うさ QRO 4F 5F 9 る QO DD 3E 9E 27 96 41 27 57 Oa aa 26 2C : フ ヒビ 
ささ RBO _B6 03 97 an 96 E5 91 E2 27 22 24 11 BB O4 91 E4 =:3a 
さ RCO 27 1 OC E5 DC 27 ヒマ る QO O1 DD 27 20 OF O 04 91 si41 
さ RDO E さ 3 27 09 Oa E5 DC 27 日 ミ QO Q1 DD 27 17 Q1 3O DC iB1 
さき AEO 
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ガ 條 旋法 の 疹 訪 


2001 年 の ある 日 , 東京 江戸 川 区 に 金属 を 食料 と し て 増殖 
する 恐ろし い 宇 宙 ア メー バ が 小 了 石 に 附 着 し て 飛来 し まし 
た . 彼ら は た ち ま ち に し て , 車 , ビル な ど を 食料 と し 日 本 
全国 に アメ ー バ 拠点 を 拡大 し て いっ た の で す . 宇宙 アメ ー 
バ の 武器 は , 人 間 に 激 し い 下 痢 を 起こ させ る バイ 菌 と , 金 
属 を 礁 触 さ せる 恐ろし いい 毒ガス で す . あな た は マッ ハ 2.5 
で 飛行 する アメ ー バ 攻撃 メガ の 司令 宜 と し て 鳥島 に 設置 さ 
れ た コン トロ ー ル ・ タ ワー か ら 上 手 に 攻撃 メガ ロ を 操作 し 


起 詳 ど 導 類 








DDT (都市 散布 用 ) 





これ は 1950 年 代 に 使わ れ た 殺虫 剤 で , 宇宙 アメ ー バ 駆除 
に 絶大 な 効果 を 示 | ます . 散布 範囲 は アメーバ に 上 古 拠 き 
れ た 攻撃 都市 に 限定 され , アメ ー バ 基地 に 対し て は 使え ま 
せん . その 射程 は , 目標 に 対し 100km 以 内 で す . また , 一 度 
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散布 し た 都市 に DDT を 発射 する と 人 間 に 
め 減 点 さ れ ま す . 


回 キン チョ ルン (基地 噴射 用 ) 


IS 
ANo 基地 に 潜む 宇宙 アメ ー バ 
を 退治 する こと が で きま す . SH 200km 
以内 で す . 


が コマ ン だ の 世 克 


PL 一 飛 行 (60 分 まで の 分 単位 で 入力 ) 
BR バリ ア ( 敵 攻 撃 に 対し 防衛 する ) 
TNー タ ー ン ( 英 攻 撃 を 回 避 す る ) 
0 

(の た ーー (DD 工 散 布 命令 

〒G 一 ター ゲッ ト た A 
AC 一 オー ル シ テ ィ (都市 , 基地 まで の 方 向 , 距離) 
SD 一 セル フ デ ー タ (残り 弾 数 な どの 表示 ) 
CM 一 コマ ンド (コマ ンド 一 覧 ) 

CD コー ド (DDT を 散布 する た め の 命令 ) 
GO 一 三 多 

HI 一 高 度 (高度 入力 ) 


悪影響 が 出 





































































































H 1 一 高 度 (高度 入力 ) END と な り ま す . また , 敵 攻撃 に よっ て 披 弾 し た 場合 
RD-ー レ ー ダ ( 短 距 離 レ ー ダ ) その ダメ ー ジ の 具合 に よっ て , 一 度 で 撃 員 さ れる こと が あ 
* 宇宙 アメ ー パ ペ 都 市 と 基地 の 各 コ ー ド り ま す . 





宇宙 アメ ー バ 都市 ( 全 10 都 市 ,。 DDT 目 標 ) 


FM 一 根 室 ”FS 一 福島 。 MM 一 松 本 
EM- 携 裳 CB 一 千 葉 FI 一 福 井 NS 一 長 崎 ーー リー 上 良 <E 

S ら か に 洋上 に 退 
TWー 十 和田 SO 一 上 岡 KM 一 串 本 AS 一 阿 攻 区 で が か に ば 上 に 師 芝 ずる 
SA 一 佐 渡 NG 名 古屋 ”"OYー 岡 山 
ア を 使わ な い . 











/ 誠 訪 の テク ニ 











SPー 札 幌 SD 一 仙台 KZー 金 沢 ME 一 松江 KG 一 鹿児島 に よっ て 補給 され ます . 
宇宙 アメ ー バ 基地 ( 全 20 基 地 , キン チョ ルン 目標 ) す . 
AB 一 網 走  ZO 一 蔵 王 ロ Jー 入 丈 。 YG- 山 ロ ⑯ 瑞 基 地 の 複 数 個所 を 横断 し な い . 


@ 瑞 攻 撃 に より スピ ー ド が 低下 し た 際 , 都市 攻撃 を 
この 際 , 攻撃 成功 に よっ て , スピ ー ド は 元 の マッ ハム 2.5 
に 回 復 し ます . また , 得点 が ある 程度 あり , 
に よっ て か な り ス ピー ド ダ ウン し て いる 際 , 
成功 済み の 都市 が 近く に あれ ば , その 都市 を 再度 攻撃 し 


DDT は 全部 で 10 発 , キン チョ ルン は 最初 5 発 積 まれ て 
WN 一 稚内 AM 一 青森 _ TK 一 東京 OS 一 大 阪 FO 一 福 岡 いま す . この キン チョ ルン に 対し て は , 敵 都 市 攻撃 の 成功 
高 得点 の テク ニッ ク は 次 の 通り で 
KC 一 高 知 @ 瑞 都市 に は 海洋 上 か ら 一 直線 に 進入 し , 攻撃 後 . すみ 
イエ Gー 種 ヶ 島 バリ ア の 能力 は 段階 的 に 減少 する の で , むやみ に バリ 


か つ 敵 攻撃 
すでに 攻撃 


この シミ ュ レ ーション で は 高度 が 約 500m 以下 .、 ス ピー ド ます . これ を 実行 する と スピ ー ド と キン チョ ルン は 回 復 し 
が 200km/ 時 , 燃料 が 100 ユ ニッ ト 以 下 , 得点 が 減点 に より マ ます が 、 減点 され る だ た め 墜 落 の 危険 性 が あり ます . また , 


イナ ス に な っ だ た と き の い ずれ か ーー つ に 該当 する と GAME 最初 に 攻撃 指定 都市 を ね ら う と 高 得点 を 得 や すい で す . 





日 本 復活 BASIC プ ログ ラム ・ リス ト EE 








13Q DIM GBRA1(18) 。BRQ2(1 日 ) pd 

さ 00_ GUSUB600Q: DIM ZZ(550) 。C(10.2) 。N ま ( さ O) 。T( さ 0O。 さ ) 

さ 1Q RESTORE4C H7EQO TH &H7ZES ERD 全 sPHRE T。VAL ("SH"+ 介 $) : NEXT 

35Q_ FRI=1T ロ RE=15: GHSUB40Q10: NEXTI 

351 RESTQRE7: :READ N ま (T) 。T(1。1) 。T(T。2) :T(T。1)=T(T。1) %25: T(T。2)=T 
(1。2) *25i NEX 
さ 5 さ BUSUER ミ さ QC 
品 SYMBOL(120。0) 。 "アメ ー リ ~ コウ カキ モ 2E ョ ウ " 
Q_PUT3(172.B4) 一 日 。 144) 。Z%。PSET 。4 














TO 





SUE 594Q0 
MIDTH40.。 2 CHNSHLEO。 25。0。 Qi CHLHR プ 。Q:CLS 


っ 











さ B85 LINE(12Q 
9 SYMB ロ L(1 
1000 FC1=QO: 





0) 一 (560。 さ 0) 。 PSET 。 0。BF : SYMBHL(150。Q) 。 "テキ アメ ー リ ~ ます" 。 さ 。 さ 。 6: GUSUB904Q0 
170) 。 "9" イマ コウ ケ ~ キ フ * ラー サウ セイ チュ ウリ 。 1 。2。7: CLEAR 

Qi N1=2( NQ+N1: DIM ZZ(55QO) 。 CTN ま ( さ O) 。 じ (1042) 。N ま 
TERTEN 
1Q010 _ ロ N ERRR GUTOS5Q DIS=RND (55) *100 

1020 0DR ま ="FLERTNRTTGHTCUSDRDCMCDGOUAC" 

1025 REST ロ RE 1Q3 さ QFOUR 了 =QOTU さ ORERD CTN$ ま (1) :NEXT 

103 さ 0 DaQTA TS。MN。SF。AM、SD, TK。 ド EZ。 ロ S。 ME。 FU。EG。 RENM。EM。 和 TU, SR。Z ロ 。FS。 CB。 SU0, NG』HJ 。 NN。F 
TEM。OY。YB。EC。 AS。NS。 TG 

104Q_ REST ロ RE75QQzFHR I=Q TH ミ O:READ _N ま (1) 。T( エ T。1) 。T(T。2) :T(T。1)=T(1。1) *2 ロ sT(1。2)= 
T( 1,2) *2: NEXT: GUSUB 5940 





) 。TB (ご 1) 。T(SO。 























107Q ERB ロ =QOgEBD=10:FY ・14159:FYO2=Q ェ メニ 10 ミ *2 つ 5+TNT(10*RND( 1 ) ) : Y=155*%25 ロ +TNT( 
10*RND( 1 ) ) : GHSUB910: 9= ns A0=5000: MM ま (0) = リ NT イキ フリ ェ M ま (1) = モリ トト の カー スリ" ョ CO= ニ 10:sFXO1=0: 
=2SQQ 

1Q075 PXQ2=Q0sP=5sP D:F9=0:FPYO1= ニ 0 =OQg XOTD1=Oi XHTD2=Oi XHTD さ =Oi YUHTD1=0i YUHTD2S=QOs Y 
ロ TD さ =0: ATY=0: THX 





1Q0BQ _VFLG=QiGHSUER さ QQQOQ 
1090O FUHR 1 エ =1THNO:T(T。 さ ) =Qi NEXT: GUSUB 5940: ニーINT(1QQOOXRND(1 ) ) : 1= ニ 人: R9=Q 

110Q BUSUR 5940』 ビ =INT(RND(1 ) * さ ら 60 ) : GHSUB 5910:C1=C:T9=INT(RND (1 ) *NO+1 ) : NN=T9: CTN= 
T9: TB=OiF=2QQQ0! ENP=2Q0Q0Q0Q! 

1110 FOR 1 エ =1TOU10:C(I。1) : NEXT:FFFX=RND(1)%10QQ:FUR 1=1TO5 

1120 GUHSUBR 910:FFF メ =FFFZ+(TNT(RND(1) %10Q0Q+1 ) ) : NEXT:L9=。 さ 

1 1 さ O N ま = リサ ワウ セ -, モウ フ ヒ ョ ヨウ ハリ "+N 和 も (T9) : SYMBOL(140。25) 。N 和 ま 。 つ 。2。7: CD も ="DDT OPEN キー コー ト ~ "+ST 
R ま (FFFX) : SYMBUL(140。45) 。CD ま 。2。1。7 

230 _ SYMBOL(160。190) 。 "(Hit any Rey)"。1。1。7 

1240 MATT ま =ITNEEY$:TF MTT ま = リ "THEN1240 

1242 CLS:SYMBHL(150。10) 。 "BAME _ LEVEL" 。2。2。 昌 : BYMBHL (50。50) 。"1・・・ マ リリ さ 。 さ 。 7 SYMBOL( 
50j.1007 。 "の < の ビー かせ さ 。 7: SYMB ロ L (50。 150) 。 "りさ ・・・ ウ ニー メリ 。 さ 。 さ 。 7 フミ LOCATE4 。 s INPUT "LEVEL" ョ ビ 
ST 事 

1244 CST=VAL (CST ま ) = IF CST<1 ロ R CST> さ THEN 1242 

1246 IF CBT=1 THEN CST=5QO+INT(RND ( 弓 ) *10) :E ニ = 
1247 IF CST=2 THEN CS QQ+TNT(RND ( さ ) *10) :E ニ 















GT 1250 
GUTQ 125Q 















1248 = さ THEN CST= さ QQO+TNT(RND(2) *10) : = ニ 5: GUTO 125O 

1249 Q:E= オ 4 

125O Qi CFG=0 : NNV ま =N ま (NN) : HKM ま ="" ュ ロ TRRGB ま = リリ" ュ BUSUR BOQQ: GHSUE1Q51Q: GSUR BSQ 
9 


2000 GUSUB2640 

2010 LINE ( さ Q5。 120) (624。 191 ) 。FSET。 1 。BF 

2020 AUFG=O: COLUR7:LUCATE20。 14: PRINT" "LUCATE20, 14: INPUT" コ マト ~ 
リュ 全 : 全 RIGHT まあ (" "人 事 。2) 

20 さ O 0DR=(TNSTR( ロ DR$。 人 ま )+1) /2 

2040 IF ODR<>Q AND UDR=INT( ロ DR) THEN GU TO 2Q9O 

205Q FOR TI=O TO さ :BEEP:LUCATE20。14: COLUR10:PRINT "メイ レイ ニ アリ ッ セ フ " ェ FOR 1J=O TO 200: 





NEXT: LUCATE2Q0。 14:PRINT " "s NEXTs GU TH 202Q0 
206O FR TI=O TO さ : BEEP: LHCATE20。 14: CULUR10=s PRINT "トシ コー ト ~ ニ アリ ッ セ "FUHR エゴ =Q TO 20 
QiNEXT:LOCATE2Q。14:PRINT " "ziNEXT: CHLUR1:LUCATE20。14:PRTNT" 

"s RETURN 


2070_ GUSUB5910s 征 Q ニ T+ さ +INT (5XRND(1 ) ) : BHTH4QQQ 

2090 ロ N ロ DR GUTO 2240, さ 100。2720。 2B60。2470。2110。2150,2690。2600。7112。2170。2 さ 00。582 
Q 

2110 GUHSUB65 さ Q 

2120 IF 1XBQ THEN Aa 
21 さ O GUSUR 910: 征 Q=T+ INT(15*※RND(1) ) : BHTH 4Q0QQO 
2150 GUSUE 6560: GUTU S13Q 
2170 IF FLS1SOO_ THEN LHCATESQ。16:FRINT "CD キ -2 チ 97"sFHR BX=QOTH ミ OO NEXT EXsG ロ TO 2QO 
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19 

217B IF F9=2 THEN 222Q0 
218BQ0 GOSUB 658Q 

219Q0 IF F9=QO THEN 22S1QO 
220Q 
<21Q 
2220 
2240 RUFG=1 : エニ Cs ゴー ニ 0 ェ ドニ ロ 

225Q COLLOR プ LOCATE2O 。 14: TNPUT リヒ コウ = カー リョ 人生 = ドー ニ VL( 介 生 ) :.TF ドド >60 THEN ド =6Q0 
2255 THEN ドド = 









() 
THEN222O 
QO THEN 243Q 
GOSUB 6640 
IF LEN($) ぶ 2THEN 2440 
谷 =LEFT 生 (人 2) : SGHSUB 5BOQO: TF ((NN=-1) ロ R (NNENO) ) THEN BUSUE2Q6Qs GHTO 2 さ QQ 
GOSUB 5700: IF RAE1O0 THEN 2450 
BSUE 665Q 
IF 人 >PYU THEN 213Q 
FR TI=1TO1QO: IF TBKTT)= ニ NN THEN GOSUE 6525: BHT ロ 21 さ 0 
NEXT 
2 さ 8Q BSUE 666Q0 
2400 GOSUB 5910 
2414 ERH=EBO+1:ERD=10-EBH: IF EEH>9 THEN F9= 人 2 
2417 TEN=TEN+16Q+INT(10OKRND( 1) ) : IF T9=NN THEN TEN 
2418 TETEN$=RTGHT 是 (『 "+STR 捉 (TEN) 。5) : BEEF:LTINE( 
EOL (5455。B 旨 ) 。 TETEN ま 。 人 2 。 1 。1 
419 TB(EEO) =NN: TB=NN: Q +S5Qi BHSUB 91Q:s TOQ= ニ T+6+INT (5*RND (1 ) ) 
2421 ITF SG=2GOO_ THEN =25Q FX=S*X1 ヨ 0/2500: LINE (SFX+1155。46) (2955。 49) 。 PSET。O。BF IL 
TINE(67。44) 一 (111。551) 。FSET。Q。EF : HSFD$= ニ SBPD* ま = GPD ま =RTGHT(" "+STR$(S) 。5) : SYMBL (る 
B。 45) , SFD$。 1 。1。7:FINT (29 さ 。48) 4。7 
2422 IF PXS THEN PF=5:GQSUE 1Q0QOS2Q 
2425 GOTO 40Q0Q 
24 さ Q_ GOUSUER 6670:』 GUTO2 
244Q GSUBE 
45O_GHSUR Q 
2470 GOSUE 670Q 
24BO_ GOSUR SBQQ 
IF CTN=-1 QR _NN=-1 THEN BUSUB 2Q6Qg GTO 247Q 
GOSUE 5910: TO=T+40+INT(41%RND(1 ) ) :GHTU 400Q 
BUSUE 675Qi GHTO 2510 
エニ Qi ゴ =4B( ロ R_NN=(NQ+1 ) TIN2 : GHSUB5S7QQ: TF RA>J THEN 25BQ 
IF T(NN。 さ ) =2 THEN25BO 
256Q_ BUSUE 5SQOQs IF ES(C-AN) >45 RND BS( ビ -N) くさ 1 THEN 25BO 
257Q J=RRi エ =NN 
2S5BQO_NEXT:NN=I:i IF _ NN>QO THEN 251Q 
2590 GOTO 251Q 
26QQ_BHSUB2640 
2620 GOHSUR 5940: TO=T+9+TNT(RND(1) ※11) :GHTH 4Q0Q0Q 
2S640 J=QkFUR =1TUNO: IF C(1I。1)=O THEN 267Q 
265Q =1 
266Q GOUSUE 6790 
267Q_NEXTiRETURN 
2690 IF F9S>2 THEN GOSUB 6240 
27QQ BUSUER6250: GUSUR910: TOQ=T+20+INT(RND(1 ) *21 ) : GHTH400Q 
2720 BUSUB 5940: 1= さ O+TNT(15QXRND(1 ) ) : ITF RND【(1) く .55 THEN 1=ー 人 1 
27 さ O =R+ 人 1: ITF >160QO THEN =16QQQ 
2740 IF AX9O THEN SQQQ 


275O GUSUE 5910: 人 1= 人 Q:C1=60+TNT (6Q*RND (1 ) ) 

276Q ITF RND(1)>.6 THEN 1=ー- ビ 1 

2770 C=C+C1: = ロビ + さ 6QX 人 BB (CO) - さ 6Q*ABS (C> さ 60) 

27BO C1=C:FOR エ =1TUNO: TF C(I。』1)=Q THEN 2B40 

2790 =(B+2XARB(C(T。1) く 10) ) /(C(T。2) -T) : IFJ>.95 THEN J=.95 
2BOQ IF RND(1) > THEN 284Q 

2B1Q GUSUR 6B2Q 
GOSUB 68 さ Q 
CT。1)=Q 
NEXT: GHSUE 59 
て F PF<1 THEN F 
BODSUB 6B5Q 

IF *="" THENSQQQ 

TF LEN( 人 まま)< く 2THEN29BQ 

人 ま =LEFT* ま (人 も 。2) : BHSUB 58OO 

IF NN(11) THEN29Bo 

BOSUB 5700: IF RA>2OQ THEN 2990 

FOUR TI=11TOSQ: TF TB(TT)=NN THEN GUSUB6525: BUTU 4000 ELSE 29 さ 4 
9 ミ 4 NEXT 

2940 TB(NN) =NN: GHSUE 6B6Q 

295Q G ロ SUB 687O 

296O BOSUR 5910: TO=T+ さ ャ NT (RND (1) *5) : GOT ロ 4QQQ 

297O BUSUER 568BO: BHT 298Q 

GSUB 6B90: GTH2g6Q 

GOSUE 69QQ 








EN+5QQ+INT(RND (1 ) *100) 
。B2) 一 (6 さ 0。955) 。FSET , 5 BF 』 SYM 























TQ=T+1Q+INT(21*RND(1) ) : BHT 4Q00Q 
BOTO 297Q0 



















THEN 3 さ Q3Q 





O 







・B THEN さ Q9Q 





F C(E。1) 10 AND RND(1) 





BCHSUR 69 さ G 

CX(K。 1)=Qs BUTO 296Q 
BUSUE_ 69 さ Qz GHTHS96Q 
FOR 1=1TO1Q: IF C(T。1)=Q THEN さ 18Q 

ゴ デ = ビ ーRND【( 1 ) : IF ES1 THEN GUHSUB 5910: ゴ =RND(1 ) 
IF J>.99 THEN =.99 
GOSUR 591Q0:TF .55:J THEN 
LUCATESQO。 18: EEEP:FRINT 








18Q 
テ キ ナカ "ーー"g ビ ( エ 。1) "9 "SLHCATE2O。 19:FPRTNT M ま (BS(C( エ 。 
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1.) : 
15O 
160 
17Q 














401Q 
人 020 












4Q0BO 
409Q 


4180 
4190 
4200 
4210 





4419 
4420 
4430 
444Q 
44509 
人 44469 
447Q0 
448O 
4490 
450Q0 
45510 
4520 
4 に 
4540 
455Q0 
456Q 
4570 
458QO 
4590 
460Q0 





5510. 


SS52Q 
5539 
7Q0Q 
58Q00 
5BQ02 
5805 
SB2Q 
58 ミ Q 
8 
5910 
5920 
に ) 
594Q 
595QO 
596QO 
6Q0Q0Q 
6001 
60Q さ 
600 フ 7 








O) ) 。" ニ サト " ウ "=E=E*。 ア s エ F E く 1 THEN =. 品 
GOUSUR 6949 

GUSUER 695G 
C(T。1)=Q 
NEXT:GHSUE SG940: TO=T+B+INT (XRND (1 ) ) 





1: IF TOzT THEN4GBQO 
s BHSUIE 910: 本 ミニ INT (RND (1 ) * コ 
FOR 1=1TO 1Q0zsTF C(T。1)=Q THEN 
と ( エ 。2) く T さ THEN T (1 エ る) 

(1。2)-ー10 THEN 4Q60 
10 <T ミ THEN T (T。2 
=T) ロ R (T ミ <T2)THEN 


















RO*TOs rO※TO 

人 一人 R1) THEN = 人 1 

= 人 ES( 介 人 1) THEN = 人 RTR2*GGN( 人 1 人 ): エ F 人 >160QO THEN 人 =160Q00 
ES ( 革 60* (人 ABS (C 1) >180) 一 ES (ビーC1) ) THEN 4 
C+C2%SGN(C1- じ ) : に 56Q* 人 ES (CSO) 0*※ 人 BS (CS さら 60) :GHT ロ 4140 









N(C*FT/Z1BO) / 
T) / さ 600) s 
stT/1BO) / さ 






















ーINT (S*X(T さ ーT) / ミ 60O) 
Os =T ミ 





T=1T ロ 1O: TF (C(1。1)=O) ロ R (DE=1) ロ R (CR=1) THEN 427Q 
T THEN 4250 


910』 人 = 人 INT (2BOO*RND(1) ):TF RESOO THEN 5G 
GUSUE 5940:F=INT (F-60QXRND(1) ) :BHSUB 5910 
5910: TF RND(1) く <.2 THEN DE= 





DO 
INT (SG-19OO※XRND( 1 ) ) 








(T+10) THEN 








THEN 6 
500 THEN 6210 
400 THEN 622O 
200 THEN 
THEN O 
FOR_NN=1TO_NOs SUIEG 
IF T(NN. さ ) 0 THEN 











IOQzIF RR>10Q THEN43 


Q 





よ 代 
IF R 人 1 
GOSUE _ 65990 

IF_NN=CTN THEN GSUE1G51O 

NEXT 

FR _NN=(NQO+1) TO _N2: IF T(NN。 さ ) =2 THEN461O 
IF ABS(X-T(NN。 1 ) ) >CST THEN 4610 

IF ABS(Y-T (NN。 飼 ) ) THEN 4610 

BUSUB _ 5700 IF RA>CST THEN 4610 


1 THEN 4360 
THEN_ 436Q 


















IF_ RA>2 THEN 446Q 

IF T(NN =1 THEN 446Q 
T(NN。 ミ 

GOSUE 6】 

IF TX(NN 1 THEN 45QQ0 
IF RAXS2QO THEN 4500 
T(NN。 さ ) =Q 








IF_RND(1) >L ワ ※(TO ロ / さ 00) ※( 谷 
TO10: IF C(K。1)=O THENJ=F 
THEN 4610 

GUSUE IF _RND(1) ・5 THEN 455Q 

GOSUE _ 540zC(T。1)=INT(10*RND(1)+1) : =7000: GHTH 456Q0 

BUSUE 5 の 10:C(J。 1 ) =20+2%TNTK(RND (1 ) * ア ) : =4000 

GOSURSGC し =(QN-C) %F エ /18B ロ 

L=SQOR (NM“2ー(SKSTN(L) ) で 2) 

GUSUE 5700zC (4。2)=T+INT(( 


・125) THEN4610 














SN(F エ - 人 ABS (L ) ) XaEBS (SG*COS (L) ) 
さら 6QQO※RRR/L)+1) 








GOSUB55QOQi GUHSUE57QQs GHSUEBEOO ェ = 人 ES (ビー 人 aN) 

RaND FX900 THEN 5QOQQ 

IF SSQQOTHEN 621Q0 

IF FX9QOQTHEN 62 

IF S5QQOTHEN 1 

IF TENEO THEN 5OQQO 

IF 19=1 THEN 20 

IF IT9<>1 THEN 400O 

GTQ 7040 

DX=XーT(NN。 1 ) : DY 

IF DY=Q THEN 5 ロミ C 

NATN( 一 DX/DY) *18BQ0/F エ +1BO*※ 人 BS(DYSO) キミ る 6Q※K 谷 RS (DX EQ) ※ 人 ES(DYQ) : RETHRN 

Q+1BOXAES(DX > RETURN 

RA=SHR((X メ ーT (NN。 1 ) ) 2+(YーT (NN。2) ) 2) : RETURN 

CTN=-1:FUR SUR=QTO IF 内 ま =LEFT ま (CTN$ (SUR) 。 つ ) THEN CTN=SQR 

NEXT SOR 

TCT=CTN: NN=CTN: RETURN 

GUSUB67QQz NN ニー1 :FHR HEN=QT ロ さ Q: TF 内 = ニ LEFT ま (CTN ま (HEN) 。2) 

NEXT HEN: IF _NN=-1 THEN GUSUB206Q: GUTO5B2O 

BUSUE 1051Qzs GUTU 2Q010 

RAND ロ NTZE(VAL_(RIGHT ま (TIME も 。2) ) 16 さ ) 

DIS=INT(SIN(D1S) *1QO) 

RETURN 

UUU=INT (CHS(DTS) *100) 

RANDONMIZE(UUU) 

RETURN 

MIDTH4O。25: CHNSOLEO。 2 。O。 Oz CHLOR7。 7 ェ CLS 

CULOR6= キ 1: TF >2QO THEN 6Q0Q さ ELSE PRINTCHR ま (254) 』 :=GUTU 6QO1 

CULOR 人 4 : ER+1: TF BE>4BO THEN 6QQ7 ELSE PRINTCHR$ ま (254 ) 3』 :GHTH 6QQ ミ 
が が 
















ーT (NN, 2) 













THEN NN=HEN 




















COLURSB: ビビ +1: TF C>120 THEN 6009 ELSE FRINTCHR ま (254 BOT 690 ァ 7 
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6009 CHLUR2: D=D+1 : IF D>120 THEN 6Q011 ELSE PRINTCHR$(254) : = BHTH 6QQ9 

6011 CUL ロ RO:E=E+1: TF E>40 THEN 6015 ELSE PRINTCHR$ (254 ) 』 : BHTH 6011 

6015 SYMBHL(15Q。10) 。" ニホン フウ カリ "。 さ 。4。23 SYMBDL(100。1655) 。、" (C) 19B2 BY (HTI) マイ 2 ロ ェ 
ウノ ロミ トーリ 2。2。1 

6Q1 昌 RESTURE757O:FUR HL=QTD15:RERD GRA1(HL) : NEXT HL:FURHL=QT ロ 15:RERDGRA2 (HL ) : NEX 
THL 

6020 LINE(5BO。4Q) (5B1 ,41) 。PSET 。Q 

60 ミ O FOR HL=OQTO15 

6040 LINE- (BRA1 (HL ) , GRA2 (HL ) ) 。FSET 。Q 

605Q NEXT HL 
6Q6O CUNNECT (5 
60BQ CIRCLE ( ミ 05。 125) 
6Q9QO FATNT ( さ 5Q。 125) 。1 。 
610Q_ SYMBOL (BO。110) 。" 
611Q SYMEHL(1Q0Q。105) 
6120 RETURN 





SO) (520。 482203 PSET 






s24QOgFATNT(230。120) 。9。Q 





EEー】 





19=1: CHLUR プ 7: 










6200 R9=1:C(T。1) =Q0: Sc 
TT=&HCO ェ TEM=S ェ 人 RE=15:GHSUE40O10: GTT= ニ Qi TEM テ = : RETURN 
5210 JLHR ア 7: LCATE2Q。14sPRINT" デブ ロロ T ビー 





2: QR : BUSUEB40Q10: BEEF : GTO 5OOQ0 

6220 CHLUR7: LUCATE20。 14:PRTNT" レノ 」 二 痢 ー ド b 人生 ン アン と = ゴイ エイ デミ ビビ の = T ビ に 

=1 : ARE= さ 5: GHSUE4C Qi: STT=Qi TEM=2: RE=2: GUSUB40010:GHTO 5OQQ 

623Q LOCATE2QO。14sFRINT" ーー コ "ウー フン 2 BE に ビビ ェ = エエ イー デー ミ <FH ビ Os T 世 5 に 9 

= ニク: RE=15: GUSUB40010: STT=%zHO: TEI=1 : RE=15: GHSUB4QG10: BEEP: GHTU SQOQOQO 

6240 CHLOR ア LHCRTE2Q 。 15: FRTNT "ダリ イイ チ モウ ヒョウ ー" sN 和 ま (T9 ETURN 

6250_ CULOR7: LHCRTE20。 17: FRTNT "リフ コリ キー チョ ルル 0 ュ FsLHCATE2O。 19: PRINT "リフ コリ DDT "EEBD: LOC 代 
STR 人 RA 


































TE2Q。21:FRTINT "フッ カウ トシ 
6260_RETURN 






INT N$(NN) :LHCATE2O。 18: FRINT" 
BAD=INT (2OQXRND (1 ) ) : TEN= TEN- ERD:L ロ ATE 
6526 TETEN 和 ま =RTGHT ま も! リ +STR$ ま (TEN) 。5) s BEEP:sLTNE ( 
BOL (545。85) 。 TETEN ま $。2。 1。 1 :RETURN 
QO LOUCATESO。 14:FRTNT" "iLHCATESQ。14: INFUT "コウ トド リョ 1 ま : 1 ニーVRL( 人 1 も ) 
ft 0 TH N 人 1=Q 

IF 116Q0Q0 THEN 1=160QQ 

RETURN 

LCATESO 
657Q_RETURN 
S5BQ_ LOCATESQ。 14: INFUT "コー "saFG ま sFUBX= テ MRL (FG ま ) : IF FUG 
eS59Q_RETURN 
ら 660Q FINT(4QQO。 日 7) 


上 カカ" ゴア リリ GTT 
ー FRINT" ケ 7 
・B2 う 一 (6 さ 0495) 。 FSET。 呈 。BF s SYN 

































s14s INPUT" 





"asC1 ま 5C1= ニ VAL (1 生 ) = TF C1X1 OHR C1> さ 6Q THEN C1=1 





FF THEN F9=1 


MEQL (< 





s"DT"。1。1。7: COLOR 





LOCATE2O。 16: 





PRTNT" サ 











s ご : CHLUHR ア LHCATE2O。14:FRTNT "コー トカ 
ETURN 








? ス ": LUCATE20。 16s NT" ア ナタ ノー コー 
ら 662O_ COHLORZs LHCATE2O。 1S:PRENT "DDT 

ら 66 さ O_RETURN 

6640_ COLHRZs LHCRTE2O。14: INPUT "サー ンプ" 
665O_ COLOUR7 ア 7: LHCATE s14s TNPUT "サッ フ 5 カフ ウニ 
ETURN 

る 66Q CHLOI LCRTE2Q 。 15: STT=&HQO 
RINT" フ eK 
ド KA>=10 THEN SQQOQ 

ら 6662 CONNECT(19。.8B4) - 
ら 6664 LINE 
6670 CCOLQO 








TURN 
(Y) "3 人生 : STT=SzHCO: TEM=2 ェ RE 








SHSUE4QQ1Qi REEFsFRINT N$ も (NN) 』 "リエ リア 
= ヨ = T 爾 に の 三 王 華人 旭 に 人 の ユエ 








74) (250。74) (270。B4 ) 一 
55。 184) 。 PSET 。( GBSUBE 
コ 16 5sPRINT "DDT サッ フ " フ ノ ウ * 
CATE Q.16:FRINT"DDT リト シヨ ウ 
s14: INPUT "モウ テキ ト : 
UE SO6Qs RETURN 
=INT(C(I。 : EEEF 
INT M ま (ABS (C(1。1 ) So) ) jSECs 
682Q_K=1 GUTO 4ooo 

6B3Q_ IF C(T。1) >10 THEN LHCATE20。 20gPRINT" ハ " イキ -/ カイ ヒ ピ 

6840_ RETURN 

68SQ_ CULUR7: LUCATE20。 143 INPUT "キー チョ ルコ ッ ヤ キチ リュ 仙 和 ま : RETURN 

6860 LOCaATE20。 の COLOR7: BEEP:PRINT" ま ニッ チヨ J レ ニン ニッ ミッ イセ = ラロ 員 豆 マ ーー 
60: STT=&HCQ: TEM=2: ARE= さ Q: GUSUB4QQ10: RETURN 3 

6870_ STT=&HCO: 析 和 3 : QR Q: BHSUB4QQ10: LUCATE2O. 2 さ : CHLUR プ フェ FRTNT N$(NN) : "アメ ー リ "キチ 
カ Y"sT(NN :F=Fー1 : TEN=TEN+ さ Q+INT(100*RND (1 ) ) 

6872 TKTEN ま =RTGHT$(" "+STR ま (TEN) ,5) : BEEP: LINE (5 さ Q。 ヨ 2) (6 さ O。95) 。 PSET 。 呈 。 BF : SYM 
EL (545。 8) 。 TKTEN ま 。2。 1 1:RETURN 

6BBO_COLUR7: EEEP: LHCATE2O。 1 日 : PRTNT "キー チョ ル -/ ユニ リト セ " ロ " 
6B9O_ COLOR7: BEE CATE2Q。18:sFRTNT" ツウ 
6900 BEEF: CULUR7: LHCATE20 16: PRINT N$ ま (NN) 
QQO_RR-200"s RETURN 

6910 RETURN 
6920 REM 

69 さ QBUSUER926O ェ PF= ピ ー1 : GT 
メー バハ エル ター ナイ "LUCRTE2O。 2 
6940 1F C(T。1): 







270。 184) 一 (26 コ 。187) 。Q 
RETURN 

: RETURN 

EEEP: RETURN 

! 人 R ま =RTGHT ま (リリ + 人 生ま 。 介 ) RETURN 























LGC ・19。 COLHR7s PRTNT "アメ ー リ ドー セ ゅ キュ LHCRTE2O。21:FR 


: TQM=SEC: GUSUB _B59QO:i RETURN 


















: RETURN 
RETURN 
テイ ガイ "saLHUCATE2Q。 17: PRINT "シャ テイ DT-1 














&HCO: TEM=2 : RE 
FRINT "コウ カセ" 
)THEN CHLQR7g LHCRTE20。 全 










Js SHSUIB4QQ10: CHLHR7 プ = LUCATE20。 22: PRTNT リア 
RETURN 
FRINT" ト 2 が 











コウ メリ s RETURN 











695Q IF C(T。1) ぶ 10THEN CHLOR7: LCATE20。2 さ :FRTNT "NT イキ ーッ ショ ウメ リー "sg RETURN 

6970 19=1: RETURN 

658O _T(NN =1: 19=1:RETURN 

699Q CULUR プ アミ LHCATE2O。 16:FRTNT N ま (NN) 』 "9 の カ "sz T (NN。 さ ) =Qs RETURN 

7QQ00_ COLHR7 ア LUCATE2O。 16: BEEF:FRTNT N ま (NN) 』" "sLOCATE2Q。 1 日 :FRTNT "キッ チョ ルー フー Bu ヤ 





ティ ナリ ュ エ ワウ =1 : RETURN 

7O10 GOTO 689QO 

7020 STT=S&zHCQO: TEM=1 : ARE=1 王 : GHSUR4QO1Q 
"iLHCRTE2O。 17:FRINT M ま (ABS(C(J。1 ) 0 
7Z04Q CHLUR7。 0 CLS: STT=O: TEM=2: QR SYMEHL (2Q0。 呈 ) 。 "BAME END" 。 さ 。2。 ア 
7Q5O_ CTY ま = リー テイ "リキ N ま (9) : SYMBUL (10 ) 。CTY ま 。2。2。 フ 

ア Q060 IF N ま も (TB) =N 和 ま (T9) THEN N* ま =" ダウ カカ +N ま (T) : SYMBHL (10。6O) 。N 和 も 。 つ 。 つ 。 ア 
7Q8BQO_DISFL ま = リ "SCHRE "+TETEN ま : SYMBHL(10。90) 。DISFL ま 。 9 

711Q0_ BOTQ 71 る 1 

7112 
711 さ 
アァ 114 LUCATE20。 
7Z115 LHCATE2G 7 
7 ア 116 LUCATE20。 1 RINT "SD-CRT 
ア 117 LHCATESO。 1 "RINT "TGー ト シ 
711B LUCATE2OQ。 SOsFRTNT "CE ロ ー コ ー ヌ B ロ -DDT" 


LHCRTE2Q。16:FRTNT N$ ま (NN) 』 "カラ 
"s RETURN 






















FRTNT "コッ マー ト ~ " 

PRTNT "FLー ヒ コウ ER" リア" 
FRTNT "TN- ヲ ー-。 エー コウ ト 
PRTNT "ED- コ ー ト 
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BASIC プ ログ ラム ・ 





リス ト 











フ 119 LOCATE2QO。21sPFRTNT "RD-ー レ ー タ " "LHCRTE22 FRTNT"Hit any Rey" 
プア 120 MATT ま =INKEY ま stF MATT$=" "THEN 7120 ELSE 2QQQ 
7121 IF STAKA>=1Q THEN FUTS(272。B4) 一 (4QB。144) 。ZZ。 FPSET。 己 : STT=Q : TEM=5 
3907 FATNT (272 90) 。 王 : PUTD (EZ72。B4) (408 SE 2s CMBOISAG5 49) 。 
3: SYMEQL(15QO。 15O) 。 "アナ エラ ャ 






















2000 THEN CLAS 

999 AND TEN>=1 

599 aND TEN>=14QC 

さ 99 QND TEN>=110 

QP9 RaND TEN:>=BC 

く =799 AND TEN>=5OO THEN CLAS も =" キ チノ 78 ッ リ カカ ッ カ 7 日 

99 AND TEN>=SQO THEN CLOSG*= リ アナ ダリ ハー スコ = アホ テス カリ" ュ REEF 

IF TEN<=199 THEN CLAS ま = リア ナタ) カベ キナ アホ デミ デ スリ!" BEEP 

SYMEBHL(10。160) 。ELAS ま , さ 。 さ 。7: TEM=1 : RE= さ QOSTT= ニ Qi GUSUE4QO1Q0 

FR _ MATI=1T ロ QsNEXT:FPUTS (372。B4) (BOB。144) 。ZZ。FSET。4:FATNT( さ QB。 100) SG。7。 4 

ア 15Q_ MIDTH40。25: CHLHR ア 0 CLSs LUCRATE1Q。 12』 TNFUT "モウ イチ キト" ヤリ マス カ (Y ) " 』 介 和 ま = TF 人 ま = リ YU THEN 

LCATE 10。14:PRTINT "EN" ラフ オマ チキ フ ウタ" サイ LEAR: BHTD 1Q00Q ELSE END 

75QQ_ DRTA トリ シマ 。 1 155。 ゅ カナ 。 1 さ サウ ホロ 。 124 。2 さ 。 アオ モリ 。 1 1 日 。 コ アセ ニン ウト イ 115。 ロ 7 

7510 DaTR トウ キョ ウ 。 1( 76。 7 けが ロ 。8B9。 6 ら 2 オイ サカ ェ ブ 4 。 プ イオ ェ マリ エ 。 64。 64 

DRTQR 274 カ 。42。 7 カコ "シマ 。41 。 昌 Z 

7 DATA アジ シリ 。 1 日 。 17。 ネ ムロ 。 14 ら 。 人 6。 エ リモ 。 1 

フウ シマ 。 10 昌 。 62 

7540 DaTa 

755O DaTA 

75e0 DRTR 

70 DaTA 

758O DaTR 

BGQQO_WIDTH40。 〔 

BQ1Q_ CHNMNECT(10。 昌 7 

BoOSQ_ CONNECT(10。84) 一 ( 

B4) う (10。B4) .0 
LINE(O。69) 一 

REN= ミ =: 

ロ SUE909O 

Bo5Q FATINT (*。 

BQeQ CCONNECT(10.B4) 一 (30。 

07Q_ LTNE (0O。 69) 一 (GO。 199) 







) THEN CLRG*$ 
THEN CLAS$ 





































が 1 アオ 1 。 サト" 99。 王 7。 7 オウ 。 114。5 日 フ 


NT 。10 さ 。 ア 日 。 シ スー オカ 。 9 プア 。 ナ コ ~ ヤ 。 日 4 。 プ 4。 キミ ョ ウィ 99。92。 マ リモ ト 。94。70。 フ ウィ 。 日 さ 。 6 
、 ヤ マウ チ 。 49。69。 コ ウチ 。62。 7 












OO。400。 520。 5BO。 180。 58O 
40。100。6Q0。40。138。40 


s187) 。O 


)。14) (250。 194) 一 ( さ 0。194) 一 (10。1 


ァ ) (247。77) 一 ( 
Z4) 一 (250。74) 一 (2 









199) 。PSET、Q。B 
: RY=76: BHSUEQOOs RX= 





:G 











、74) 一 ( 


- (26E 





T。。 HEF 

















B090_ LINE (0。9) 一 (4 に 

8100 PSET。 5, BEF 

11Q0 s14) 。PSET, 1 。BF:SYHEL*1 昌 
昌 14) 。FSET 。 1 。BF : SYME ロ L (1 






紀 s14) 。 YIEHL ( 





















44 





140 LINE 、40) 。、FSET 、 1 。BF: CUNNECT・ (111。4Q) 。Q 
B15Q LINE 9 5 と 4Q) 、Q 
160 LINE 40) 。Q 
B17Q LINE(15 





18Q LINE (ミズ ) 一 0 | 1 , BEF : SGYHIBUL (24。 王 6) 。" 

9 CONNECT(15。54) 一 ( ミ Q 。6 さ ) 。 〇 

LINE (45Q 。 0。BF 

LINE (ば ( = SYMBQL ( さ 24。45) 。" コウ トド 0 1。1。7 
に YMBOL (1 ア 。45) 。" ス ヒド ー ト "0 1。1。Z 


sd 





7。BiLINE(114。 
7 
NT(116。57) 。 つ 。7 

541。199) 。PSET。O。E =CHNNECT (11。1 
。179) 一 (6 さ 1 。 120) 一 (6 10 さ ) 一 (311。 


ー(622。106) (62 日 。 120) 一 (62 日 。 179) (622。196) 。0s FATNT (ミミ 50。1055) 。 


CIRCLE (ご 70。 6 
FRINT(116。47) 。 
280 LiNE (26。1o0 
1 。 196) (625。 196) 一 (6 さ 
29O CoNNECT iOH。10 
RINT(62B。140) 
) FATINT( 0。70) 。0。0。5 
Q _GQSUE 
呈 GUSUR 
) GQSUER J 

) GUSUE 1Q510 

TKTEN$=RTBHT 生 (" り +GTR ま (Q) 、 呈 ) : SYMBQL (545。B5) 。 1.1:RETURN 

) SP S*18BO/250Qs LINE (SPX+115。46) 一 (29 旨 。 49) 。PSET。Q,BF * LINE (67。44) (111、51) 。 PSE 
EF: HSFD*=SFPD ま =R1GHT 生 (『" "+STR* ま () 。 呈 ) : SYME ロ L (6 日 。 45) 。 SFD$。 1 。1。 ア 

B52Q_ FUX=F/20000!*※1BOiLTNE (67 。55 MM 
=FUL ま : FUL ま =RTGHT 事 (" "+STR 呈 (F ) 。 き ) : SYMEL (67。55) 。FUL ま 141。 

*M ソ =MYVC : ビ じ Z ニ ビ / さ 60*6. 2 日 一 1 . ロア ェ : MXHC= さ 70+20*CS (CZ ) : KECR*= =STR$ (C) : OLC 
= ド EC ロ R* ま = MYV ビ = ニ 1 ア 7+20※GTN (CZ ) *※. 4495 





ミ 1 





和み 






























B540 LINE (ミア 5 ロ 。55) (417。62) 。FSET 。Q。EBF: DSP ま =RTGHT ま (" "+STR$(FL ) 。5) : SYMR ロ L ( さ フ アフ 
6) 。 DSP。 1 1 7 
B55Q LINE(375。44) (417。51) 、PSET 。Q。BF : ALT=RTGHT ま (" "+STR(Q) , コ ) : SYMEOL ( さ 77。4 
) 。 LT も 。 1。1。7 





B5 

s) : LINE ( さ 5O。 さ 
"TBTR* (FFFX 5) 

B566 IF VFLGSO THEN LINE ( さ Z70。17) 一 (RMC,RMV) 。PSET 。Qs CIRCLE( 

8570 LINE ( ミ 79。17) 一 (MXHC。 NYVC) 。PSET 2: VFLG=1 

B572 GOHSUB57Q00: GHSUESSQO 

574 PC= ニ 7:RX=X/ つ 5+ オ 4 オア: RY ニ Y※ 6/25+8B5 

B576 IF RXXK24 HR _RX>255 THEN RX= 

57 ヨ IF RY7B OR RY>184 THEN RY= 

B579 GUSUER 9095 

58Q_RETURN 

59Q IF TaM 人 ND TaNM 

6QO IF TaN<=9O_aAND TAM 


) COURG ま =STR(TNT( じ ) ) +"。"+RTGHT ま (STR$ ま (INT (CX10) ) 。 1 ) : CHRG ま =RTGHT 呈 (『 "+COURS 串 
2) 一 ( さ 97。 さ 日 ) 。 PSET 。 Q。BF : SYHE ロ L ( さ 50。 さ 2 ) 。 CURS ま 。 1 。 1 。 7: ANGH2 ま =RTGHT ま て" 








0。17) 。4。2。。6。。。F 










THEN BUTO 8B6 さ 3Q 

さ 6 THEN KEISU=TaAM: EQK=INT (RND( 1 ) *※ さ 60+1 ) : BUTH B640 
B61Q IF TAMS= ニ 15Q_aND TA 1 THEN KEISU=TAM: KK=INT(RND(1 ) Q+1 ) : BHTO 66Q 
B620 IF TQM<=220 AND TaAM>=151 THEN KEISU=TAN: EK=INT(RND( 1 ) *※ さ 6Q+1 ) : GUTOB68O 
6 さ Q_ STT=&HCO: TEM=1 : ARE=155: BEEF : RETURN 

64Q_ PXO1=53+INT (KEISUKCUS (EAR ) / さ 。 さ 55) : PYO1= ニ さ ヨ ーINT(KE1SUXSTN(KAK) / さ . さ ロ * 。 4495) 
B65Q_XUTD1=PXO1 : YUTD1=PYO1 =:F ビ = ニア 7: BHT B7QQ 

660 PXO2=5 さ B+TNT (KEISU*CHS (KAK) / さ 。9) =: PYO2= さ 5ーINT (KEISUXSTN(KAK) / さ 。9*。 4495) 
670 .XUTD2=FXO2: YUTD2=PYQ2 PC= ニ 6: BOTH B71Q 

68B0Q_FXQO さ =5 さ +INT(KETSU*COUS (KAK) /4.6) : FPYQ さ = さ 5ーINT (KEISUXSIN(KAK) /4.6*。4495) 
69Q XUTD さ =FXOQ さ : YUTD ミ = ニ PYQ さ = ビビ =2: BHT 72Q 

7QO_RX=PXO1: RY=PYQO1: GUTO 9110 
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BASIC プ ログ ラム ・ リ スト 








B710 RX=PXO2: RY=PYQ2: BT ロ 911Q 

B720 RX=FX Y=PYQ ミ : GOTO 9110 

9Q00 FUR NI=1 TO 10:V=V+1O 

9010 REN=2:FC=6: PC1=2:RX=T (NT 。 1 ) /25+147: RY=T (NT 2) *.6/25+B5 

9020 GUSUB 909O:LTNE(25O。6Q) (4QO。B5) 。FSET 。O。BF : SYMEDL (2 つ 50 60) 。N ま (NT) 。2、2。4 
90 さ QO SYMBOL (O』5Q+V) 。N ま (NT ) 。2。 1 2: NEXT: RETURN 

9040 FOR NI=11 TO ソ =V+ ウ 

ウ Q5Q REN=2:FC=1 :FC1=6:RX=T (NT 。 1 ) /25+ さ 47: RY=T(NT 。2) *.6/25+B5 

go55 BUSUR909O: LTNE (450。 60) 一 (5B0。B5) , PSET 0。BF : SYMRHL (450、60) 。N$(NT) 。2。 2 
go5B SYMBDL (590。 り ) 。N ま (NT ) 、 1 1 6:NEXT:RETURN 

9O90 CIRCLE(RX』RY) 。REN。PC1 。 . 6。 。 。、F: RETURN 
go95 BEEP:FPSET(RX 。RY。FC) : RETURN 

91Q0O CTRCLE(RX,RY) 。REN, FC。. 6: REWURN 

9110 CIRCLE(RX』RY) 。 呈 。PC。 6: SBTT=SHCO: TEM= さ 
9120 CIRCLE(RX』RY) 。55。0。.6 

9 RETURN 

915Q FOR III=OT ロ 6.2B STEP さ .14/6 

9151 FOR AZU=155 TO 45 STEP 15 
9159 XEN=540+AZUXCOS(TTT) :YEN 
19Q NEXT AZU:NEXT Tr 

9197 SYMBDL( いす 21。4:BYHEDL (470。22) "TV 2 
BYMEL (592 。45) 。"」"。2。1。4: BYME ロ L (490。46) 。"」"。1。2。4 
人 2,BLINE(460、 フ )- (619.59) 。 FSET。6。B 

919 RETURN 

9210 FC=O:FHR XZUE=1TH さ SO STEP さ : FC= ニ FC+1:LTNE(470+XZUE。10+XZUR) 一 (606ーXZUE。55ーXZUBE ) 
。FSET FC,B: TF FC>6 THEN FC=1 

9220 NEXT XZUB 

92 さ 0 FOR XZUR=1TH46BTEFS。 1: し TNE(470+XZUBR。 10+XZUE) 一 (606ー-XZUH, コローXZUE) 。FSET 。2。 BB: NE 
XT XZUB 

924Q LINE(470。10) 一 (6Q6』55) 。FSET 。Q。 BEF: GDBUR 915O 

9250 RETURN 

ウ 26Q PTF=F TP+1: ロ N FIP GT 9261。926 さ 。926。9267。926 日 



















さ : NRE= さ 5 弓 : GHSUB4Q0010 











AZU*SIN(TIT)*。S2:PSET (XEN。 YEN。 7 ) 





4』 SYME ロ L(600。20) "0。1。2。4。 
LINE (455。) -(624。61 ) PSET 。 














53261 PAINT(4 90) 7 ア :RETURN 
926 さ FRINT(452。90) 7: RETURN 
9265 PAINT(471.90) 7 ア : RETURN 
9267 PAINT(490。90) 7: RETURN 
9268 FINT (5Q9.90) 7』 RETURN 





FIFP=0Qi PUT ( ア 
FR _NI=1 TO 10 
REN=2 iP ビニ 2 ェ ビビ 1 ニョ 
GOUSUR 909G 

NEXT 
RETURN 





4) 一 (208B, 144) 。ZZ。FSET。4 





RX=T (NT 。 1 ) /2 ロ +47s RY=T (NT 。2) *。6/2+5 








iFHR XZUE=1TH さ .6 STEP 1 .2:LINE (296ーXZUB。 7 ミーXZUE) 一 (6 さ 4+XZUB。 95+XZUB) 。FS 

sBsNEXT XZUE 

QO_ CONNECT (05。 5) - (356。 ヨ 0Q) 一 ( さ B6』B1) 一 (406。7B) 一 (406。91) 一 
5) 。7gFAINT (2B 5) 。 4。 ア 

1Q015 LINE( B2) 一 (630。95) 。 FSET。 弓 。BF : SYMBHL (555。74) 。 "SEHRE " 。 1 1 。7: SYMEOL ( さ 5O 。 2 

!DTV。1。142 

OSO_FHR XZUE=1TO9 STEF 19:CHNNECT (425+XZUE。95) (4 さ 9+XZUER。9 旨 ) 一 (4 さ +XZUR。B5)ー(4 

さ 35+XZUBE, 日 さ ) 一 (432+XZUE。 プ 5) 一 (429+XZUE。 日 さ ) 一 (429+XZUE。B5) (425+XZUBE。95) 。7:FRTNT (427+ 

XZUER。 9 さ 3) 。6。7:PSET (4 ミ 2+XZUB。 90』2) :FSET(4 さ 2+XZUBE。91。2) iPSET(4 さ 2+XZUE。92 42) :NEXT XZ 

UE:RETURN 

10510 GSUE 7QQs GUSUE 55QQ 

上 IF NAV まく SN も (NN) THEN LINE(16。16) 一 (111. さ 9) 。 PSET 。 1 。EF 

NAV*=N あ (NN) : SYMEOL(15。18) 。 NAV ま 。G 2. 呈 。4 

10530_ UEM*$=STR ま (INT (RAN) 

1Q0540 ITF KM まく >OKM ま THEN LINE(12B。16) 一 (2 ロア 。 う 9) 。 PSET 。 1 。 RF 

1055Q_ ENM ま =RTGHT ま (" "+HKM ま も 。 己 ) : SYMBUL(127。18) 。 KM も 。2。2。。6 

1Q56Q_HTARG ま =STR 和 ま (TNT (人 N*10) /10) 

10570 IF TARG$ ぐ >UTRRG ま も THEN LINE(224。16) 一 ( さ Q さ 。 さ 9) 。 PSET 。 1 。 BF 

1Q05BO_ TARG ま =RIGHT$(" "+HTaRG ま 。 弓 ) : SYMEHL(22 さ 。 1 昌 ) 。 TRGB ま 。 2 で 。、6 

1059O_RETURN 

さ QOQO_RESTQ ロ RE 

30010 NM=Q 

さ QQ2O_RERD 仙 ま : IF 人 ま ="Z" THEN RETURN 

さ 0Q0 さ 3O IF THEN RERD CID:M=M+CID-1:GH TO さ QQ6Q0 

さ QQ40 BE=VAL ("8kH" 十 人 ) 

さ QQO5O_ 7 (NM) =B+655 さ 6! ※ (日 > さ 2767) 

さ QQ060_M=N+1:GH TO さ QQ2QO 

iQQO7Q_ DAT 0449。40。Q。7。1。DQOOO0。Q。 プ 7。 ヨ 4。0。 日 。CE1BO。Q。7。 40。4000。04。7。601 日 

QQOBQ DATA 9 7,CO。 さ ヨ 6。 さ 8B00。 0 5 日 。 4000。 さ 6004。0。6。 FEO。 16。0。6。 1E。0。 1 。188 








*B6。B9) -( さ 56。90) 一 ( さ Q5 


























DQ フ 7Q 






















さ QQ090_ DATA 0O。5。5 さ 。 SEQ DFO。O。6。590。 CO61 6。 Q10 
DATA 0。0。6。4B。0。 昌 。77 ヨ 04。Q。 7 EZ。BQ000 
DATa 7 プ 。10.400。0。7。B01 。O。7。 10。180 


C 1。 ヨ 0QQ。C 
1.6QQ。 日 Q 


DaTa 
DATA 





6,C10。 














100。0。6。6。 7B07 
さ FBO。41Q 1 





)。0 4.5。0。 






DATa 200。E、0。1。1CEO, 1。BQ00。 ・2。 2 っ 0。1。1BEO、 ミ 。0。1,BQ。( 200。 さ FO 
DATA FFC。2QOOQO4041。 CoQG、 O。 さ 20。2000。0。 2。B0Q1 
DaTa o 1 。 2BQ B,7 さ 9。97CF 。 10CO。B09。 4000 


DaTa 
DATA 
DaTA 
DaTA 
0 BSUE 4QQ6QO 
4oo5o RETURN 

4Q0Q06Q_ FOREE 史 
40070_DaTA 
4Q0QBQ DaTa 
40050 DATA 
DATa 
RESUHE 205Q 


OCF 。 1C1F。 ・CO7C。 5 7ZQQO 

17O 

6 Q。4 

。B0Q 3 12。4000』Z 








2 &H7E1E。TENM: PURE &H7E さ 2 、aRE 
EE。 7E。 さ 0。10。EE 。 プ E、 さ 2, 人 6。 B0。C6, QB 48 
B6。 晶 1 2 )1 。4F BZ7。FD.0Q ミ 。 日 6。 09。 4 人 。26。 FD, さ 5 
26。E ラ 9。 ぅ で ら 6。E ビ 1 。 さ コ 。 ュ さ 9。12。12。12。12。12 


OF 。FF ZZ 


EXEC SHZEQQ: BEEF QRETURN 


Q2 
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トメ 生 プ い ズ へ * - ズ ス 


フ オ ワッ テ オオ チル ヒ " エロ ニニ い ハセ サ ! わ ー フ 
オ カッ テー イマ ス ェ 


ノ イチ フ " オ オク ッ テ 7 イ 見 タメ ニシ 


+ ュ フ ナ ト き や) アリ マ 
オ オシ ナカ " ラ リセ っ ト オ ウリ テ RUR オ 


F M-8 の ゲー ム が で きた の て 発表 し ます . 私 な り に サ プ 
CPU を うま く 使 っ て いる つも り で す . FM-8 で し か で き 
な い 芸 も あり ます . 





タイ トル の 一 部 に 漢字 が 使わ れ て いま す が , 当方 の 漢字 
ROM よ り パ ター ン ・ デ ー タ を も ら っ て R AM 上 へ 写し て 


表示 し て いる た だ ため 、, 漢字 ROM が 未 実装 で も 表示 され ます . 


ピエ ロ の 動き に つい て は 簡単 な マタ ー ン で 複雑 な 動き を 
取り 入れ た 方 が 面白 いか も し れ ま せん が , それ で は せっ か 
く の FM-8 の 組 細 な 表示 機能 が 発揮 で きず , つい つい パタ 
ーー ジジ に 浪 を 次 れ で じまい ゆま (し た 。 

そこ で ゲー ム 性 を だ す た め , ピエ ロ の 落と し 方 に 乱数 を 
使う こと に し まし た ・. 風船 を 割ら ず に 落ち る と き は まっ す 
ぐ 下 べ へ. また だ た, 割っ た と き は それ ぞ れ の 風船 の 反発 力 に よ 
り , その 落下 速 訟 と カー ブ プ を ラン ダム に 設定 し て いま す . 

いま ー つ ゲー ム 性 を 出す た め , 50 点 を 追加 する ご と に シ 
ー ソ ー の 吾 の 長 さ を 初期 状態 の 長 さ の 1/6 ずつ 短 か く する 
よう に , じ で いま 、 

また , 画面 の 右端 より 無限 の 風船 が 隣り の 風船 に 引っ 苦 
られ る よう に 常時 登場 し て いま す . 

単純 な ゲー ム で す が 油 断 が で きず , 高 得点 を 得る た め に 
は デモ ンス トレ ーション で も 見 て 落ち 方 の タイ ミン グ な ど 
を つか ん だ 上 で 再 挑戦 し て くだ さい . 





ゲー ム の 始め に は テー マ 音 楽 (天然 の 美 の 一 部 ) の 演奏 


と 同時 に 風船 の 初期 化 が 行なわ れ て ピエ ロ も 登場 し ます が , 
この 場面 で は 終始 演奏 と 同時 に アニ メー ショ ン が 進行 し て 

他 の マイ コン で は 絶対 まね の で き な い FM-8 の み が 有 する 

2 CPU の 威力 が 発揮 きれ ます . 


co ) / ペー 。 上 ge ーー ma 。 の AS 
>: ジ ログ クラ の に つい で 

すでに ご 存 知 の 方 は この 項目 は 読み と ば し て くだ さい . 
高速 表示 処理 に つい て は サブ CPU の RAM 上 で 走ら せる 
べき プロ グラ ム を メイ ン の R AM 上 で 作り , 初期 設定 と し 
て これ を サブ CPU へ 送っ た 後に メイ ン よ り サ プ ブ へ 各種 の 
表示 コマ ンド を 指定 し て 実現 し て いま す . 

この 方 法 で は BIOS を 通じ て の 表示 処理 は 不能 と な り , 表 
示 プ ログ ラム の すべ て は サブ の R AM 上 に な けれ ばい け ま 
せん . そし て サブ の CPU で は 特定 番地 ($0 一 $ 3E7F は 
青色 . $4000 一 $7E7F は 赤色 . $8000 一 $ BE7F は 緑色 ) 
に デー タ を 書き 込む だ け で ,. その デー タ が 画面 に 反映 され 
る と いう まっ た だ た く の 超 スピ ー ド (CPU の 処理 速 許 その も 
の ) で 映像 処理 が で きま す . 
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図 1 


キャ ラク タ の 倍 長 表示 





$5B40 $5B33 


$5B35 












縦 方 向 の ドッ ト 数 
(B=8) 


$5B4C 


| p ン ジ w を 7 フュ ーッ | 
7rwxe9 フ ュー ル | 
| 倍 長 レジ 操作 を サ プ コ ー ル 上 
の イト axe7 ラ ョ ーッ | 


$5B58 


X 162 ま た は 82 







$5B63 


X 十 2 また は 640 


注 2 








$5B66 


① 注 1 一 
⑧ 左上 の $ の アド レス は 本 プロ グラ ム $ の 当該 アド レス . 
⑧ A, B, X,、 Y は レジ スタ を 表わす . 


X に アド レス ・ セ ッ ト 














A に デー タ ュ セッ ョ ト 


倍 長 レジ スタ 操作 6 









RORA 
RORB 


| eymrs 
ASRB 






1 バイ ト 表 示 












$5B73 
B を 反転 また は NOP 注 3 
(①B つ , X 
②B つ $4000,。 X 
⑧Bー$8000, X 
注 4 


注 4 は 説明 文 に あり . 





その 反面 。 い まま で 使っ た 便利 な 表示 命令 が 一 切 使え ず , 
それ に 見 合う 最小 限 必要 な プロ グラ ム か ら 手 掛け る 必要 が 
あり ます . 今回 は SYMBO 工 文 の 横 の み 2 倍 と 横 縦 共 2 
倍 .。 それに ドッ ト 単 位 の 色付け PUT ( プ ブロック) 文 を サ 
プ ブルー チン の 形 で 紹介 し ます . 他 に も っ と 良い 方 法 が ある 
か も 知れ ませ ん が , 私 な り に 精 一 杯 考え を た つも りな の で 了 
承 く だ さい . 

また , 以降 で の 説明 文 , 図 の アド レス は メイ ン 上 の 仮 の 


アド レス で , サブ で は この アド レス へ の ジャ ンプ は 不能 で 





この 特長 は キャ ラク タ ROM の デー タ を レジ スタ 操作 で 
倍 長 し て 表示 し て いる た め , 倍 長 きれ た デー タ の バッ ファ 
が 不要 で , か つ 高 速 処理 と な っ て いま す . 

図 1 に フロ ー チ ャ ー ト を 表し ます . パラ メー タ に けり レジ 
スタ を 使っ て デー タ ・ テ ー ブ ル の トッ プ ・ ア ドレ ス を 入れ 


ます . デー タ ・ テ ー ブ ル の フォ ー マ ッ ト は 図 2 に 示し ます 
が , デー タ の 最後 は 必 ら ず 00 で 終わ っ て くだ さい . 


また , これ は 横 の み 2 倍 の 手順 で $ 5B33 が 入口 と な り 
ます が , 縦横 2 倍 の 場合 は 入口 が $5B35 と な り , デー タ ・ 
フォ ー マ ッ ト の トッ プ は すぐ キャ ラク タ ・ コ ー ド の デー タ 
か ら 始 め ま す . マラ メー タ は XX レジ スタ と けり レジ スタ を セ 
ドド に ます 次 レ ジス タダ は 出 連 (だ 4 依る で 3 

次 に サブ ルー チン を コー ル す る 前 に 注 1 一 注 4 を 目的 に 














図 2 デー タ ・ テ ー ブ ル の フォ ー マ ッ ト ( キ ャ ラク タ ) 
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図 3 ドッ ト 単 位 の 色 表 示 ( 赤 の 例 








U っ 0 TV 画面 の 
+ 1 表示 アド レス 
+ 2 還 
+3 キャ ラク タ の 






+4 コー ド No 列 


END 











応じ て モット する 必要 が あり ます . 

注 1 横 の み 2 倍 は 82 (10 進 ) を セッ ト し て サ プ コ ー ル し ます ・ 
縦横 共 2 倍 は 162 (10 進 ) を モ セット し て サブ コー ル し た 後 X レ 
ジ の 内 容 か ら 注 2 の オフ セッ ト 値 を マイ ナス し て , さら に プラ 
ス 8010 か マイ ナス 800) し て け レ ジス タ を 前 回 と 同じ に セ モット し 
て 再び サ プ コ ー ル し ます -. 

注 2 A レ ジス タ の 内 容 変更 の み で 一 定 の 方 向 へ 表示 し て いく 
ため の X メ レジ スタ の オフ モッ ト 値 を セッ ト し ます . 2 は 右 横 へ 
詰め て 表示 し て いき ます . また 640 (10 進 ) は 下 へ 詰め て 表示 し 
て ゆき ます .640 以 上 の 80 の 倍数 は 上 下方 向 へ 問 隔 を 作り ます . 
その 他 の 値 は 八方 向 か 間隔 が で きま す . 

注 3, 注 4 表示 する 色 ま た は パタ ー ン の 反転 な ど を セ モット し 
あす 。 

注 S を COMB し て 注 4 の の ー③ を すべ て スト ア す る と 白地 
っ ょ り ま す . 注 3 を NOP に する と 黒地 に 白 字 と 

が り ま 2 お : 

注 4 の ①ー③ の 組み 合わ せ で 各色 が 表現 で きま す . ① の み ス 
ト ア は 青 , の み ス ト ア は 赤 、③⑧ の み ス ト ア は 緑 で す . 

これ は 私 の 使っ て いる 方 法 で す が . この サブ ルー チン 1 個 で 
すべ て の 色 , 大 き さ を 表現 する に は サ プ コ ー ル する 前 に サブ ル 
ー チ ン の 命令 の 一 部 ( 注 1 一 注 4 ) を 用 途 に 応じ て 変更 する よ 
うに し て いま す ( プ ログ ラム に よる 命令 セ モット). 


Am、 、 示 












タテ また は ヨコ の 出力 回 数 を Y ヘ セット 
B レ ジ に X の オフ セッ ト を ロー ド 
1 バイ ト 分 の デー タ を 1 ,。 Y へ 保存 


る 前 に 既存 
し て スト ア す る . 







$565B 


$565D 















赤 の デー タ を 表示 す 
の 赤 の デー タ と OR 


1 バイ ト 分 の デー タ を 反転 させ る . 
A レ ジス タ に 反転 し た デー タ を セッ ト し , 
青 の エ リア と AND を 取り 青 の エ リア ヘス ト ア 
A レ ジス タ に 反転 し た デー タ を セッ ト し 
縁 の エリ ア と AND を 取り 縁 の エリ アヘ スト ア 


$5661 










$5669 


$566B 


$5671 


$567B 





$567C 


RTS 


① 左 上 の $ の アド レス は 本 プロ グラ ム 中 の 当該 アド レス . 

② こ の サブ ルー チン で は フリ ー エ リア 2 バイ ト 分 を Y レ ジス タ に 与え て 
くだ さき さい. 

③⑨ フ ロー チャ ー ト の 中 で 1、Y と ある の は 本 プロ グラ ム 中 で は 3. b 人 っ 人 
な っ て いま す . 注意 し て くだ さい 








> サ グ で ! に お ける : 5 
ドッ ド 間 倍 の 色 表 示 


この 特長 は デー タ の 入っ た レジ スタ の 内 容 で 立っ て いる 
ビ ピット の み 出 力 さ れ て 0 の ビッ ト は 現在 表示 され て いる 画 
面 に 影響 を 及ぼ さき ない 点 が 最大 の 特長 で す . 

で 130 を S 
ドッ ト 単 位 の 色付け 処理 が で きま す . また, ドッ ト ・ 

タ 作 成 に も 有利 に な り ま す . dv 
チャ ー ト を 示し ます . 本 プロ グラ ム 中 で 赤 は $5657, 緑 は 
$ 5681, 青 は $56AB, 黄 は $56D5, ピン ク は $56FC, 
そし て 黒 は $ 5723 が それ ぞ れ の 入口 番地 と な っ て いま す . 
参考 に し て くだ さい . 

パラ メー タ と し て メレ ジス タ に TV 画面 の 表示 アド レス 
を 。. そ し て マレ ンジ スタ に フリ ー エ リア 2 バイト 分 の トッ プ 
・ ア ドレ ス を , そし て り リ レ ジ スタ に は パタ ー ン ・ デ ー タ ・ 


し 1 








3 
白 
9 








図 4 デー タ ・ テ ー ブ プル の フォ ー マ ッ ト ( ド ッ ト ) 





十 2 以降 の デー タ の 数 
X の オフ セッ ト 1 また は 80 | 注 1 


デー タ (ドッ ト ・ パ ター ン ) 














ゲー デル の ト ツ ププ ナド と レス を 入れ て サザ デコ ョ ー ル し ます 。 
ー タ ・ テ ー ブ ル の フォ ー マ ッ ト は 図 4 に 示し ます . フォ 
ー マ ッ ト の 注 1 は デー タ を 横 方 向 か ま た は 縦 方 向 に 組み 立 
て る か を 決め ます . 1 の と き は 横 方 向 ( 右 へ ) に 一 列 の ド 
ッ ト で 8 ドッ ト ず つ 表 示し て いき ます . また 80 (10 進 ) は 
縦 に レジ スタ (8 ドット) の 幅 で 下 へ 表示 し て いき ます . 
その 他 の 数 値 は 斜め か 間隔 が で きま す . 


サブ CPU の 使用 法 に つい て は プロ グラ ム 転 送 な ど ソ フ 
ト 入 り で 解説 し た 1/O 別 冊 F M-8 活 用 研究 を 参考 に し て く 


だ さい . 
1 か の 
ト が あ この 中 に は CRT 表 示 に 便利 な サブ ルー チン が 


紀和 現時 点 で は それ ら を サブ コー 
ル す る パラ メー タ も また デー タ ・ フ ォ ー マ ッ ト も 不明 で す . 
更に コマ ンド に より 何 バ イト か の バッ ファ また だ は 作業 エリ 
ア が 要求 され , 我々 の 入る プロ グラ ム に 制限 を 受け る 可能 
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性 も ある と 思わ れ て 手 離 し で 使用 で き な い の が 現状 で す . 将 ん な で FM-8 を ゲー ム ・ マ シン と し て 立派 に 育て よう 
これ も 時 間 の 問題 で 解決 する と 思い ます . 一 日 も 早い 解 で は あり ませ ん か 

読 を , そし て 皆さん か ら の 報告 を 期待 し ます . 避 参 考 文献 
そし て , これ か ら の FM-8 は 高速 性 が 要求 さき れる ゲー ム 1) パサ ウン ド ・ コ ン パ イラ ?。 1/0, 782 年 6 月 号 

な どの プロ グラ ム に つい て は すべ て サブ に や ら せ て メイ ン 2) SPACE INVADERS”, 1/O, "82 年 4 月 号 


は 音 出 し 専門 と いっ た 時 代 に な り そ う で す . 


EE 還 ーーー ム 己 AGIC プ ログラム ・ リス ト EE 還 還 還 還 還 昌和 
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220 1=21』 1 エニ USRO( 1 ) EXEC&H5OQB: エニ FEEE(Q) : エ F エ = ニ 49THEN エ =19』 エ = ニ USRO( 1 ) BHTH1QOQELSE TFT= 
5OTHENI=19』 GUTU2S4OELSE22O 

23 さ 0 BEEF1:BEEPO:FUR1I=1TH5QQOg NEXT: RETURN 

240 IT=USRO【(1 ) : エニ = ロロ: エニ USRO( 1 ) : エニ 6』 エニ USRO【(T ) : エニ 2 マラ ェ エニ USRO【( 1 ) : エニ 1 : エニ USRO【( 1 ) : エニ 7: エニ USR 
9(1) 

250 1=14: 1T=USRO( エ ) : エニ 101+TNT(RND* 呈 ) : ユ =USRO( T ) : エニ 12』 エー ニ USRO(T) :FHR エ =1TH2QOQOINEXTi T 
=11』 =USRO(1) 

260 EXEC&H5O21:EXEC&H5OO4gEXECSHBOOBIEXECS&HSOOB: EXECS&HBQQOB gs エ =FEEEK(Q) 』 TFT=QOTHENE6 
OELSEIFT=1THEN27OELSEIFT=2THEN ミ 10ELSETFT=3THENS2O 

270 1=1QgT=USRO(T ) 』 BEEF 1 : BEEFQO 

2B0 EXEC&H5O1Ds GHSUE180:EXEC&H5QQBEXECS&HSQOQB EXEC&HGOQOB EXEC&HSQ21 ょ GUSUE1BO:EXE 
C&H5O2 1 : ユエ =FEEK(O) : IF エ = ニ 1 THEN2BOELSE IF エニ =OTHEN エ =10Q ミ : エニ USRO【( 1 ) : BUTH26O 

290 BEEP1』 BEEPOI エモ =101+TNT(RND*) 

さき さ 00 BEEFP 1 』 BEEPOi エ =USRO【( 1 ) : エニ 1 日 : T=USRO( 1 ) : BEEP 1 : BEEFOs GUHTU269 

さ 10 GUHSUB2QI エモ 16』 ユエ =USRO【( エ ) : BMM=SMM-2 3 BHTH ミ さ Q 

さ 20 GUSUB23Q ェ エ =17: エニ USRO( 1 ) : 罰 ニ S 凡 1 

ささ 0_BUSUR デ さ O 

さ 40 1=21:T=USRO( エ ) :EXEC&HSOOB: エ =FEEE(O) : ITF エ = ニ 49THEN エ =19』 エニ USRO( エ ) : BHTH1QQOELSETF エニ 
50OTHEN ユ =24』 GUTUE4OELSE さ 40 


im 


バカ 2 








mim シー ンー ンー ム 、 ご マシ ン 話 . ダ ンプ ・ リス ト EE 


dd +Q +1 +2 + さ +4 +5 コ +6 + フ + 日 +19 +a +B +C +D +E+ ォ F Sum Sum: SE 9 BQ 71 21 aS SF C6 Qa D2 SE 4Q 9B 65 4B FC gzD1 
SOQ00 17 QO 4D 39 C6 Q3 20 25 17 QO さ 2 6 04 B7 FC BO kB1 

SQ1Q B6 FC F9 EZ QQO OO 7F FD Q5 7F FD Q5 39 C6 09 20 :BC 

0O20 OC C6 OE 20 QB C6 QF 20 04 E6 0 ミ 20 QO 17 OO OD :2E Rdd  +O 1 +2 + さ 3 +4 +55 +6 + プ +B 49 + +B +C +D +E +F Sum 
SO3Q F7 FC BQ 7F FD QS 39 7F FD 0Q5 7F FD 05 B6 FD QOS :EZ 10QO _B6 D4 QA さ 35 日 S QQO 10 BE FC 0 30 BD OO _Qa C6 41 :i さ 4 
SO40 2E F5 B6 ヨ O B7 FD Q5 B7 FD 05 B6 FC BO 26 EB 39 si11 110 A6 BO 7 QO 5 26 F9 39 OO QO さ F 59 41 4D 41 55 iDB 
SQSO BE6 FD QS 2B FB 1 5Q 6 BQO BZ7 FD QOS BD 74 7F FD szB4 5120 4 ミ 3 48 49 91 .D3 96 SE 1 QQ 2C 93 SE B1 90 CE CO si29 
5060 05 BE OO QO さ Q 1F 26 FC BE6 FD QOS 2B FE 6 8QO BZ s9F 513O OO 7F DS 8BQ 7F DS BQ 7F D ミ 0 7F D ミ BO B6 D4 Oa iDC 
SQ7O FD Q5 17 QQ 91 7F FD QS・BE QQO QO 3O 1F 26 FC B6 giEO 14Q B6 D さ BQ 27 FB B1 Q1 27 QD B7 D4 Qa BZ D4 Qa B6 gzBE 
SOBO_ FD Q5 2EB FE さ 3 BD QO D2 3O 8D QC 40 BF QQ QQO C6 sz48 5150 D3 1 7 CO 20 DB 7E CO QQO OO 7F D3 8BO 1Q0 CE CF :7 さ 
SQ09Q FF 6 BQO BZ7 FD Q5 EZ FD Q5 a6 COQ B7 FC 1 F7 FC iQ4 16Q FF 7F D ミ さ BQ 7F D さ BQ BE6 D4 QA B6 D さ BO 27 FB B7 si16 
OO _BQ 7F FD QOS 7F FD QS BE6 FD 05S 2B FB B6 8BO B7 FD ki1a 517Q _D4 Qa BE7 D4 QQ さ 31 BD Q7 33 日 1 O1 26 15 B6 OO BE :3C 
SOBQ_Q BZ FD Q5 B6 FC BQ 26 EB 11 B さ QQ QQ 26 D2 6 si4Q 18BO _QF AO AF 21 Q7 2F 8B6 QF a7 24 CC QQO AO ED 25 16 』i45 
SOCO O1 B7 FC BO 7F FD 05 7F FD QS BE OO QQO 3Q 1F 26 :39 190 Q2 ヨ 9 1 O2 10 26 OO C1 86 4E BE OF EE 20 E3 EC i5S 
SQDQ FC 39 1O BE FC BO 3Q BD QQ oOa Ce6 21 ao BoO a7 aO ze 1AQ 29 日 さ さ 1 B2 E1 2F 24 QB CB QS さ E1 2F 10 24 QOQO BC si69 
SOEO 5 26 F9 さ 9 OO OO さ F 59 41 4D 41 55 4 く 48 49 93 sD5 1BO EC 27 ヨミ さ C 52 E1 2F 24 SF EB a8 16 E1 2F 24 52 szE6 
QFO _D さ BF 90 さ 4 0Q ミ 1 5O B7 D4 Qa B6 D4 QB B6 D4 Q9 :4D 1CO CB QS E1 2F 24 6C EE aB 16 E1 2F 25 4B a6 2B 4 :EE 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1DO _O1 26 45 86 Q1 7 2C 6C 2B 17 O6 96 E6 2F C さ さ 1 』19 
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マシ ン 語 ダン プ ・ リ スト 











Add 

300 
310 
320 
5330 
34Q 
535QO 
ささ 6Q 
37O 
538O 
5390 
538O 
53BO 
3CO 
53DO 
3EO 
S3FO 


+ 日 +9 
26 24 
ささ 3 8BD 
oO_AQ 
8Q 0 ミ 3 
C6 11 
E4 34 
7 88 
RF Aa 昌 
Q2 BO 
9C 17 
EC 24 
EO ED 
QF AaQ 
1 3O 
17 Q ミ 
さ 1 CC 


BQ_QQO 
さき 4 
9 FF 
35 40 
54 E6 
さ C さ 
17 0Q さ 
02 16 
QB EF 
4 26 

































26 EQ さ 9 





6 CO 7 Aa4 


89 
Aa4 
4 
B9 
B9 
oO1 
きき 
so 
BD 
E1 
17 
Oo1 
FF 
45 
FF 
C1 








Add 

Sum Sgoo 
16 5B1o 
:56 582o 
:E9 583Q 
5BC 5840 
59 58So 
sCB 69 
: 59 5B7o 
sE2 588Q 
:EF 589o 
:OQO 58Aao 
:BQO 5BBo 
iC 5BCo 
:5O SBDo 
:B6 58Eo 
: 4B 5BFo 














: BE 


s 76 
: BE 
i さ 1 
iCZ 
i3D 
:C6 
9 
:2B 
iDC 
: CD 
: DB 
CA 
s 18 
ZD 
ij3B 
6 全 
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ウー ジー の 補 の る 





マシ ン 語 ダン プ ・ リ スト 





SBEQ 6 さ 20 さ 2 さ D 44 45 4D 4F 2Q0 QQO B1 16 26 17 CC Q1 iDB 
SEFO F4 FD F9 29 FC さ E 8BQ0 BB ミ QQ Q1 日 





CBQO 
5C9QO 
BCAQ 
SCBQO 
SBCCQ 
CDQO 
5CEQ 
SCFQO 


Bums 


Rdd  +OQ 1 + ユミ + オ 4 + ロ +6 + ア + ロ +9 +Q +B + ビ +D +E +F Sum 



















5DQQo 
5D1QO 
5D2Q QQ BQ 
5D さ 9 00 SE 
5D4Q 0C 58 
5DS5QO 
5D6Q 
5D7O 
5D8Q 
DO 
DaQ 
5DBQO 
DCQO 
5DDO 
SDEQ 
5DFO 








アデ セン プチ ルリ スト に つい や 


マシ ン 語 プロ グラ ム で , アセ モン ブル ・ リ スト が 載る こと が 
あり ます . アセ ンプ ブラ を 使っ て いる 人 に は 良い の で す が , ア 
セン ブラ の な い 方 が マシ ン 語 を 入力 する と き に 少々 わか り に 
くい よう な の で 説明 し ます . リス ト 1 の よう な モト ロー ラ 系 
の アセ モン ブル ・ リ スト で は 左 か ら , ソー ス ・ プ ログ ラム 行 番 
号 ,、 プ モリ 番地 , マシ ン 語 オブ プ ジェクト, 分岐 番地 .、 ラベ ル 
オペ コー ド ,。 オペ ラン ド , コメ ント の 順に な っ て いま す . 

ここ で 分 岐 番地 で す が , アモ ンプ ブル を 行ない マシ ン 語 オブ 
ジェ クト に な っ た と き に ブラ ンチ 命令 な ど は 相対 番地 と し て 
アセ ンプ ブル され ます . 相対 番地 だ と ど の メモ リ 番 地 に 分 岐 し 


て いる か が すぐ に は わか ら な い の で 相対 番地 を メモ リ 番 地 に 


し た も の で す . 
ませ ん . 

さて , マシ ン 語 の 入力 方 法 で す が , モニ タ の M コマ ンド で 
行ない ます . リス ト 1 で は 130 行 の 5000 番 地 か ら B6, FD, 05 
と 順に 入力 し ます (リス ト 2, そし て 次 の 行 に 移る わけ で す 
が , ここ で 画面 に 出力 され て いる メモ リ 番 地 と アセ ンプ ブル ・ 
リス ト の メモ リ 番 地 を 比較 し て くだ さい . マシ ン 語 が 正確 に 
入力 され て いれ ば 一 致し ます . た と えば 分 岐 番地 まで も 入力 
し て し まっ た りす る と , この 部 分 が ずれ て し まう の で 誤り の 
チェ ッ ク が で きま す . また 250 行 , 260 桁 の 00A0, 00C9 の よう 
な 必要 な 部 分 を 入力 し て いな く て も 同様 で す . 

次 に 擬似 命令 で す が , FCB, FDB, FCC は それ ら の デー タ 
を その まま 打ち 込ん で くだ さい . RMB に つい て は RMB で 
指定 され た デー タ 領 域 の バイ ト 数 を 00 に し て くだ さい (別に 
00 に する 必要 は な い の で す が ). END に つい て は 入力 する 必 
要 は あり ませ ん . 

と ころ で FM-7/8 を 買 入 され て 問 も な い 方 の 質問 の うち , 


この 部 分 は マシ ン 語 オ プ ジ ェ クト に は 合 ま れ 
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付属 の マニ ュ ア ル を よく 読め ば わか る こと が 多い よう で す . 
FM-7 で は 特に マヤ マニュアル が 良く で き て いて , BASIC に つ 
いて は 無論 BIOS や SUBYSTEM, ハー ド 的 な こと まで る も 載 
っ て いま す . で すか ら , 付属 の マニ ュ ア ル を 熟読 し て くだ さ 
い 。 1 つの 命令 を 1 度 は 自分 自身 で 実行 させ て みて くだ さい . 
( 福 ) 


ーーー ラ ーー ニーーー ーー ニニ ュー ニテ ーー テー リス ト 1 ビー ニニ ーー 








00110 

00120 

0013O 0 LDA 
0014O BNMI 
0015QO DRCC 
Q016O LDA 
0017O0 STA 
0018O BSR 
OO19O CLR 
00200 LDX 
00210 LEAX 
00220 BNE 
0023O MAIT1 LDA 
00240 5O18 BNMI 
0025O BD OOAaD LERU 
00260 BD QOC5 LEAX 
00270 2000 STX 
002 ヨ 0 FF LDB 昔 和 ま FF 
Oo29O BoO LDA 韻 串 日 ひ 
00300 FDO5 STA HLT 
00310 FDO5 STA HLT 
00 ミ 20 QOBC RMB 188 
00 さ 30O 5000 END START 


MaIT1 
PAT3。PCR 
END。PCR 
2000 





ーー ーー ーー ニュ ーー テーーー ゴ リスト 2 ーー テー ニー ニー ニュ ーー 





*M5OQOQ 

5O0O OO-B6 
5OO1 OO-FD 
5OO2 OO0-05 
5QQO さ QO-2B 
5004 00-FB 
5005 O0-1 
5006 OO-S5O 
5O07 OO-6 























MS 証 回 戸 民 ⑨ 避 09 の 当 
2 AA/D ジ 2 ぐ 有 = 多 :cccsccsceceeecceeeceeeccoeco 
(ENc29 WIPp 多 喧 ば の 抽 介 eooocooocceooocccooc 229| 眉 
EMB 間 リン 2 クレ クン (/ 表 キ ミ ー ジ < ペキン 議 
Ma 語り ON iu 側 


po の maF238 


Yuu ンジ im 0 


















































本 誌 で バ F-BASIC EXPANDER” を 発表 し , FM- 8 を 
ソフ ト 面 か ら パ ワー アッ プ し まし た が , 今回 は ハー ド 面 か 
ら の パワ ー ア ッ プ と いう こと で 高速 CDP り ユ ニッ ト を 製作 


し て み ま し た . 


FM-8 の メイ ン CPU は クロ ッ ク 1.2288MHz で 作動 し て 
いる こと は 皆さん も ご 承知 の こと と 思い ます が , 今回 の ハ 
ー ド ウェ ア は それ を 1.75MHz まで 引き 上 げ る こと に よっ て 
演算 速度 の 向上 を 図 ろ うと いう も の で す . 

た だ この 場合 , 単に に PU の クロ ッ ク を 速 くす る だ け な 
ら 簡 単 な の で す が , FM-8 の メイ ン CPU ク ロッ ク (4.915 
MHZ2OD ジ ジー の バ VC グイ に アミ 。 ビー ツン NZ で 2 の 0 
RAM の リフ レッ シュ , RS-232C 用 クロ ッ ク な ど に 使っ 
て お り , 安易 に 変更 する こと が で きま せん . 

そこ で 。 今回 CPU の クロ ッ ク を 変更 する に あたっ て の 
基 本 的 な 考え と し て , 

⑯ い まま で セー ブ し た テー プ を その まま ロー ド で きる . 

@ タ イマ 、 1/0 関 係 の クロ ッ ク は 変更 し な い . 

@ 本 体 の 改造 は 最小 限 と する (パタ ー ン ・ カ ッ ト な ど は 

し な い ). 

以上 を 満足 させ る も の と し て 1I/0 関 係 に は 従来 どおり 4. 
9152MHz の クロ ッ ク を 供給 し , CPU に は カモ セット 関係 の 
プロ グラ ム が 動作 し て いる と き に は (MOTOR ON の 状態 ) 
4.9152MHz, その 他 の と き に は 7MHz を 供給 する よう に し 
まだ 、 

ここ で , な ぜ 高 速 時 CPU に 68B09 の 最高 クロ ッ ク で あ 
る 8MHz を 供給 し な い の か と 不思議 に 思わ れる 方 も いる と 
思い ます が , これ は FM-8 に 実装 ほれ て いる TI/0 デ バイ ス 
や ROM, RAM な どの タイ ミン グ を 考え て の こと で す . 
た と えば CPU に 8MHz を 加え だ た だとすると, バス ・ ド ライ 
バ や 種々 の タイ ミン グ 回 路 の ディ レイ を 考え る と ROM に 
対す る アク セス ・ タ イム は 300ns 以 下 、DRAM に 対し て は 
230ns 程 度 と な り ま す . 

DRAM は 200ns の も の が 実装 ほれ て いる の で 充分 で す が , 
ROM は 300ns の も の が 実装 ほれ て お り (MASK-ROM 版 は 
250ns) タ イミ ング 的 に 余裕 が あり ませ ん . また , ブー ト R 
OM の 2716 は 正確 な アク セス ・ タ イム は 不明 で す が (350 ま 
だ た は 450ns と 思わ れる ), 一 般 的 に 2764 タ イプ より 低速 な の 
で さら に 注意 が 必要 で す . 最悪 の 場合 は 2716 の 高速 タイ プ 
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た 7- メイ ン ビ ロリ の 高 存 大 



















































































に 焼き な お す 必 要 が あり ます . その 場合 2716 の 高速 タイ プ 
より 2732 の 高速 タイ プ の 方 が 入手 し 易い し , ほぼ ピン ・ コ 
ン パ チ ブ ル な の で 2732 に 焼い た 方 が 良い か も し れ ま せん . 
以上 の よう な こと や 水晶 発振 子 の 入手 性 か ら 考 えて 7 M 
上 2 まし だ た 。 

また , CPU に 8MHz を 加え て ROM ア クセ ス 時 の み 1 ク 
ロッ ク 分 WAIT を か ける 方 法 も あり ます が , この 場合 . 部 
品数 も 多く な る し プロ グラ ム 実 行 中 に ROM を アク セス す 
る 相対 時 間 と いう の は 結構 多く , 7MHz 動 作 で WAIT な し 
の 場合 より も 遅く な っ て し まい ます . 

それ か ら ⑳ に つい て で す が , 結論 か ら 言 っ て パタ ー ン ・ 
カッ ト な ど は まっ た く 必 要 な く , 改造 も メイ ン CPU を ソ 
ケッ ト か ら は ず し て 奉 わ り に 本 機 か ら の フラ ッ ト ・ ケ ー ブ 
ル の プラ グ を 差す だ け で O K で す . で すか らい つ で も 元 の 
状態 に 戻す こと が で きま す . 


クロ ッ ク の 切り 損 え 


今回 一 番頭 を 悩ま せ た 部 分 で , 基本 的 に カセ モッ ト の 互換 
性 を 考 虚 し て カセ モッ ト の リモ ー ト の 状態 (I/O ポ ー ト $FD 
00 の ビッ ト 1 の 状態 ) に よっ て 切り 換え を る こと に し まし た . 
つま り . モー タ ON の 状態 (ニカ セット 関係 の プロ グラ ム 
が 動い て いる ) の と き は 通常 速度 に 、OFF の 状態 で は 高 
速 に 切り 換え ます . これ は , ソフ ト 的 に も MOTOR コ マ 
ンド に より 人 簡単 に 切り 換え られ て 便利 で す . 

これ で 切り 換え の 方 法 は 良い と し て , つぎ は 切り 換え の 


図 1 HERO-09 回 路 図 


0 








820Q 


Mt 


X'tal 7MHz 


I 


5 


0.01Z Oo4 


O4 


4.9152MHz 









CPU み 


13 11.9 
) % リノ 


に 】 


3 
12 


1 


8 
2 


10 
】 
9 


13 11 
3 

本 
12 

O8 
60-120ns 


2 





/1/1/1 II/I/I/I/I/ 


Gi 
菩 
の 
に 】 
ら 
に 3 
中 
O 
L 
I 
ヨ 


2 で の 9 9 6 の OO の の OO 〇 の OO Q⑩0 6@6' 〇 の O 〇 GO 


8 


由 
WW 人 


ディ レイ 





FM-8 の CPU ソケット へ 


G8BOS 








211 


2 ピン セッ ト の 改造 方 法 


表 1 ベン チ ・ マ ー ク ・ テ スト 結果 (単位 : 秒 ) 














タイ ミン グ で す . 単純 に $FD00 番 地 の ビ ッ ト 1 の 内 容 に 
よっ て 切り 換え て いた の で は 4.9152MHz と 7MHz は 周波 数 
比 , 位相 と も まっ た く 関 係 な せな い ので , CPU に 変 な パル ス 
が 加わ っ て 誤動作 し か ね ませ ん . 
そこ で , 私 は 次 の よう に し まし た . 始め に $FD00 の ビ 
ッ ト 1 が 変化 する と , 
現在 CPU に 供給 し て いる クロ ッ ク が HH レベ ル に 立ち 上 
が っ た 明 間 に H レ ベル の まま に ホー ルド する . 
@ ク ロッ ク を 切り 換え る . 
りり 換 わ っ た クロ ッ ク が 立ち 上 が っ た 明 間 に ホー ルド を 
解除 し . 新しい クロ ッ ク を CPU に 供給 する . 
以上 の よう な ロジ ッ ク を フリ ッ プ ・ フ ロッ プ を 使っ て 実 
現し まし た だ た. つま り , 位相 が 合う まで クロ ッ ク の スト レッ 
チ を 行なう わけ で す . こ れ に よっ て 確実 に 切り 換え る こと が 
で きま す . 


回 路 に つい て 





回 路 図 を 図 1 に 示し ます . 

前 項 の 問題 を 解決 する た め に TTL-IC11 個 と 多少 多く な 
っ て いま す が , 仕方 あり ませ ん . CR に よる タイ ミン グ 回 
路 を 用 いれ ば も っ と 簡単 に で きる の で す が , 個人 的 に 好き 
で は ほ は ない ので この よう : に し まし だ 、 

また 回 路 図 に は 各 IC の 電源 ピン の 配線 や パス コン な ど 
は 書い て あり ませ ん が , 1IC2 個 に 1 個 ぐ らい の 割り 合い 
で , 0.01 一 0.1/F 程 度 の コン デン サ を Vcc と GND 間 に 入 れ 
て くだ さい . その 他 は べつ に 変わ っ た 点 も な い の で , だ い 
じょう ぶ だ ど 思 いま す 。 





代 と CPU 

7MHz の クロ ッ ク を 与え る の で B バ ー ジ ョ ン (68B09) で 
な けれ ば な り ま せん が , F M-8 に 実装 ほれ て いる 68A09 を 
用 いて も 充分 動作 し ます . 68A09 で うま く 動 作 し な か っ た 
場合 や 心配 な 人 は 68B09 を 買っ て くだ さい . それ 以外 は F 
M -8 に 実装 きれ て いる 68A09 を 用 いれ ば ,\3.000 ぐ らい の 
コス ト ダ ウン です? 
@TTL 

すべ て 74L S タイ プ を 使い まし た . 
借 X tal (7MHz) 

CPU な ど を 扱っ て いる お 店 に 行け ば 簡単 に 手 に 入り ま 
9 
借 プ リン ト 基 板 0 

私 は サン ハヤ ト の ICB-93S と いう の を 使い まし た が , も 
う 少 し 大 きめ の 方 が 配線 し 易い と 思い ます . 
@ ソ ケッ ト , フラ ッ ト ・ ケ ケー ブル 

6809 の ソケット に 差し 込む プラ グ は 山 一 の FCP-40-03 早 
2 に フラ ッ ト ・ ケ ー ブ ル を 圧着 し (100mm 程 度 。 実装 する 場所 
に より 加減 する ), 反対 側 は プリ ント 基板 に 半田 付け する 場 
合 FGP-40-02 半 1 を 圧着 し ます . この と き 1 ピン の 位置 と 
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FM-8 FM-8 | PC- | Pc- 上 MZ-80C | MZ-80C(4MHz) 
(7MHz】 8001 | 8801 | 2000 | Hu-BASIC| HuBASIC 
プロ グラ ム 1| 10 本 18 | 5 1 5 
2| 6 44|| 11 | 一 12 6 
3| 14 | 9 | 23 | 10 38 19 
4| 9 6 宮 Z10 に | に UNR6 ぽ 9 4 
合 計 | 39 | 25.| 50 | 63 | 一 70 84 




















ベン チマ ー ク ・ テ スト 





テス ト ・ プ ログ ラム 1 


PT 玉 $ ま ー "OnGO:iQOO EQOQ" 
FOR 1I=1 TO 10000 
NE ズ XX 

PRINT TIME$ 

END 





ROD 
ロロ OOG 








iR の ON ロ 
の 〇 り 〇 OO 
回 中 選 器 ロ 
性急 回 〇 ロ 
ロロ R 内 選 

選 ロ 蜂 








の の 必 ONONF 
6B:@*⑤G:@ 
四 加 弓 可 回 
乙 兄 加 1 〇 On 
け ロ 史 Q 外 器 





テス ト ・ プ ログ ラム 4 
中 * あ “OiOELS 還 





回 前 人 主 


1 ロ 
m ロ の 宮 


コロ ※ 
9 


華 :NN 


の ゆ の ロ 下 OF 
の ロロ 己 G 避 
回 ロロ ロロ 
乙 四 回 
ヨロ 
ヨウ ロロ 
m ロ | 
に 
回 
分 ロロ 


ロロ 

















ケー ブル ・ マ ー ク の 位置 を 合わ せる こと . 

半田 付け せ ず 着脱 し た い 場 合 は , ソケット ・ タ イプ 
FAS-40-17 を 圧着 し ます . この と きも FCP の 1P 側 が ソ 
ケッ ト の へ 印 へ くる よう に 注意 し まし ょ う . 本 機 側 に は へ 
ッ ダ ー タ イプ で FAP-40-07#2 を 取り 付け ます . 

圧着 し た 状態 で 購入 し た いと き は 次 の よう に 指定 する と 
山 一 電機 。 また は 秋葉 原 の 代 理 店 あたり で 買え ます . 





FCB- 40- 02 寺 2.FGP-40-02 キ 1 TYPE-1 し =100( ま た は 必要 な 
長 さ を mm 単位 で ) また は FCP-40-03 キ 2, FAS-40-17 TYPE-1 
Lー100 お よび FAP-40-072 


3 作 


私 は いつ も つぎ の よう な 順番 で し ます . 

介 各 部 品 の 配置 を 決め る . 
@1C を 半田 付け する . 

本 来 な ら ば 半導体 は 最後 に すべ き な の で し ょ う が , 先 に 
半田 付け し ます . 半田 付け に 自信 の な い 人 は , ソケット を 
使い まし ょ う . 

9 電源 ライ ン を 配線 する . 
0.6 一 1.0mm 程 度 の スズ メッ キ 線 を 使い ます . ルー プ を 作 











ら な いよ うに 注意 し ます . 
⑳⑯[ C 問 の 配線 を する . 

IC 間 の 配線 に は ラッ ピン グ 用 の ワイ ヤ が 一 番 で す . 
コン デン サ , 抵抗 を 半田 付け する . 

2 マ スコ ン の 配線 を 忘れ な いよ うに . 


コー ヒー 
ぐう プレ イク 


2 EE 
の 辺 で コー ヒー で も 飲ん で 心 を 落ち つけ 誤 配線 が な いか ど 
う が 売 分 チエ マッ ンジ じ ま ! 和 5EW7 

それ か ら , 本 機 に HERO-09 (ヒー ロー ゼロ ナイ ン ) と 名 
付け まし た . 深い 意味 は まっ た く あ り ま せん が , 皆さん も 
そう 呼ん で くだ さい . 間違っ て も へ ヘ へ ロ ー な ん て 読ま ほな いで 
くだ さい ョ ノ 





本 体 へ の 実装 





メイ ン CPU は 電源 ユニ ッ ト の 下 に ある の で , 電源 ユニ 
ッ ト を 取り は ず さ な けれ ば な り ま せん . つぎ に メイ ン CP 
U を 取り は ず し ます が , この と き ピ ン セ ッ ト を 改造 し て 図 
2 の よう な 治 具 を 作っ て お く と 便利 で す . CPU を 抜い た 
ら 本 機 か ら の プラ グ を 半 し ます . 

さき さて, 本体 自身 を どこ に 納め る か で す が , 有 Z80 カ ー ド を 


図 の 変更 は HERO-09 で DISK や 外部 I/O を 使う た め の 
も の で す . 原理 的 に は $FC00 一 $FFOF 番 地 ま で MRDY 
を か け よ うと いう も の で す ( カ モット は だ めか も ?). 

に : 和 / 財 1 の CPU ぁ を サブ CPU の 38 番 ピン (38 番 ビン 


0 


実装 し て いな い 場 合 は その 辺り に 固定 すれ ば 良い と 


思い ま 
す . 私 は 拡張 バス 用 コネ クタ の 容 か ら 外 部 に 引き 出し , C 


PU に 外 で 涼 ん で も ら っ て いま す . 


いた = ルン ん エ レレ 4 に 


CPU の クロ ッ ク を 1.2288MHz か ら 1.75MHz に し た こと 
で 実行 速度 が 約 1.4 倍 に な る は ず で す が , 実際 に プロ グラ ム 
を 走ら せ て 調べ て み ま し た . 

千 果 は 表 1 の と お り で , 他社 の マイ コン と 単純 に 比較 す 
る わけ に は いき ませ ん が , その 高速 性 が 解る と 思い ます . 


あと が き 


皆さん どう で すか ? 作り た く な っ た で し ょ う / み 私 は 
プ ブート ROM を 2732 に 替え て , 2MHz ク ロッ ク で 動作 させ 
て いま す . 

FM-8 を お 持ち の 方 は 早速 製作 し て くだ さい . お 持ち で 
な い 方 は いま すぐ FM-8 を お 店 に 買い に 行か な いと HE 
RO を 製作 し て も 無 意 味 で す ョ ./ (ナン の こっ ちゃ ? ). 
品 参 考 資 料 。 文献 
1) PSG カ ー ド の 製作 : 1/0, "82 年 8 月 号 
2) FM-8 回 路 図 : FM-8 活 用 研究 
3 ) FM-8BIOS ソ ー ス ・ リ スト : FM-8 活 用 研究 








は ソケット に 入ら な いよ うに し て お きま す ) に 接続 すれ 
ば , メイ ン ,。 サブ プ と も に ノー マル , 倍速 が 可能 で す . こ 
の と き , キャ ラジ ェ ネ の 18 番 ピン を ソケット に 入ら な い 
よう に し て 12 番 ピン に 接続 し ます . 
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FM-8 で BEEP 音 し か で な い の は さび し いか ぎり で すね . 
そこ で , FM-8 用 に PSG カ ー ド を 作っ て み ま し た -. 





図 1 の プロ ッ ク 図 を 見 て くだ さい . アド レス , EB, RWB 
を 使っ て デー タ ・ バ ス 。 ラッ チ な ど を コン トロ ー ル し て 
SG を コン トロ ー ル し ます . コン トロ ー ル は 表 2 を 参照 し 
て くだ さい . 全 回 路 図 は 図 2 で す . 


スピ ー カ ー か ら ひ どく 雑音 が 出る と き は PSG の rcc と 
GND の 間 に 直 接 (Vcc 側 の 足 を 短 か く ) 0.1zF く らい の 
周波 数 特性 の 良い コン デン サ を 入れ て みて くだ さい . 
特に 注意 する こと は 電 涼 ピン で す .。 PSG を は ず し た 状 
尋 で ショ ー ト し て いな いか どう か 調べ て くだ さい ( 小 抵抗 
測定 レン ジ で ). 
LM386 の 6 番 ピ ン の と ころ の コン デン サ は な る べく IC 
の そば に 付け て くだ さい . あま り 上 離れ る と ノイ ズ が ひど く 
図 1 












な り ま す . 

抵抗 , コン デン サ を 付け る と き に アー ス 側 。 電源 側 は 多 
少 長 く な っ て も か まい ませ ん が , 信号 線 側 を 短 か く し て く 
だ さい . 

FM-8 を 壊さ ない た め に , 良く 配線 の チェ ッ ク を し て く 
だ さい . ボー ド を FM に 付け て スイ ッ チ を 入れ て 禁 走 し た 
場合 , 急い で スイ ッ チ を 切っ て も う 一 度 確認 し て くだ さい . 
特に アド レス , デー タ , 74LS244,。 74LS374 で す . 

PSG の テス ト ・ プ ログ ラム を リス ト 2 に 示し ます . こ 


の プロ グラ ム で P SG の 各 レ ジス タ の 内 容 を 自由 に 書き 換 


える こと が で きま す . 試し に R0 ニ AE、R1 三 0, R7 王 FE, R8 
= デーF ド と いう デー タ を 書き 込ん を で みて くだ さい . 


ブロック 図 





CLOCK 


RESET 


アド レス ・ セ レク ト 


アド レス 


EB 


AB1 
AB0 
RWB 









デー タ ・ バ ッ フ ァ & ラ ッ チ 
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図 3 


基 板 寸法 








140:6 』 








図 4 PSG プ ロッ ク ・ ダ イヤ グラ ム 































































































表 1 
FE 74LS02 『 
74LS30 1 
74LS74 中 
74LS136 2 
74LS138 1 
74LS244 1 
74LS374 1 
1C AY-3-8910 1 
LM386N 1 
抵抗 100 1 
1k02 1 
3.3k〉 6 
半 固 定 的 抗 | 5kQ 1 
コシ デン サザ 0.01z50V 1 
0.047z50V 1 
0.135V 1 
2.2/35V 1 
3.310V 2 
100/ 25V 4 
IC ソ ケッ ト | sa E ン 国 
14 ビ ピン 5 
20 ビ ピン 2 
40 ビ ピン 1 
コネ クタ 2P 1 
(日 本 モレ ックス ) 
20P 2 
(日 本 航空 電子 また は 相当 品 ) 
表 3 レジ スタ Risa と エン ベロ ー プ ・ パ ター ン 
レジ スタ Rii の エン ベロ ー プ ・ パ ター ン 
下位 4 ビット ( 縦 軸 は 音量 , 横 軸 は 時 間 ) 
0 |0 | 一 | 一 Ke で 
0 | 1 | 一 | 一 
=0Wk。0::0 bb 
f 0 ドド 0 は 
束 相 苗 屋 by ク の 、 ク トク の 
0 ーー。 レク ク 多 多 多 
1 0 し 0 4444442 ル 
fi ド WT】 アン ンク ググ ググ 
較 遼 ーー アク アク シク ンマ タンク: 
開 悦 吊 隊 贈 怖 影 











つ | 


ュー 
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ユ 
表 2 BDIR、BD1、BD2 の コン トロ ー ル 
BD2 |BDIR| BD1 | 備 。 考 
1 0 | 0 | イン アク ティ ブ 
1 0 に 1 リー ド from PSG 
1 1 | 0 | ライ ト fromPSG 
1 9a」" 1 ラッ チ ・ ア ドレ ス 














これ で 440Hz の 音 が で れ ば 完成 で す : 指定 の 音 . また は まっ た 
く 音 が で な いと き は アド レス , 74LS138, 74LS74 の 辺り 
を 調べ て くだ さい (VR の 位置 は まん 中 くら い ). ボッ 。 ポ 
ッ 。 ポッ と いう よう な 音 の と き は コン デン サ の 極性 を 調べ 
ます . 

スイ ッ チ を 入れ る と 音 が 出 っ 放 し の と き は , 74L S02 か 
ら PSG ま で と 74LS74 の 辺り を 調べ ます . 

PSG の レジ スタ に 書き 込み が で き な い と き は 74LS74., 
74LS02, 74LS138 の 辺り を 調べ ます . 


&O 


図 5 PSG の レジ スタ 














き 





音階 は 12 ビ ッ ト の デー タ で 


デー タ 表現 する . 
SOUND_DATA を 参照. 


ノイ ズ の 平均 周波 数 を 指定 
する . 


各 チ ャ ン ネ ル か ら 出 す 音 源 
や ,|/O ボ ポー ト を 指定 する . 
















下位 8 ビッ ト ・ 
| 上 位 4 ビ ッ ト ・ デ 
下位 8 ピッ ト ・ デ ー タ 
| 上 位 4 ビ ピット ・ デ ー タ 
下位 8 ビ ピット ・ デ ー タ 
上 位 4 ビット ・ テ 
5 ピッ ト ・ デ ー タ 





チャ ン ネ ル A の 音階 











チャ ン ネ ル B の 音階 






















チャ ン ネ ル C の 音階 















+ 一 


Ra ノイ ズ 周 波数 
R: 入出 力 の 選 所 トー 科 半 rd c 
Rs | チャ ン ネ ル A の 音量 
チャ ン ネ ル 晶 の 音量 
チャ ン ネ ル C の 音量 





























M= ニ 0 の と き 
下位 4 ビッ ト が 音量 調節 
M= 1 の と き 

エン ベロ ー プ 作動 


























下位 8 ビッ ト ・ デ ー タ 
上 信 8 ピッ ト ・ 








エン ベロ ー プ 周期 





エン ベロ ー プ 波形 
ポー ト A レ ジス タ 
ボ ポート 日 レジ スタ 









8 ビット ・ デ ー タ 
8 ビ ピット ・ デ ー タ 
























の 府 に 半 こ そえ ます . 実際 に は , P SG で ピン ク グ ュ ジイ を 
1 し い の で す が ,。 低 周 波数 の トー ン と ミッ クス し 
て や る こと で ,。 な ん と か 人 解決 で きる と 思い ます . 

R?7 は PSG の モー ド 設 定 を 行なう レジ スタ で す . 対応 す 
る 各 ビ ピッ ト を 0 (ゼロ ) に する こと に より , モー ド を 設定 
し ます . で すか ら ジ ェ ネ レー タ の A を , トー ン と ノイ ズ の 





PSG (Programmable Sound Generator) に は AY- 
3-8910 の 他 に も , TI の 76477 や 76489 と いっ た よう な 人 石 が あ 
り ま す . その 中 で も AY-3-8910 は ポピュラー な も の で , 本 ミッ クス 出力 に セ モット し た けれ ば , $F6 を この レジ スタ 
誌 で も 何 度 か 取り 上 げ ば られ て いる 他 . い ろ い ろ な パソ コン こ 書 ほ き 込め ば よい わけ で す . 


の SADh 若 最 9 抽 知る る る た め の も の で す . 下位 4 ビ 
ッ ト が 有効 で 。 最大 音量 に セッ ト す る に は $ 0F を 書き 込む 
こと に な り ま す . た だ し , 講和 : 
する と エン ベロ ー フ が イネ ー プ ブル に な り , 音 時 の 指定 は 無 
視 さ れ ま す . この 場合 。 音 景 の コン 3 


に 内 蔵 き れ て いま す . 

この 右 は ,。 3 つの トー ン ・ ジ ェ ネ レー タ 。 ノ イズ ・ ジ ェ 
ネ レ ー タ , エン ベロ ー プ ・ ジ ェ ネ レー タ な ど を 内 蔵 し て い 
て , シン セ サ イ ザ と し て の 機能 (と いっ て も 簡単 な も の で 
す が ) を - 通り 備え を て いま す . 読者 の 中 に も 良く ご 存 知 の 


人 が いる と 思い ます が ,。 初め て の 人 も 多い は ず な の で ここ 
で 簡単 な 機能 の 紹介 を し て お きま し ょ う 

AY-3-8910 に は , 図 5 に 示さ れ て いる 3 な 16 個 の レジ 

く タ が あり ます . その うち の Ri と Ris は 8 ビッ ト の パラ レ 

・ ポ ー ト な の で , 音声 出力 と は 直接 関係 は あり ませ ん . 
0 の. の は 残 り の Ro か ら Ris ま で で す . 

Ro。 か ら Rs は , 3 つの トー ン ・ ジ ェ ネ レー タ の 発振 周波 数 を 
決定 し ます . Ro と Ri, Rz と Rs3、 R』 と Rs を それ ぞ れ 組 に し 
て 使用 し . その うち の 下位 12 ビ ッ ト の 値 が 有効 で す . 実際 
の 発振 周波 数 は 次 の よう に し て 計算 で きま す . 





デ プ ・ ジ ェ ネ レー タ に 任 き れる こと に な り ます. 

Rii か ら Ris は この エン ベロ ー プ の コン トロ ー ル を 行なう 

ジス タ で す . エン ベロ ー プ の 形状 は 表 3 に ある 中 か ら 選 
択 で きま す . 選択 し た 波形 の コー ド を Ris に 書き 込め ば , そ 
の 波形 が モッ ト さ れ 困 時 に それ が エン ベロ ー プ の トリ ガ が 
と な り ま す . エン ベロ ー プ の 長き は ,。 エン ベロ ー プ 周波 数 
と し て Rii と Riz で 指定 し ます . この 周波 数 と 波形 を いろ い 
ろ 変 た る と トレ モロ が か か っ た よう な 立 や .。 ピアノ の よう 
な 立ち 上 が り の 鋭い 音 を 作る こと が で きま す . エン ベロ ー 
プ 周 波数 は 次 式 で 与え られ ます . 








fock 
16XD 
ここ で D は , 書き 込む べき デー タ , fc> は PSG に 与え る クロ ッ ク . 


す 





FM-8 で は た ec の 値 は 1.2288MHz で すか ら 、 楽器 の チュ 
ー ニ ング な ど に 使わ れる ラ の 音 (440Hz) を 出し た い の な 
ら ば , $00AE を レジ スタ に 書き 込め ば よ あな か 

Res は ノイ ズ の 平均 周波 数 を 決定 する レジ スタ で , 下位 5 
ビッ ト の み が 有 有効 で す . 周波 数 は トー ン の と き と 同 様 に し 
て , 次 の 式 で 求め られ ます 





了 fc/oc ん 


f 三 6xp 








2 を 高く 設定 し て や る ホワ イト ・ ノ イズ の 
よう の 0 5 ジー』 と いっ た 感じ の 音 に な り 。 低 ぐ 設 定 し た 
具合 に は ビシ ジ シグ ク ュ ブフ イダ の ば まう な ゴー』 と いる た 感じ 


ナー freck 
256XD 





表 8 の 下 に ある の 大 きき さ は この の 値 か ら , 











(」 
の f 





で 求め る こと が で きま す 。 

AY-3-8910 に は , エン ベロ ー プ ・ ジ ェ ネ レー タ が 1 つ し 
か あり ませ ん . で すか ら , 3 声 の 音楽 演奏 を する 場合 に も 
エン ベロ ー プ は その うち の - - 声 に し か か けら れ ま せん . む 
し ろ , この エン ベロ ー プ は 波 の 音 や 爆発 音 な どの よう な 擬 
音 を 作り たい 場合 な ど に 効果 が ある よう で す . 
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P SG の 各 レ ジス タ は ,。 CPU に よっ て 直接 アク モス す 


の と 2 人 の きま ん (そこで, FM-8 の 0 デリ 上 に ラマ 
ジー ピグ 多 グ と ゲー アル ィ ャ レジ スタ か うう うつ の レビ ジス み 
を 設け で 。 そこ を 企 じ て PSG の 各 レ ジ ズ タ の チク モス を 
待 な うと に し ます . 今回 の P SG カー ド は ラマ ンド "レレ 
ジス タ に $FDOD を , デー タ ・ レ ジス タ に $FDOE を 割り 
MC: で 7 し 39 あ 5 


1) レジ スタ の 選択 


PSG の 各 レ ジス タ か ら デ ー タ を 読ん だ り , また 書き 込 
ん だ りす る に は 前 も っ て アク セス する レジ スタ の 指定 を し 
て お か な けれ ば な り ま せん . その た め に は , 以下 の よう な 
手続 を し ます . 


デー タ ・ レ ジス タ に アク セス し た い P SG の レジ スタ 番 


コマ ンド ・ レ ジス タ に イン アク ティ ブ ・ コ ー ド ($00) 


を 書き 込む . 


2) レジ スタ へ の 書き 込み 


PSG の 各 レ ジス タ に デー タ を 書 
に 先 の 例 の よう に し て , 書き 込む レ 
て は な り ま せん . 
⑩ デ ー タ ・ レ ジス タ に PSG に 送る デー タ を 書き 込む . 
コマ ンド ・ レ ジス タ に ライ ト デ ー タ ・ コ ー ド ($02) を 


き 込 み ま す が , その 前 
ジス タ の 指定 を し な く 








書 き 込 む .。 
コマ ンド ・ レ ジス タ に イン アク ティ ブ ・ コ ー ド を 書き 込 
む 


3) レジ スタ か ら の 読み 出し 
まず レジ スタ の 指定 を 行なっ て か ら , 次 の よう に し ます . 
⑩⑯ コ ヨコ マンド ・ レ ジス タ に リー ド デ ー タ ・ コ ー ド ($01) を 
書き 込む . 
@ デ ー タ ・ レ ジス タ か ら デ ー タ を 読み 取る . 























な を 書き 込む . イン アク ティ ブ に する 。. 
コマ ンド ・ レ ジス タ に ラッ チア ドレ ス ・ コ ー ド ($03) 以上 の よう に し て PSG へ の アク セス を 行ない ます . 
を 書き 込む . 実際 の 例 と し て , リス ト 1 を 参考 に し て くだ さい . 

スト | 

PABE OO1 ( 

1000O ※ 

1Q01Q ※ PrOdram PSG_ READ-MRITE RUUTINE 

10020 ※ at 22ーJUN-2 

1003Q0 1 

10040 。 OQ000 2O0 Q4 OOO6 MRTENT ERA MRTPSG 

1Q05Q  QQOQO2 20 19 QQO1D REDENT ERA REDPSG 

1006O *※ 

10070  QQOO4 FDQD FSBADR FDE $FDOD PSG addres5 

1008O * 

1Q09O ※ ubrOutin 呈 MRITE TO FPSG 

1010O * at 1 -FEB-B2 

1011Q * Parameter 1 ュ is 

10120 ネ 谷 : ニ く re ロ 15 ら 上 gr_ ら 呈 1 エモ ion 』 0O。.15 > 

101 さ 3Q も 1 B :=< data 』i 0O。。255 > 

10140 * 1 1] r@ ロ 1 ほら 上 [5 ar 握 『 己 己 ビ ツ @ ロ 

1Q15O * 

10160 OOO6 MRTPSG EQU * 

1017Q ネ 

1018B0O  QQO06 34 13 PSHS 内 。X 

10190  QQQ ヨ EE BC F9 LDX PSBADR , PCR 

10200 Q1 STA 1.X 

10210 OOOD Q さ LDA よ 所 1 て a モ ch addres5 

10220 。 OQOF AZ B4 STA ュ X 

10230 。 QO11 6F 4 CLR ュ X 1naCt ュ iv 

10240 OO1 ミ 3 EZ Q1 STB 1.X 

1Q25O  QQO15 6 Q2 LDA アコ write da キモ a 

10260  QO17 aZ 4 STAa sX 

10270 。 QQ19 6F 4 CLR ュ X 1naCti ve 

102BO  QQ1B 3③5 呈 誠 FULS 人 X』。F ビ 

1029O * 

10300 * ubrOutin REaAD FROIM FPSG 

1031O0 も 1 date 1-FEBー2 

10320 ※ DaF&m モ Fr 115 モ 

103 さ 0 ト ( 介 : ニ で Feg1i5ter_ 551ection 』 0O。.15 

10 さ 40 し 3 return Ya1u 

1035O ネ B s= ニ < data si O。.255 > 

10 さ 60 ネ 人 X。Y 。U re@ ロ 1 モビ 呈 ar 巳 [ 己 ビ V ロ 

1037Q ※ 

10 さ 3BO OO1D REDFSG EQU ※ 

10390 * 

10400 。 OO1D さ 34 1 PSHS 仙 。X 

10410  QO1F PE BC E2 LDX PSGADR 。 PCR 

10420 。 OO022 7Z O1 STA 1.X 

104 OO24 6 Q3 LDA は 1 a モ ch addre55 

10440 OO026 介 フ B4 STA sX 

1045O  QQO2B 6F 84 CLR ュ X 1n ロ a ヒ t ュ vV 

10460 OO2Aa 日 6 Q1 LDa 第 1 ra ata 

10470 。 QQO2C 7 84 STa sX 

104BO  QO2E E6 Q1 LDB 1.。 X 

10490  QQ3QO 6F 84 CLR sX 1n ロ act ュ ve 

105QOO OO32 さら 5 92 FULS 人 。X。F ビ 
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,O 




















リズ スト 1 
1051O END 
TUTAL ERRDRS QOOOQー 一 OOQOO 
TOTaL MARNINBS OOQOQQー ニ ーーQOOQO 
FRUGRAM BEGBIN ADDR=QOQOQO 
FRUBRAM END QADDR=OO さ ミ 
FRDGRAM ENTRY DDR ニ ネネ *※ 
ーーーーー ニ ーー ! 
トト フー ウロ ら デスト ・ プロ グラ ノ 、 EE 
10000  "!※ | 
10100 !※ proqgram  FSG(Yー ミ ー8910) CHNTROL 
10200 7※ da キモ ワー 人 LUG-B2 
10 さ 00O 「※ 
10400 CLEAR さ 00。%H5FFF 
105OO_DEFTINT 人 7Z:DEF USRQ=SH6QOOO: DEF USR1=%zH6OQ02 
10600 !※ 
10700 RESTORE 
108OO_ FUR DR !=%&H6OOO TH &H603 人 RERD 人 ま sFUHEE DR! VaL ("2H" 二 全 生 ) 
1Q090OQ_NEXT 
11000 "※ 
11100 MIDTH 0.25 COLOR 4 
11200 MHTILE -1 
11 さ OO _ FUR 1=QO TO 12 STEF 4zPRINT 
11400 FUR =1 TU ユエ ユ + ミ : D= ニ USR 1 ( ゴ ※2 呈 6 ) 
1150O FRINT "R 一 "sgPRINT USING " 拉 韻 拓 " ョ ロロ s 
11600Q PRTINT " 』 "+RTBHT 生 ("O"+HEX 和 も (D) 。2)+" MM) 
11700 _ NEXTINEXT 
118OO 。 FRINT 
1190Q FRINT: INFUT "REBISTER=" ョ R 
12000 FRTNTI INFUT "DaT 人 = sD ま も 
12100  D=VaL ("HU +D も ) : TMF=USRO(R※ つ 王 6+D ) 
12200 MEND 
Sa3O0 END 
12400 "※ 
12500 DaTA SO.04.2O。1E。FD。OD. さ 4 。46。E じ 。Q2。EE。 BC。F ア 。 7 41 .B6 
12600 DATA 0 さ 。 人 7。C4.6F 。C4。E ノ 。41 6。02 7。C4。6F 、C4. さ 。 6。 うさ 4 
12700 DATA 46.ECD,O2。EE。 ヨ BC. DE 。 7。 41 日 6。0 さ 。 7。 ビ 4 。6F 。 4 。 日 6。91 
12800 DAT 7。C4。E6。41.6F.C4。4F。ED。 02。 うじ 6 
= 
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富士 通 の FM- 7 は 発売 され た ば か り で す が , FM- 8 の 
ハー ドウ ェ ア , ソフ トウ ェ ア 構 成 を 踏襲 し て いる た め 内 部 
の 構造 も ほとんど 共 通 で ソフ トウ ェ ア も 互換 性 が あり ます . 
また , シス テム を 拡張 する 上 で 本 体内 に カー ド を 実装 で き 
る と いう の は 大 き な 魅 力 で す . 今回 は テス ト と し て 簡単 な 
A-D コ ン バ ー タ ・ ボ ー ド を 製作 し て み ま し た . 





本 体 上 部 の 蓋 を あけ る と 3 つの コネ クタ が あり ます . 1 
つ は Z80 カ ー ド 用 の 40 ピ ン , 残り は I/O イ ンタ ー フ ェ イ ス 
用 の 32 ピ ン で 、 和 富士 通 の FCN360 シ リー ズ の コネ クタ が 使 
われ て いま す . 今回 は 32 ピ ン の 方 を 使う こと に し まし た . 
信号 線 は 表 1 の と お り で す . アド レス ・ バ ス は 下位 8 ビッ ト 
(AB0 一 7) し か 出 て な く , その 他 に IOS が あり ます . 
これ は IO 領域 と し て FD00FDFF が 割り 当て られ て , 
上 位 8 ビッ ト は 内 部 で すでに デコ ー ド され て 1IOS と な っ て 
いる か ら で す . また EXTDET (拡張 検出 ) な る 信号 は , 外 
部 で GND に 接続 し て お く と FD05 番 地 の デ ー タ Do。 が 0 
に な り ま す . これ を ソフ トウ ェ ア で 検出 し て いる か どう か 
は 不明 で す . CLK (2.5MHz) は RS-232C 用 に , 4.9MHz 
の の ロック グ を 1/2. に 分 周 も て 吊 た で ゆる よう で すず 。 


DD コンバータ: ボ 上 


以上 の こと を も と に し て 、 簡単 な A/D コ ン バ ー タ ・ ボ ー 
ド を 設計 し まし た . A/D コ ン バ ー タ に は 入手 し 易い ADC 
0809 (8 ビット , 8 チャ ン ネ ル ) を 使い ます . この A/D っ コ 
ン バ ー タ は 出力 が 3 ステー ト に な っ て いる の て で 直接 バス ・ 
ライ ン に 接続 で きま す が , 今回 は 一 応 PIA を 入れ て あり ま 
す . START パ レス は PIA の CB2 を 使っ て B ボ ー ト に 
チャ ン ネ ル 番 号 を 出力 し た あと 自動 的 に 発生 きせ , EEOC 
を フラ グ 検 出し て いま す . ラッ チ の OE は 常に 1 です. P 
IA の アド レス は デコ ー ダ IC に よっ て FD40 一 43 に 設定 
し て あり , 簡単 に 変更 で きま す . 変換 クロ ッ ク と し て は 。 
2.5MH> を 1/4 に 分 周 し て いま す . 

使用 部 品 で 重要 な の は 本 体 と の コネ クタ で す が , 型番 は 
FCN-365-PO32 と いう も の で す . 秋葉 原 な ら ば 入 
手 可能 で す ( 注 ). 基板 の 大 き さ は 横 124 x 縦 78mm ま で で す 
が , 蓋 を 取っ て 使う な ら ば 縦 は も っ と 長く で きま す . 今回 











0 


は 小型 の 基板 を 使い まし た . 





終わ り 回 


3 3 購入 し た ば か りな の で まだ 充分 に 使い こなし て いま せん 
640 点取り 込ん で 規格 化し て 画面 に 表示 する だ け の 簡単 が , この よう に 簡単 な イン ター フェ イス な ら 1 日 も あれ ば 




















































































な ピロ グラ を 作 光 まま 志 だ た (CU スト 1。 29。 デー タク 取り で きる の で お 試し くだ さい . 読者 の 皆様 の お 役に立て ば 幸 
込み の マシ ン 語 サブ ルーチン は 6000 番 地 か ら , デー タ ・ いで す 。 
エリ ア は 6100 番 地 か ら で す . 1 点 の 取り 込み に か か る 
時 間 は 130zsec 程度 で . A-D コ ン バ ー タ の 変換 時 間 (100 注 : ラ ジオ セン ター 内 : 第 2 パー ル 無 線 , 
gsec TYPE.) に 近い 値 と な り ま し た . ラジ オデ パー ト 内 : 神保 商会 , な ど . 
表 1 オプ ショ ン ・ ス ロッ ト ・ コ ネ キク タ 信 号 表 表 2 部 品 表 
后 方 向 ロ ] | 
| ロ R 
ozox | 型 番 | 個数 備 考 
A- 1 AB0 ーー B-1 | AB1 ーー UsC 68B21 1 
2 2 に ae 2 3 | ADc0809(0808) | 1 
3 の = や 3 5 ーー | 
4 6 5 4 7  : 全 | 74LS138 2 
5 DB0 ママ 5 |DBI で ーー | 74LS04 | 1 
6 2 で ー ヶ 6 3 て > 
8 | 3 に | 74LS93 IN- 愉 。 
8 6 <ー ャ 8 7 ad ソケット | 40 ビ ピン 1 
9 Q ーー 9 |E ーー 間 
10 105 ーー 10 | RESET ーッ 28 ビ ン も 1 1 
1 We = 11 EXTDET| ご コネ クタ | FCN-365-PO32 1 富士 通 製 
12 IRQ ーー 12 | CLK(2.5MHz) ー+ 
13 圭 12V ュー 13 | -i2v | 明 内 | HNC2-2.5P-3DS 8 | ヒロ セム セン 製 
14 +5V ーー 14 |+.5V | っ | 基板 | !CB-93 1 サン ハト ヤ 製 
15 GND 15 | GND を 条 3 て - < 3 
16 GND 16 |GND | その 他 , 配線 用 ビニ ー ル 線 若干 ] 
全 回 路 
28 IN7 
27 INi 
26 IN0 
25 ADD A 
24 App 日 
ADD C 
ADCO808 の 
ADCO809 2 
OUTPUT 20.2-2 
ENASLE 
19 = 
18.。 
2-8LS 日 
REF(-) 
2-6 


Input テス ト 用 信号 
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下 還 細 リス ト 1 男 面 表示 プロ グラ ノム 、 還 還 還 還 量 還 還 本 本 面 リス ト 2 デー タク 取り 込み サブ ルー チン 四 mmmm 


1 革 





2O POEE %HFD41 







ll[ 
| 

10 FORE &HFD40、%HOO 
610O 。 LDX  # 和 ま 6100 








30 POREE &HFD4 0 LDE セッ 
40 POEE 8 FD42 STB まま FD42 
59 INFUT 1 ん 600 E6 FD41 LDa 名 FD41 
60 FOREE &&H6100。 1 エメ | 6OOE 4D TSTA 
70_ EXEC 多 H6QOOO | 600E 2 人 Fa HFPL 6008 
B0 CLS 6OOE B ら 6 FD4O LDa まま FD40 
20 _ FUR JX=O_ TO 6011 台 ア に 6 BTA 
100 ん =199-FEEF H6101+JX) /1 | | 601 ミ ヨ ビ 63 日 1 CMPX 
FSET (けん 。 人 ZZ) | 6016 SB ED EMI 
NEXT J ん | 6018 3 RTS 





SOTO 5O 

















5 上 5 た だ し , 先頭 番地 が $D400 の と き サ ブ プ CPU が 禁 走 す る お 

サブ プ メ モリ の ビッ ト ・ バ ター ン を 見 る それ が あり ます. 先頭 番地 の 初期 値 は $D000 で $20CA, 20 
CB に 入っ て いま す . 

較 西 亀 和 弘 使用 法 と し て , サブ プ CPU に 転送 し た 内 容 が 見 な たい とき は , 

この プロ グラ ム を 実行 する と 図 1 の よう に な り ま す 。 一 番 見 た い プ ログ ラム の サブ 転送 の 後に お いて くだ さい . また R 

は の きい 還 角 8208 拓 2 っ 由記 30 の 2 了 OM の 内 容 を 見 る 場合 は この まま EXEC&&H2000 で 走り ます . 

2 生 3 に また , FM-7/8,。 どちら で も 走り ます . サブ CPU 転送 きれ 


2 バイ ト (これ 以後 は 先頭 番地 と する ) を 2 進 コ ー ド で 表 わ る 部 分 は $ 20C5 一 $ 2195 ま で で $7F00 以 下 に 転送 され ます 
し て いま す -. 横 8 個 、 縦 32 個 の 小さ い 四 角 は 先頭 番地 か ら , 0 


+EFFug 番 地 ま で の メモ リ の 内 容 を 2 進 コ ユー ド で 表わし ます 7 
(9 0 2 に 4 な お , $D000 は サブ CPU の タイ マ や キー DATA を 見 る メ 
番地 の 見 方 は 左 か ら 右 へ 十 01 番地 づつ ぶ ふ 、 え て いく と 考え て , こ 


モリ が あり ます . 
2 段 め の 一 番 左 は 先頭 番地 士 08 と な り 一 番 右 下 が 番 地 士 FF。。 


どり 0 まず, ダン < | リス ト EPRimeiise 


先頭 番地 の 変更 と し て は , 先頭 番地 士 100u。 は さら AiW ら お 
を お し て 較 を , 先頭 番地 一 100』 ゥ は [SPACE] と ほ |, 先頭 番 3000 RG FD 05 2 
1000。。 は ISPACEI キ ー と 隔 、 先頭 番地 一 1000。 は ISPACEI キ ー 020 83 
と 軸 ca 7 FD 05 A6 


es 05 

2 11 人 < 
図 1 2oeo 7F FD Os 
207O OO Q 


メモ リ の 内 容 を 穴 わ す 天地 を 表わす 2ogo p0. ミ 
2090 0 


2oaO 
20BO 
20CO 
2o0DO 
2oEO 

















Sums 


dd 
2 っ 1oo 
2110 
2120 
2130 
2140 
2150 C 
21o6O OoQ 
2170 0 
2180 
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ye る の 


の ぐ の る る る の の の る の マッ 


TI 社 の ビデ オ ・ デ ィ ス プレ イ ・ プ ロ セ ッ サ “TMS99 
18A" (以下 VDP と 呼ぶ ) を 使っ て , FM に スプ ライ ト 機 
能 を 付加 する カー ド を 作り まし た . また , この カー ド を B 
ASTC で コン ドロ ニー ニル ま ずる た め に , "日 AS 1C に コマ ン 
ド を 拡張 する ソフ ト も 制作 し まし た . 





VDP の 特徴 





この VDP は 他 の CRTC と 迅 っ て 、 ス フ ラ イト 機能 と いう 
も の を 持っ て いま す . これ は ソー ド の 『M5』. ト ミー の 『 び 


ゅ 一 太 』 な ど に 使わ れ て いて ,、 グラ フィ ッ ク で 絵 を 簡単 に 
一 か せる よう に な っ て いま す . 

この VDP は 大 変 機能 が 高く 、 本体 と メモ リ そ の 他 少 し の 
部 品 で 作る こと が で きる の で す が 。 出力 は コン ボ ポジ ッ ト 出 
の み で RGB の モニ クタ に は つなぐ こと が で きま ぜん . 


VDP の 仕様 


9256X192 ド ッ ト の グラ フィ ッ ク 

@16K バ イト の メモ リ ・ ア ドレ ス 

@16 双 出力 可能 (黒白 、 大 明 を 含む ) 

ね 合わ せ 画 面 の 自動 竹 理 

を 変更 する だ け の 動画 処理 
VDP カ ー ド 本 体 


















人 ! 種 の 普 止 画 モー ド 

この うち , @ と に つい て で す が . ス フ ラ イト 画面 と い 
う も の が あり , そこ に それ ぞ れ の 絵 を 描い て お きま す . す 
る と テレ ビ の 画面 で は 全部 が 合成 され て みえ を る わけ で す が , 
この と き 奥 に ある ( 図 1) 絵 は 手 前 の 絵 と 重なっ た と き , 後 
叶い まい ます . この 機能 を 利用 すれ ば 三次 元 的 な 表 

見 が 可能 に な る わけ で す . 

まだ た だ, それぞれ の スプ フラ イト 2 標 を 与え を て や 
る だ け で ., 移動 や 2 倍 に 拡大 する こと も で きま す . 

⑨ の モー ド で す が . 過 の か ( 人 の キャ ラク タ ・ 
面 は 3 種 の 表示 モー ド が あり ます . ふつ うこ の 面 は 背景 な 
ど に 利用 きれ ます . 

NO mm 

スプ ライ ト 

ス フ ラ イト 面 は 32 耐 あり 0 の 曽 が 一 番手 前 に き て , 持 
31 が 最も 興 に な り ま す . スプ ライ ト の パタ ー ン は 8X8 で 
256 個 まで 定義 で き . そ の うち 32 個 を 表示 で きま す . 

また 。 4 つの パタ ー ン を 同時 に 使っ て 16X16 の パタ ー ン 
も 表示 可能 で 、 き さら に バタ ー ン は 2 倍 の 大 きき に 拡大 表示 
も で きま す . 

色 は 各 ス プラ イ 


キャ ラク タ ・ パ ター ン 
キャ ラク タ ・ バ ター ン 面 に は 4 種類 の 表示 モー ド を 使う こ 
と が で きま す . ( 表 1) 
田 グ ラフ ィ ッ ク ・ モ ー ド 1 ユ 

ロビ カ ー ト 入 人 人 


パタ ー ン 





ト 共 16 色 中 の 1 色 を 表示 で きま す . 
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図 2 パタ ー ン 定義 例 








| | 胡 」 
| | ク 


























ドド Fx パタ ミー ン スプ ライ ト 
バターン 























表 1 キャ ラク タ ・ バ ター ン 面 の モー ド 










パターン ・ サ イズ | パタ ー ン 数 スプ ライ ト | テ キス ト 文 字数 
グラ フィ ッ ク 1 1256X192 8Xx8 256 種 |16 色 (8 ドッ ト ご と ) 
グラ フィ ッ ク II|256X192| 8x8 | 768 種 |16 色 (8 ドッ ト ご と ) 
64X 64|4X4(1 ブ ロッ ク )| 16 色 (ドッ ト ご と ) 


| テキ スト |256x192| 8X6 | 256 種 |16 色 中 2 色 


ドッ ト 分 解 能 は 256 ぶ 191 で 256 種 の パタ ー ン を 表示 可能 
5 ソフ ト 編 


圏 ク グラ フィック ・ モ ー ド II 






































ドッ ト 分 解 能 は 256X191 で 横 8 ドット ご と に 色 指 定 可 能 この プロ グラ ム は FE-BASIC に リン 必 じ て 。7 有 BASIC 栖 導 
で .768 種 の バ パターン を 表示 で きま す . な VDP コ ント ロー ル 用 の 命令 を 拡張 する も の で す . 以下 に 
3 その コマ ンド を 説明 し ます が ,。 コマ ンド は 大 きく 『 定 言 』, 

一 マル チカ ラ 『V-RAM 直 接 ア クセ ス 』,.『 静 止 画 」,、『 ス プラ イト 』 の 4 
64X48 で ,。 1 ドッ ト ご と に 双 指 定 可 能 で す . つ に 分 類 さ れ ま す . 

まお.、 タレ チン ジウ ックス ジラ イド トド を 人 は ツジ フト 的 7Swy 

園 テキ スト くつ か の スプ ライ ト を まとめ て 、 い っ し ょ に 移動 きせ る 

婦 字 を 40X24 で 表示 し 、 スプ ライ ト は 使え ませ ん . の で す . 
な お ,。 FM- 7 で は リス ト 1 の プロ グラ ム の “EXTERN 
此 作 の 注意 AL DECLARATION" か ら 10 行 分 を リス ト 2 の よう に 変 





更 し て か ら ア セン プ ブル し て くだ さい 。 
3 の 回 路 図 中 CN 8A、CN8B は FM- 8 の 場合 で す 。 





FM- 7 で は CN9 を 使い ます 使用 ビン 番号 は 変わ り ませ 宣言 コマ ンド 

ん . も ちろ ん FM- 8 で エク スペ パン ジョン ・ ポ ー ト を 使っ て ーーーーーーーーー 

作っ て も 良い と 思い ます . 宣言 コマ ンド は VDP の モー ド , ス プラ イト の 定義 な ど を 
C1ー- C き 8 は な る べく MB8118(4816 コ ン パ バチ) の すぐ そば する た め の コ マン ド で す . 


に 入れ ます . また + 5 V 側 の 足 を 極力 得 か くし て くだ さ 


5 ! ーー デー ミニ ラニ ーー ーー ニー で ーー < ニッ | 
い 。M1-M8 の 3ー7, 10 一 13, 15 番 ピン は パラ (並列 ) リスト る 








(こつ 2 が SS) 拉 2 

そ の 他 直 意 す る 点 と し て は クリ スタ ル の 周辺 は TMS9918 7 ム @ き FCERR EEL 呈 96 ム る 
の すぐ そば に 配置 し て くだ さい . また CV 1 の トリ マ は et の T TSDTGC ERUI EntSF1 
し っ か り し た も の に し な いと ちょ っ と の 振動 で 色 ず れ を 7 人 DE EVMLRD1 EGU E: が 410 
起こ し ます . ウジ 5 CHECUM EGUJ EMI 

製 作 が 終わ っ た ら CN 8 A、CN 8B の それ ぞ れ の ピン を テ 9BF 1 EVMLISTR_EGU 和 も 9BF 1 
スタ で あたり 。 ショ ー ト し て いな いこ と を よく 確か め て く 99EBC GETERY1 EQGLI ま も の 99EC 
だ さい 。 ビ デオ 出力 に CRT を つない で ・ 実 験 用 電源 で 5V を ES19) SNERR EEGUI EARMAT9| 
供給 し ます . CRT の 画面 が 白 っ ぼ く な れ ば 。 一 応 大 寺 夫 で 97 COFRXU ERU 日 人 7 
し ょ う . FM 本 体 に 取り 付け て , 電源 を 入れ ます 。 い まま ら の 7 に DSDSF_EGU まじ 69 に 
で 通り 、 初 期 メ マッ セー ジ が で れ ば OK で し ょ う RSOE FIN EGQU 第 RSOE 
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國 静 止 画 モ ー ド ・ セ ッ ト 
〔 歓 能 〕 


V DP の 静止 画 モ ー ド 、 表 示 の ON・OFF、 


ト の サイ ズ を 折 定 する . 
〔【 フ ォ ー マ ッ ト 〕 

VDP“ G MM 三 W 証 B 請 SS の 
【 バ パラメータ 〕 

Mi: 区 止 画 モー ド の 設定 





M 0 グラ ププ ィ 必 多 ヶ > モード T エ 
M 1 グラ アイ ッッ ジジ:・ 王 三 ド U 
M2 マル チカ ラー 

M3 テキ スト ・ モ ー ド 





Bs : 表示 の ON・OFF 





B0O 表示 を ON (画面 を 出す ) 
BI  / OFF (画面 を 出さ ない ) 











SS: スプライト 


・ パ ター ン ・ サ イズ の 指定 








S0 8xX8. 拡大 率 1 (表示 8X8) 
S1 8X8. 抜 大 率 2 (表示 16※16) 
S 2 16※16. 拡大 率 1 (表示 16※16) 
S 3 16X16. 抜 大 率 2 (表示 32X32) 











〔【 デ フォ ルト 値 〕 
*GM=MIB1S0" 


田 メ モリ ・ マ ッ プ の 変更 

〔 携 能 〕 

VDP の メモ リ ・ マ ッ プ を 変更 する . 
[フォ ー マ ッ ト 〕 

VDP"TB ニ PiC。GnaS。。R の 
[パラ メー タ 〕 

Pi パタ ー ン 名 称 テ ー ブ ル 





| アド レス = テ ms ネ 2048 (na ニ 0 一 7) 
だ 7 し グラ マネ ポッ ジグ ク 四 の だき. は ma 三 の ま だ た (ば 7 





Ss : スプ ライ ト 属 性 テー ブル 





アド レス ーn。 玉 128 (n。 三 0 一 127) 





Rns: ス プラ イト ・ ジ ェ ネ ビー タ ・ デ ー プ ル 





アド レス ns※2048 (na 三 0 一 7) 





[デフ ォ ル ト 値 〕 
^TB 邦 P14C255G3SSSR 3" 
圏 バ ッ ク ・ プ レー ン ・ カ ラー の 設定 
〔 撲 能 〕 
VDP の バッ ク ・ プ レー ン の カラ ー を 折 定 する . 
[フォ ー マ ッ ト 〕 
VDP"CB=n" 
[パラ メー タ ]〕 


n: カ ラー コー ド (n テ 0 一 15) 

【 デ フォ ルト 値 〕 

に 居 
圏 ス プラ イト ・ パ ター ン の 定義 
〔 撲 能 〕 

スプ ライ ト ・ パ ター ン を 定義 する . 


(ジア ォ ー マ ツ ト ) 
VDPPSPmn ニ スプ ライ ト ・ パ ター ン X 8 バイト”" 
〔 パ ラメ ー タ )〕 
ダイ トド ト 9 タージ "ナル ペー。 9 w 8y パ ダー シッ で 
256 種 Ln 0 一 255J 定 状 可 . 16X16 ド ッ ト の パタ ー ン は 、 
1 つの 連続 し た ナン バー の パタ ー ン を 使う .. 
スプ ライ ト ・ パ ター ン : 横 8 ドッ ト を 1 バイ ト と し て 8 ズバ 
イト で 1 つの パタ ー ン を 構成 . 








スタ ー ト ・ ア ドレ スーn ョ 1024 (nm テニ 0 一 15) 





Crzs・ カ ラー テー プル 





例 VDP"SPO ="}HCHR $ (1)+CHR (2) 
CHRS$S(4)+CHRS$S(8)+CHR$(16)+CHR 
(32)+CHR $(64)+C HR $(128) 

で 図 2 の よう な ,。 パタ ー ン が 定義 きれ る . 








アド レス ーnz 米 64 (nz 0 一 255) 





また は nz 三 255 の み 指 定 可 . 


グラ フィ ッ ク I モ ー ド 指定 の と き は 、 nz 三 127。 











Gas・ パ ター ン ・ ジ ェ ネ レー タ ・ テ ー プ ブル 


図 4 メモ リ ・ マ ッ プ (グラ フィ ッ ク II モ ー ド 時 ) 


圏 キ ャ ラク タ ・ パ ター ン の 定義 

〔 撲 能 〕 

キャ ラク タ ・ バ パタ ー ン の 定義 を する . 
[フォ ー マ ッ ト 〕 





G3 一 >$0000 
$0800 


R8 -…$1000 
S56 一 >$1800 





C255- つ $1C00 


回 32000-ーー ニ ーー ァ 
6144 バ イト 


VDP*TB* で 


スプ ライ ト ・ ジ ェ ネ レー タ 
テー プ ブル 
スプ ライ ト 属 性 テー ブル 





0 
の 指定 $380 バタ ー ン 名 称 テ ー プ ブル 
768 バ イト 
$3B00 





お 3EEE 










VDP"CPn ニキ ャ ラク タ ・ 

パタ ー ン 8 バイト” 

0 一 7 〔 パ ラメ ー タ ]〕 

nm 守 吉 ラク ダ ・ パ ター シッ * ナ 
ン バ ー(n デ 0 一 255). 8X8 

16 一 23 ドッ ト の 256 種 の パタ ー ン を 
定義 可 . その バタ ー ン を 表示 
させ る と き の コ ー ド (ASCII 
コー ド ) を 指定 する . 

ンク グン グー もの ブン 
1 ウー ウッ と 同じ 。 
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較 マ ル チ プ レッ クス ・ ス プラ イト の 定義 


〔 機 能 〕 
マル チ プ レッ クス ・ 
[フォ ー マ ッ ト ]〕 
VDP “MS mーS xi。y」、S nz 。x。、 ya…S 。。 
YE 
【 パ ラメ ー タ 〕 
MS』 : マル チ フ プレ ックス ・ ス フラ イト ・ ナ ン バ ー (』 =0 
ー7) の 8 つま で 定 王 可 . 
Snk : ス フラ イト 面 番号. 三 0 一 31. 
な ス フ ラ イト 面 番 け を 折 定 する . 
xn: 水平 相対 位 講 
yk: 左目 相対 位置 
田 キ ャ ラク タ ・ パ ター ン の 表示 
〔 機 能 〕 
キャ ラク タ を 天 示 . BASIC の "LOCATE+ PRINT" と 
同じ 働き を する . 
この と き ,。 VDP “GM" で て 指定 し た モー ド に より 。 1 画 
面 の 郊 数 が 直 う . 
[フォ ー マ ッ ト 〕 
VDP "PR。 ニ キャ ラク タ ・ コ ー ド 多 " 
[パラ メー タ 〕 
が ミグ ラプ ザック グ T。 下 の と を き nー テ 0ー767。 
モー ド の と き n テ 0 一 959 
キャ ラク タ ・ コ ー ド 絹 : “CPn" の n と | じ ASCL コ ー ド 
を 持つ キャ ラク タ 列 . 
圏 セット ・ ド ッ ト ・ カ ラー 指定 
〔 携 能 〕 
セッ ト す る ドッ ト の カラ ー を 指定 する . 
[フォ ー マ ッ ト 〕 
VDP “CS8= テ ュ " 
〔 パ ラメ ー タ 〕 


スプ ライ ト を 定 蘭 する . 


V DP の ハー ド 了 的 


テキ スト ・ 


nn カラ テラー コ ー ド 。 n 三 0 一 15。 
[デフ ォ ル ト 値 〕 
“CS=15" 
圏 リ セッ ト ・ ド ッ ト ・ カ ラー 指定 
〔 携 能 〕 


リセ ッ ト さ れる ドッ ト の カラ ー を 指定 する . 
[フォ ー マ ッ ト 〕 

VDP “CR=mn" 

〔 パ ラメ ー タ J〕 


n: カ ラー コー ド 。 mnー テ 0 一 15 
【 デ フォ ルト 値 〕 
*CR=0" 
圏 テ キス ト ・ キ ャ ラク タ ・ カ ラー 指定 
〔 機 能 〕 


テキ スト ・ モ ー ド で キャ ラク タ の カラ ー を 折 定 する (V 
DP “GM" で テキ スト ・ モ ー ド を 指定 し て な けれ ば 筐 
効 ). 

[フォ ー マ ッ ト 〕 

VDP “CT テ m ョ " 

【 バ パラメータ)〕 

TY: カ ラー ヨー ド 。 mn 三 0 一 5 
ね な お 。 育 景色 は YDP "CB" で 指定 し た 色 。 


』O 


VRAM 直接アクセス ・ コ マン ド 


VDP の 持つ VRAM を アク セス する と き に 使い ます . 
圏 VRAM ア ドレ ス 指 定 


〔 揚 能 〕 
VDP の VRAM アク セス 
[フォ ー マ ッ ト ]〕 
VDPen 
[パラ メー タ 〕 
n: ア ドレ ス . 読み 出し 時 は &HO000 一 &H3FFF, 上 
き 込 み 時 は &H1I000 一 H7FFF. 
この 後 。 VDP 半 、VDP ニ な ど で 読 み 剖 き を 行なう 
に 1 つ ず つ ア ドレ ス が イン クリ メン ト さ れ ま す . 革 き 込 
むと き は &H1000 を 足し た 値 に する . 


圏 V R AM へ の 直接 書き 込み 
〔 携 能 〕 
VRAM へ 1 バイ ト 直 接 に 半 き 込む . 剖 き 込み 後 ,、 アド 
レス (VDPe て で 指定 し た も の ) は イン クリ メン ト さ れる . 
[フォ ー マ ッ ト ]〕 








・ ア ドレ ス を 指定 する . 


AA [1 


VDP ェ n 
〔 バ パラメータ)〕 

れこ 1 パイ トッ ャ プー タ 。 品 三 ひ ー255 

圏 V R AM へ の 固定 デー タ 書 き 込 み 
〔 歓 能 〕 


VRAM へ 1 バイ ト の 固定 デー タ を 後 数 革 き 込む . 
[フォ ー マ ッ ト 〕 
VDP=n.m 
〔 パ ラメ ー タ )〕 
n : 剖 き 込み デー タ . 1 バイ ト 
m・: 時 き 込み デー タ 転 送 バ イト 数 
いう デー タ を 折 定 され た アド レス か ら 。 m バ イト 革 


n と 
き 込 む 。 m デ 0 一 16381 wH4000) 


圏 VRAM ヘ メイ ン ・ メ モリ より 転送 


〔 携 能 〕 
メイ ンジ * 
転送 . 
【 フ ォ ー マ ッ ト 〕 

VDP<n、m 
〔 パ ラメ ー タ 〕 

n:・ メ イン ・ メ モリ ・ ア ドレ ス 

m: 転 送 バ イト 数 . mー0 一 16384( 移 H4000) 


圏 VRAM か ら メ イン ・ メ モリ へ の 転送 


〔 歓 能 〕 
VRAM の 現在 の アド レス か ら 指 定 バ イト 数 を メイ ン ・ 


メモ リ の 折 定 アド レス か ら の 内 容 を VRAM へ 


メモ リ へ 転送 . 
【 フ ォ ー マ ッ ト 〕 
VDP>n、m 
〔 バ パラ メー タ 〕 
mn: メイ ン ・ メ モリ ・ ア デア ドレス. 
を 使用 する . 
m 転送 バイ ト 数 . 


$S1000 一 5FFF の 和 囲 


0 一 16384 
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静止 画 用 コ マン ド 


症 画面 に 対し て の み 作 有川 し ます が 、 
有川 』 コ マン ド は V DP “GM" で グラ ク 
な っ て いな けれ ば な り ま せん . 


一 画面 の クリ ア 


〔 機 能 〕 
普 目 画面 を 色 、 
{【 ジ ォ ー マ ッ ト ト ) 








これ め ら の 
{ 


普 止 画 
メ U モ 王 。 還 人 


ハタ ー ン を 指定 し て. それ で 下る . 





VDP CILS mi。 ms 
[パラ メー タ 〕 
nn: ドッ ト ・ ハ ター ン 、 1 の ビッ ト が 画面 上 で ドッ ト と し 
て セッ ト ,。 0 の ビッ ト が リセ ッ ト さ れる 。. 
ns・ 上 上位 4 ビ ピッ ト は セ モット され る ドッ ト の カラ ー コ ー ド と 
な り 。 下位 1 ピッ ト が リモ セット の カラ ー コ ー ド と な る . 
較 静 止 画面 に 点 を 打つ 
〔 携 能 〕 
衣 目 画面 上 上 の 指定 座標 に ドッ ト を モッ ト す る . 
[フォ ー マ ッ ト 〕 
VDP PSET (xy), C 
[パラ メー タ ]〕 
x 水平 座 f 0 一 255 
y : 江 出 座 相 0 一 191 
CGC: カラー コー ド 。 0 一 15 
カラ ー コ ー ド は 親 略 可 。 大 賠 時 は 前 回 の と き と 了 回 じ 値 と 


お しゃ 
じ 色 と な る . 
〔【 デ フォ ルト 値 〕 

C テ 12 
圏 点 を 消す 
〔 歓 能 〕 

衣 止 画面 上 上 の 点 を 指定 し た 6 で リセ モット す 
[フォ ー マ ッ ト 〕 

VDP PRESET 
[パラ メー タ )〕 

ドッ ト を リモ セ モット する 以外 は VDP 
〔 デ フォ ルト 値 〕 

C ニ 0 


圏 線 を 引く 


〔 機 能 〕 

普 止 画面 上 に 線 や 術 を 描く . 
[フォ ー マ ッ ト ]〕 
VDP LINE 
[パラ メー タ J〕 


ドッ ト は 1 キャ ラク タ 内 の 8 ドッ ト が 回 


(90)、 や も 


PSET と | 同じ . 


(Es まお 0 (xz、 Ys)、 mi、C、mz 








X す | 光る 0 ニニ 25 
Y1。 Ys 0 一 191 
16 陣 っ | 

| 0 PSET 





1 PRESET 





GS カタ ラー ヨー ドル 。 0 王 ⑯ ( 謝 遇 ) 








nz : 線 、 術 の 指定 (省略 可 ) 
0 2 つの 点 を 通る 直線 を 引く . 
1 2 つの 点 を 角 と する 塗り つぶ され た 箱 を 描く . 








〔 デ フォルト 値 〕 
寿 略 し た な ハラ メー タ は 前 回 と 同じ も の が 適用 きれ る . 


スプ ライ ト ・ コ マン ド 


プラ イト ャ コシ ンド (人 ネス ネプ アイ ト の パタ ダー シャ も セッ マ 
ー 座 様 を 指定 する も の で す . 


圏 ス プラ イト の 表示 
(機能 〕 


韻 n の ス フ ラ イト 
【 フ ォ ー マ ッ ト 〕 
SPRITEB ni,(x. 
〔 パ ラメ ー タ 〕 
・ 表示 する ス フ ラ イト 画 番 号 . 
} 水平 座標 0 一 255 (省略 可 ) 
: 自 直 座 標 0 一 191 (省略 可 ) 
>:・ パ ターン ・ ナ シ ペ ベーu(VDEP SPY で 窟 義 し た も の 9) 
16X16 バ ター ン を 折 定 し た と き (VDP “GMT) は 0 か 
ら す 4 つ お き の ナ ン バ パー のみ 人 有効 で 、 そ の 連続 し た 4 つの 
バ パター ン が 使わ ね れる. それ 以外 の ナン バー は その ナシ バ 
ー よ り 小 さい 有効 な ナン バー と みな され る . 
C : 表示 カ ラー. カラ ー コ ー ド に 128 を 足す と スプ ライ ト 
が 械 に 32 ド ッ ト 分 シフ ト す る . 


較 マ ル チ プ レッ クス ・ ス プラ イト の 表示 


〔 携 能 〕 
マル チ フ レッ クス ・ 
【 フ ラフ ォ ー マ ッ ト ]〕 


・ フ レー ン に スプ フラ イト を 家 が する . 


Y)、 ns,。C 


(0 こう 





ス フ ラ イト を 表示 する . 


SPRITEREGn、(x、Y) 

[パラ メー タ 】 
n : マ ル チ プ レッ クス ・ ス ネス プラ イト ・ ナ シバ パー(WDP“M 
S") を 指定 する . n 三 0 一 7 


3 : 標 (0 一 255) 

y : 算 直 座標 (0 一 191) 
それ ぞ れ の ス フ ラ イト 面 に 表示 さき れる パタ ー ン ・ ナ ン バ 
- カ ラー は SPRITEn で あら か じ め 座 標 を 省略 し て 設定 


に (お 






ノ 
N・ 


還 ) ス ト ] ソ D ロ コン トロ ー ル ・ プ ログ ラノ 、 EE 還 還 














NaH FJVDP Qo77 FACLO EQU * フ フ 
QPT 8 ooB4 AaRGMO EDU 4 
TTL FM- 日 SPKITE。VDP は 3 
eooo ORG *60oo すす 111111111111143131131113131311111 
# ネ 
ネ VDP SPRITE COMMAND ** EXTERNAL DECLARATION 
6000 7E 6187 STaRT JP VDPSTE に 
ooBC SKIP2 EpU *B ビ BoO さ FCERR  EOU * ま 9BO さ 
* 9987 ISDIGC EQU 99 人 7 
ooDg TXTPTR EQU *Dg ESF EVLAD1 EQU *9EBF 
ooD2 CHRGET EQU *D っ 97 さ 2 CHKCON EQU ま 97 さ 2 
OoDB CEHRGOT EQU *DB | DB6 EVLSTR EQU *9DBo 
O1F9 STUB1 EQU ま 1F9 9E49 GETBY1 EQU 9E49 
01FC STHD1 EGOU 1FC 9740 SNERR EQU 974O 
に | BA14 COFBXU EQU BR14 
* | CD8 DnSDSF EQU *C9DB 
oo76 FACHO EQU 7 ら 還 | EB8O FIN EpU *EBBSO = 
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リス ト 1 


VDP コ ント ロー ル ・ プ ログ ラム 








600 さ 
6004 
6006 
6008 


600 の 
600 
600B 


600C 
6Q00D 
600E 
6Q0F 


6010 
6011 


6012 
601 さ 


6014 


601 
6016 
601 日 
6019 


601A 
601BE 
601C 
601D 
6O1E 
601F 
6020 
6021 


6022 
602 さ 
6024 


6025 
602Z 
6029 
602B 
602D 


602F 


60AF 


618BZ 
618A 
618C 
618F 
6191 
6194 
6196 
6199 
619C 
619F 
6182 
614 


61 人 ア 
61aA 
61AC 
61AE 


61AF 
61BO 
61B2 
61B4 
61B5 


61B7 


61B9 
ら 61BA 


CE 
6E 
BC 
26 
BE 
Ce 
BD 
BD 
BE 
CE 
Ce 
BD 


BE 
AF 
AF 
39 


FD2E 
FD2F 


oo 
oo0oO 
9o0O 
oo 


oo 
oo 
Fo 


oo 
Go 
Qo 
9O 


OO 
QQ 


oo 
oo 


0O 
Qoo 
oO 


02 
C2 


FF 
3 
=8 
0 さ 
oo 


91 
O1 
@3 


さ 3800 
2000 
Oo00 
1Coo 
1800 


6021 


0000 
Oo001 
0002 
000 さ 


0080 


oo0o00 
0001 
Q002 


0000 
0001 
0Q002 


QODB 


ら 618Z 
O1F9 
4 さ 

9740 


61AF 
9OA 

BA14 
6228 
61 ビ 2 
O20 さ 
OA 

BA14 


9740 
4 さ 
48 


61AF 
61B9 
620 さ 
09 

61B9 
9740 
61B9 
61B9 


AO 
AG 


619 ビ 


ネ 
** INTERNAL DECLARATION 


3 


* VDP 

* SPRITE 

3 

キネ 

も 3 

キ 

* 。 1I/ ロ ADDRESS. 

は 

VDATA EQU *FD2E 

VREG ECU ま FD2F 

を 

3 

キ FJVDP MORK AREA 

キ 

VTEXTC FCB Oo CURRENT TEXT COUNTER. 
VTEXTP FDB 】 CURRENT TEXT POINTER. 
VTEXPT FDB 9 SAVE TEXT POINTER. 
MSIN FCBE Q 

に 

PX FCE 9 PSET PRESET X-AXIS.。 
FY FCBE oO PSET 。PRESET Y-AXIS。 
CL FCBE *FO FSET。FRESET COLOR. 

ネ 

X1 FCE Oo 

ずる FCB LJ 

X2 FCB Q 

Y2 FCB 【 

を 

SX FCB 9 

SY FCB @ 

ネ 

DX FCE oO 

DY FCE L』 

キネ 

PRSFLG FCBE O OiPSET 1:PRESET FLQG 
* 

1 日 4 FCB L 

\ FDE トリ 

FUNC FCB Oo 

LBOX1 FCB トリ 

キ 

REGO FCB 0 っ 

REG1 FCB od 

REG2 FCB $OE 

REG さ FCBE ま FF 

FREG4 FCB $0O マ さ 

REGS FCB * る 日 

REG6 FCB $0 さ 

REG7 FCB $0OO 

に 

3 REG O %& REG 1 DISCRIPTER. 

* 

IODE FCB 1 INULTI COLOR 

BLANK FCB 1 NO BLANF 

SPRHAG FCB SPRITE SIZE & MAG さ 

ネ 

ネ FREG 2 - REG 6 DISCRIPTER. 

PATADR FDB まさ BOO FREG 2 =$OE 

COLADR FDB ま 2000 REG さ =$BO 

PTGADR FDB OO0O REG 4 =$0O 

SPAADR FDB ま 1COO FREG 5 =$3 晶 

SPGADR FDB 先 180O REG 6 =$0 う 

ま REG 7 DISCRIPTER. 

* ネ 

TXBKCL EQU REGZ TEXT COLOR % BACK DROP CDLOR.- 
を THE SPRITE O -- さ 1 DISCRIPTER・. 

キ 

SPR.Y EQU oO SPRITE N Y-QXIS (0O-191) 
SPR.X EQU 1 SPRITE N  X-QXIS (0-255) 。 
PATNUN EQU 2 SPRITE N PATTERN ND。 (O-255) 
SPR.CL EQU さ SPRITE N COLOR NO. (0-15) 。 
3 

SPRTAB BSZ 4 まさ っ SPRITE TABLE IS 128 BYTE. 


THE MULTIPREX SPRITE O 一 7 DISCRIPTER。 


キ 
*MULITIPREX SPRITE TABLE 


ま 

* ONE 
ISPR.N 
NSPR.Y 
ISPR.X 
キ 

TS.N 
MS.Y 
IMS.X 

* 
ISTAB 
し 


キネ THE STUB2 


* 
VDFSTE 


VDPSB2 


* INIT 


ネ 
VPSB1I 


CHNRH1 
CMFUN1 


SPRITE DISCRIPTER- 


EQOU 
EQGU 
EQU 


EQU 
ECU 
EQU 


BSZ 


EQU 
LDU 
LDX 
CMPX 
BNE 
LDX 
LDB 
JSR 
JSR 
LDX 
LDU 
LDB 
JSR 


STUB さ 


LDX 
STX 
STX 
RTS 


EQU 
FCB 
FDB 


FDB 
FCBE 
FDBE 


FDE 


EQGU 
EQU 
FCB 
FCE 


6 

1 

3 

い J 1 

1 1ー* 日 

2 ェ 

216 っ 16=( さ + さ 4 日) *# 日 


STATEHENT INITIALIZE 


* INIT STUE1 
間 STUB1 

さ 。U 

SNERR 

VDPSB2 

#VPSE1 1 

幕 10 

COPBXU 

VDPINI 

昔 PLSB つ 1 INIT STUB2. 
幕 STUB1+10 

著 10 

COPBXU 


SNERR 
さ 。U り 
日 。U 


に TNIT STUE2 DaTA 
ら 

CNMNRN1 

CHSTHD 

ど 】 

CHFUN1 

SNERR 

3 

3 


* 人 AO 1 
まま AO し う 











61BB 
61EC 
ら 61EBD 
61BE 
61BF 
61CO 
61 ビ 1 


61C2 
ら 1 ビ さ 


61CS 


61CZ 
る 1CB 


ら 61CA 


ら 61CC 
61CD 
61CE 
ら 61CF 
61DO 
61D1 
ら 61D2 
ら 61D さ 
61D4 
61D5 
61D6 
61DZ 
61D8 
61D9 
61DA 
61DE 
61DC 
61DD 
61DE 
61DF 
ら 61EO 
ら 61E1 
ら 61E ス 
ら 61E ユ 
61E4 
ら 61E5 
61E6 
61EZ 
61EB 
61E9 
61EA 
61EB 
61EC 
61ED 
61EE 
ら 61EF 
61FO 
61F1 
61F2 


61F さ 
61F5 
61FZ 
61F9 
61FB 
61FD 
61FF 
6201 


620 ミ 
6205 
6207 
620A 
620C 
620F 
6211 
621 マ 


6216 


621 人 8 
621C 
621F 


ら 6221 
ら 622 さ 
6226 


6228 
622 
622D 
62 さ O 
る 62 ささ 
62 さ 6 


62 マ フ 
ら 62 さ 
623C 
623F 
6241 
6244 
6245 
624Z 
6249 


624 
624D 


1 
BE 
Bo 
7E 
8B1 
22 
7E 
6E 


=4 
BD 
さ 5 


=4 
BD 
さ 5 


BD 
CC 
ED 
BE 
BD 
39 


Fa 
C6 
BE 
RA6 
BD 
SC 
C1 
26 
39 


BZ 
FZ 


AO 
AO 
Ao 
AG 
AO 
AO 
AG 


ら 61C2 
Oo8 
61CC 


oo 
Gooo 


9740 


61CC 
2o 
2o 
2o 
2o 
AO 
2o 
2o 


2o 
AO 
2o 
2o 
2o 
っ 2o 
AO 
2o 
2o 
2o 
2o 
2o 
AO 
2o 
2o 
2o 
2o 
C4 
2o 


っ 20 
AO 
56 
44 
po 


に ェ 1 


5o 
52 
49 
54 
C5 


9740 
9740 
9740 
9740 
974G 
740 
627 ミ 
65F6 


OOEE 


QOF5 





oooB 


F5 
Oo8 
61F さ 
EE 
CDB 
F5 
03 
9740 


620F 


6216 


9F 0210 


60 
EBF 
EO 


eo 
9E49 
EO 


622 
op 
oo4O 
624 
4000 
6251 


FD2E 
Bo 
601 


624 


88 
Fe 


FD2F 
FD2F 


FCE * ま AO 3 
FCE ま 仙 O 4 
FCE * ま AO 上 】 
FCB まま AO に 
FCB * ま AO ャ 4 
FCBE * ま AO 8 
FCB *AO 9 

* 

PLSB21 EQU 3 TINIT STUB2 DATA 
FCBE CHNNRH 
FDBE CHNRH つ 

キ 
FDB CNMSTHD 

* 
FCBE L 
FDE まま OOOO 


FDB SNERR 


キキ 
CHNRMH2 EQU キ 
FCC / / 
FCBE 雪 +$BO 
FCC Z メ 
FCB あ + ま 0 
FCC / \ 
FCE +$ 日 ひ 
FCC Z 『 
FCB 還 + ま 日 
FCC みる ゃ 。 
FCB ~ D+$BO 
FCC Z / 
FCB 『 +$ ま 日 ひ 
FCC /VD/ (*F4) VDP. 
FCBE *F+ ま 日 O 
FCC /SPRIT/ ($F5) SFRITE- 
FCBE * E+ まま 日 
3 


* 。 THE STATMENT DISPATCH TAELE. 


は 

SMDTE2 FDB SNERR 
FDBE SNERR 
FDE SNERR 
FDE NERR 
FDE SNERR 


FDBE SNERR 
FDE VDP EXEC VDF- 
FDE SFRITE EXEC SFPRITE. 
* 
CHFSTS ECU *EE 
キネ 
CHLSTT EQU ま F5 
* 
CMLNRH EQU 5 
* ネ 
CHNNRH EQOU CHLSTT-CHFSTS+1 
キ 
* 
* THE STATEMENT DISPATCHER 
ま 
CMSTHD CMPA WCMLSTT 
EHI NOT2ND 
LDX SMDTE2 
SUBA 電 CMFSTS 
JMP DOSDSP 
NOT2ND CHFA ##CMLNRN 


BEHI GOLST さ 
JMP SNERR 
GOLST さ JHP CSTMD1+201 
* 
EVLADR PSHS YU 
JSR EVLAD1 
PULS 。Y。U。PC 


GETBYT PSHS YU 


JSR GETBY1 
PULS Y.。U.PC 


* ま 
を 
* 
* 。 THE VDP INITIALIZE 
を 
V| 


DPINI EQU まま 
BSR INTREG 
LDD 基 移 OO4O 
JSR SREG 
LDX 半 和 ま 4000 
JSR STCVDP 
RTS 


ま 
* INITIALIZE VDP REGSTORE 
キ 
INTREG LDB VDaTA 
LDB 幕 $BO 
LDX REGO 


INTRE1 LDA sX+ 
JSR SREG 
INCB 
CHPBH 基 日 日 
BNE INTRE1 
RTS 


ま 
* SET THE VDP REGSTORE 
は 


SREG STA VREG 
STB VREG 
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リス ト 1 VDP コ ント ロー ル ・ プ ログ ラム 
6250 さ 9 NOP RTS 62F6 BD 9D8e JSR EVLSTR GET STRING 
* 22F9 FZ 600 さ STB VTEXTC SAVE TEXT COUNTER. 
に STORE CONSTANT VDFP 62FC BF 60O4 STX VTEXTP SAVE TEXT POINTER.。 
* Xrg ロ = BYTE COUNT Arg= DATA を 
6251 STCVDF EQU * 62FF ED 6581 JSR GETC 
6251 BZ  FD2E STa VDaTa so2 25 。 21 6325 BCS ERRFC 
6254 さ O 1F LEAX ー1。X% ら 63O4 う 4 Q っ FSHS 人 に 
256 26 。 F9 ea251 ENE STCVvDP 63O6 BD 6581 JSR GETC 
6258 39 RTS 63o9 25 1 6 さ 25 BCS ERRFC 
3 6 さ OE さら Oo4 FULS E キ 
し 3 LOAD VDP TO MENMORY ら 63OD 1E 日 9 EXG AE 
* Xrg= BYTE COUNT Urg = MEN ADR. 63sOF 1F 0QS TFR D、U 
6259 LOHVDF EQU に 6 さ 11 BE 6aE ユ LDX 昔 り DPCMT 
6259 B6  FD2E LDa VDaTa 6314 6D 84 VDFST1 TST 時 2 END OF TABLE っ 
625C A7 Co STA 、U+ 6316 27  QoD 325 BEQ ERRFC YES.FCERR ! 
625E BD 625o JSR NOP 318 11 さ B1 CMPU 。 、X++ 
6261 0 1F LEAX  -1。X 6 さ 1B 27 21 BEQ VDPST2 
6263 26 。 F4 6259 ENE LONVDF 631D 3O LEAX 2 
6265 さ 9 RTS 6 さ 1F 20 6 うさ 14 BR VDFST1 
を ネ 
* STORE MEMORY TO VDP B4 VDFST2 LDX ・X 
* Xrg= BYTE COUNT Urg = MEM ADR. B4 JHP 1 
6266 STHVDF EQU * ネ 
6266 6 CO LDA 、U+ 6325 7E 9BOS ERRFC  JMP FCERR 
626B EZ FD2E STA VDATA 
626B 30 1 LEAX ー1。X * VDF GRAPHC MODE SET 
626D 26  F7 6266 ENE STMVDP ネ 
626F 39 RTS 6 さ 28 VDFGN ECU し 
い 6581 JSR GETC 
627o 7E 974o ERR1  JMP SNERR FB 6<25 BCS ERRFC 
キ 3D CMPA 寺 * ニ 
日 F4 6 さ 25 ENE ERRFC 
* 。 THE VDP COMHQND 65B1 VDPGM1 JSR GETC 
* SB 6391 BCS VDPGHE 
キ 4D CMPA 間 * 財 
627 ミ VDFP EQU キ 22 6 くさ 5C BNE VDPGNHE 
273 2 FE 6270 BEG ERR1 659 ビ JSR GETNUN 
6275 4 0O2 PSHS Aa 022 STAa IODE 
6277 9D  D2 JSR CHRGET 6 さ 40 さ 4 02 PSHS Aa * ネ 
6279 35 oO2 PULS Aa 6 さ 42 84 01 ANDA WO1 
627B F6 6022 LDE NODE 6 さ 344 4 日 SLA 
627E C1 ol CMPH 1 GRAPHIC II っ 6 さ 45 BZ eo1a STA REGo 
6280 2 1C ea29E BNE VDFA^ 6 さ 48 35 02 FULS 。 Aa ネ 
* @ さ 4 B4 CO6 RNDR 村 午 06 
* VDF PSET (X.Y) 634C 4B aSLA 
* PSET GRAPHIC IT 6<4D 4B ABLA 
6282 B1 Ao CMPA 6 FSET っ 34E F6 eo1BE LDB REG1 
6284 26 03 628B9 ENE VDPFRO 63s51 C4 EZ ANDB WE フ 
62B6 7E 66FC JHP VDFPST 635< ミ 4 04 FSHS BR * 
に 6355 AA EoO ORA 、S+ ネ 
* VDP PRESET (X、Y) 6357 BZ 6O1ER STA REG1 
* PRESET GRAFHIC 1 635Q 20  D5 6 ささ 1 BRA VDFGN1 
6289 B1  a7 VDPPRO CMPA 共生 FRESET っ * 
62BR 26 。 03 629o ENE VDPLro 635C B1 42 VDFGMB CMPA  #*B 
62BD 7E 677a JhP VDPPRE 635E 26 。 17 6377 ENE VDFGNS 
* ネ 6 さ 20 BD 659C JSR BETNUN 
* VDP LINE (X1。Y1) 一 (X2.Y2) ュ 83 7 eo っ < STA BLANK 
* LINE GRAPHIC II 6366 F6 6Q1B LDB REG1 
6290 VDPLro EQU * ネ 6<e9 4D TSTa 
6290 B1 Bo CMPA Bo CLS っ 632a 2 o4 eszo BED vpPGh っ 
6292 26 。 QOS 6297 BNE VDPCLo 6seC CA 4Q ORE 40 
6294 7E 6BE1 JP VpPLIN さ eE 20 Oo2 6372 BRA VDFGM さ 
* 
* VDP CLS PAT。aTR 63270 C4 BEF VDPGH2 ANDE #$BF 
* CLS GRAPHIC 1T・ 6372 F7 601B VDPGNS STE REG1 
6297 VpPCLO_EGU を 6375 2o 。 Ba ERA VDFGM1 
2297 日 1  a4 CMPR 4 CLS っ * 
6299 26 03 629E BNE VDPAA 6377 B1 5< VDPGNS CHPA WS 
629B 7E 6895 JHP VDPCLS 6379 26 AA 6325 BNE ERRFC 
* 6 さ 7B BD 659C JSR GETNUN 
* VDF? ADRESS 6 さ 7E B4 03 ANDA W$0 さ 
* MRITE ADDRESS TO VDF・ 63BO BZ 6024 STA SPRNAG 
629E B1 40 VDPAA CMPA 埋 *9 63B さ F6 る O1B LDR REGB1 
62A0 26 。 0A 62C BNE VDPMDT 63B6 C4 FC ANDB We*FC 
62302 VDPMAD EQU に 63BB さ 4  Q4 FSHS  B * ネ 
6202 BD 。 621 JSR EVLADR 63BA AA EoO ORA 、g+ 由 
92A5 1F 10 TFR X、D 63BC BZ 6o1B STA REG1 
62A7 1E  B9 EXG AE 638F 20 AO 6331 BRA VDFGM1 
62A9 7E 624a JHP SFREG * 
* 6391 7E 6237 VDPGHE JHP TINTREG 
* VDF DATA 
* MRITE DATA VUDP 6 さ 94 7E 9BOS ERRFCO JHF FCERR 
628C DPNMDT EQU * 
62AC B1 2 さ CNPA 件 条 * VDP TAELE ADDRESS SET 
62AE 2 07 62B7 BNE VDFSTC 内 
62BO BD 622 JSR GETEYT る s97 vDPTB EDU 円 
92E さ F7  FD2E STB VDATA 2s97 BD 65B1 JSR GETC 
62B6 39 RTS 639a 25  FB 6<94 BCS ERRFCO 
を 6<9C B1 さ D CHPA "= 
* VDP= DaTA。COUNT 639E 26  F4 6394 BNE ERRFCO 
* MRITE DATA VDP 6 さ aO BD 6581 VDPTB1 JSR GETC 
62BZ VDPSTC EQU 63 人 3 25 EC 6 さ 91 BCS VDPGME 
62BZ B1 Eo CMPA 間 多 E ら 23a5 B1 5o CHPA  ##"P 
62B9 26 。 10 62CBE ENE VDFSTN 63a7 26 。 15 6sBE ENE VDPTBC 
62BB BD 6221 JSR GETBYT 6<a9 BD 6e59C JSR BETNUM 
62BE 34 04 PSHS  B * 63ACE BZ 601C STA REG2 
62CO BD 9732 JSR CHKCON 63aF BE oooo LDX WO 
62CS BD 621A JSR EVLADR 6 さ B2 さ O  B9 Q4OO  VDPTB2 LEAX 1024、X 
62Ce 35  Q2 PULS Aa 3 63B6 4a DECA 
62C8 7E 6251 JMP STCVDP 63BZ 24  F9 63B2 ENE VDPTB2 
* 63B9 BF 6025 STX PATADR 
* UDP く NR 63BC 20 。 E2 6e さ ao BRR VDFTB1 
* STORE MEMORY TO VDP. 4 
62CB VDEBTM EQU を 63BE B1 4 さ VDPTBC CMPA  #"C 
2CB 日 1 EZ7 CHPA EZ 63CO 26 。 32 63F4 BNE VDPTBB 
62CD 26 。 10 62DF BNE VDFLON 2sC2 BD 6259C JSR BETNUH 
62CF BD 6218 JSR EVLADR 2sC5 F6 6o22 LDB NODE 
62D2'S4 310 PS を 63CB C1 01 CMPB 1 BRFHIC II ? 
62D4 BD 9732 JSR CHKCON 6 さ CA 26 17 6 さ 3E さ ENE VDPTo2 NO。SKIP IT 
62D7 BD 621a JSR EVLADR 6sCE 81 7F CMPA 7F 
22DA 35 40 POES 9 り 63CE 26 。 O5 63D5 BNE VDPTQS 
62DC 7ZE ら 6266 JPMF STMVDP 6 さ 3DO BE oooo LDX 基 ま OOOO 
る 63DS 2o 。 o9 eSDE ERA VDFTo4 
* VDF> N。N * 
* LDRD VDF TO IEHORY 63D5 B1  FF VDPTO さ CHPA 間 ま FF 
62DF VDPLON EGU を 6 さ D7 1026 OOB さ 645E LBNE ERRFC1 
62DF B1  E5 CHPA 音 多 E5 縮 6 さ DB BE 2ooo LDX 間 多 200O 
62E1 26 10 62F さ BNE VDPSTR 6 さ DE BZ eo1D VDPTo4 STA REG さ 
62E ミ BD 6218 JSR EVLADR 63E1 20 QOC 6 さ EF BRA VDPTQ5 
62E6 さ 4 10 PSHS  X * 
62EB BD 9732 JSR CHECOH 63E さ B7 6o1D VDPTo2 STA REG さ 
62EEB BD 。 621 JSR EVLADR 63E6 BE oooo LDX WO 
62EE 35 40 PULS 。 U 63E9 さ O BB 4O VDPTB さ LEAX 64。X 
62FO 7E 6259 JHP LONVDP 63EC 4A に DECA 
* 63ED 26  FA 63E9 一 BNE VDPTE ミ 
ネ VDP "XX。- <・ 6 さ EF BF 6027 VDPTO5 STX COLaDR 
63F2 20 。 AC 6<aO BRA VDPTB1 
962F さ VDPSTR EQU 4 63F4 日 1 4Z VDPTBG CMPA 香 *B 
62F3 BD 6o6B1 JSR DECTXT 6 さ F6 2 つ 。 さっ 2 。 e429 BNE VDFTBS 
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リス ト 1 VDP コ ント ロー ル ・ プ ログ ラム 
63FB BD 659C JSR GETNUN 64FO BD 65B1 SR GETC 
63FB F6 6022 LDB IMODE 64FS 25 2o 6515 ECS ERRFC っ 
63FE C1 Oo1 CHFB ##1 GRPHIC II っ 64F5 B1 さ D CHFR 。 衝 ニ 
64oO 26 15 6417 BNE VDPTo6 NO、SEIF IT- 64F7 26 。 1C 6515 BNE ERRFC2 
6402 B1 03 CHFR 半 さ 64F9 <5 oo PULS  D * 
6404 26 05 640B BNE VDFTo フ 64FB BE eo25 LDX FATADR 
6406 BE 00QO LDX 苦 OOOO 64FE さ Q BB LEAX DX 
6409 20 0Z7 6412 ERA VDPTQ ヨ 65Q0O 1F 1O TFR X。D 
65o2 1E  B9 EXG RE 
64OR B1 0Q フ 7 VDFTO7 CHFA 65o4 CA 4o DRE を 40 
64OD 26 4F 645E ENE 6506 BED 624 JSR BREG 
64OF BE 2o00 LDX 6509 F6 6003 LDR VTEXTC 
6412 BZ 601E VDPToB STA REG4 65OC 4F FLRA 
6415 20 。 oOD 6424 ERQ VDPTo9 650D 1F ol TFR D、X 
* 65oF FE coo4 LDU VTEXTP 
6417 BZ 601E VDFToe STA REG4 6512 7E 62eg JHP STHVDP 
641Q BE oooo LDX WO 
641D さ O  B9 OBOO 。VDFTE4 LEAX 2048、X 2515 7E Eo< ERRFE っ JP FCERR 
6421 4 DECA は 
6422 26 。 F9  a41D BNE VDFTE4 本 VDP MULTIPREX BPRETE SET 
6424 BF 6029 VDPTo9 STx PTGADR * 
6427 7E 63AO JHP VDFTB1 2 (ED 
642A B1 53 VDFTES CHPA  #"S ーー 困ら 抽 BETNUN 
642C 26 。 16 6444 BNE VDFTER 251B CE 4oAF EDU TB 
642E BD 6e59C JSR GETNUN 251tE 4p TSTA 
6431 BZ 6Q1F STA REGS 651F 27 oe 6527 BEG VDFiS っ 
64S4 BE 0QOQO LDX 9O 6521 ささ CB 1E VDFMS1 LEAU 27、U 
6437 さ O  B9 OOBO 。VDFTB5 LEAX 12B、X 6524 4a DECa 
643B 4 DE 人 6525 26 。 FA 6521 BNE VDFS1 
643C 26 。 F9 6437 BNE VDPTBS 5 っ 7 BD 6581 VDPMS2 JSR GETC 
643E BF ceQ2B STX SPAADR 652A 81 3D CHFA 。。 生 = 
6441 7E 。 630 JP VDPTB1 652C 26 。 E7 6515 ENE ERRFC2 
6444 B1 52 VDPTBR CMPA 7"R 652E 1F 32 TFR U、Y 
6446 26 16 645E BNE ERRFC1 65 さ O さ 1 2 LEAY ささ 、Y 
644B BD 659C JSR GETNUN 6532 6F  C4 CLR 、U 
644B BZ ea020 STA REG6 6534 VDFMS さ EQU * 
644E BE oo00 LDX WO 65<4 ED 65B1 JSR GETC 
6451 3O 8B9 OBOO 。VDPTB6 LEAX 204B、X 6537 1 53 CMPA 
455 4 DECA 6539 26 。 Da 6515 ENE ERRFC2 
6456 26 。 F9 6451 ENE VDPTE6 653B BD 659C JSR GETNUN 
645B BF eo2D STX SPGADR 653E AZ Ao STA 、Y+ STORE SPRITE # 
645B 7E 63AO JHP VDPTB1 6540 BD 65B1 JSR GETC 
ネ 2C CHPA 寺 、 
645E 7E 9BOS ERRFC1 JHP FCERR 6545 BD 6565 JSR GETNEG 
* ネ 6548 A7 AO STA + STORE X 
* VDP BACK COLOR SET 654A BD 65B1 JSR GETC 
ネ 654D B1 2C CMPA 
6461 VDPCB EQU * 654F 26 。 C4 6515 ENE ERRFC2 
6461 BD 65B1 JSR GETC 6551 BD 6565 JSR GETNEG 
6464 25  FB 645E BCS ERRFC1 6554 A7 AO STA コ STORE Y 
6466 日 1 3D ENPA 者" 6556 eC  C4 INC 。U 
6468 26  F4 645E ENE ERRFC1 655B 7D 600 さ TsT VTEXTC 
646A BD 659C JSR EETNUM 655B 27 2 くさ 658o BEQ BETNG さ 
646D B4 OF ANDA OF 255D Ao  C4 LDA 、U 
646F F6 6021 LDB REG7 655F B1 CO9 CMPA 9 
6472 C4  FO aNDB We$FO 6561 26  D1 6534 BNE VDPMS さ 
6474 34 04 VDFCE1 PSHS BE * 65e さ 20 。 BO 6515 BRA ERRFC2 
6476 AA  EO ORR 、8+ ォ 円 
647B BZ 6021 STA REG7 6565 BD 65B1 GETNEG JSR GETC 
647B 7E 6237 JHP INTREG 656B 7F ooo8 CLR MSIN 
ネ 656B B1 2D CMPA 。 #ー 
* VDP TEXT COLOR SET 65eD 26 05 6574 BNE GETNG1 
ネ 65eF 7 さ 600B Co MSIN 
647E VDFCT EoU * 6572 20 。 Q さ 6577 BRA GETNG2 
647E BD 6581 JSR GETC * 
64B1 25 DB 645E BCS ERRFC1 6574 BD 65DB GETNG1 JSR EOCHNL 
6483 B1 <D CMPA "ニー 6577 BD 659C BETNG2 JSR GETNUN 
6485 26  D7 645E ENE ERRFC1 657Q 7D eooB TsT MSIN 
6487 BD 659C JSR GETNU 657D 27 。 oi 658o BEO GETNG さ 
64BA B4 OF ANDQ を OF 657F 40 NEGR 
648C 48 ASLA 58O さ 9 BETNG3 RTS 
648D 48 ASLA * 
64BE 4B ASLA * GET 1 CHARACTER FOR TEXT BUFFER 
648F 48 ASLA * OUT CaRRY DN CHARACTER EMPTY 
6490 F6 6021 LDE REGZ * DFF CHARACTER 
649 さ C4 OF ANDR #*OF 65B1 GETC Eou * 
6495 20 。 DD 6474 ERA VDPCB1 65B1 Be eo0 さ LDa VTEXTC TEXT COUNTER = 0O 
* 65B4 26 0< 6589 ENE GETC1 NO 
* VDF SPRITE PATTERN SET 65B6 1Q 01 SEC YES 
# 65BB さり RTS 
6497 VDFSF EoU ネ * 
6497 BD 659C JSR GETNUN 6589 GETC1 EQU * 
649Q 34 02 PSHS Aa を 6589 4 人 DECA TEXT COUNTER -1 
649C BD 65B1 JSR GETC 65BA BZ 600 さ STA VTEXTC 
649F 25 。 74 6515 ECS ERRFC2 65BD BE eoo4 LDX VTEXTP 
64A1 B1 3D CMPA "= 6590 A6 8B4 LDA 、X LOAD CHARACTE. 
6483 26 。 70 6515 BNE ERRFC2 2592 3O ol LEAX 1、X 
64A5 B6 800 マ LDA VTEXTC 6594 BF eoo4 STX VTEXTP 
64AB B1 QB CHPA #$OB 6597 B1 2o CMPRA 革 多 20 SPACE・ 
64QAQA 26 69 6515 BNE ERRFC2 6599 27  E6 6581 BEQ GETC SKIP IT 
64AC 35 04 PULS  B * 659E さ 9 RTS 
64AE BE 6e02D LDX SPGADR * 
64B1 4F VDPSP1 CLRA * 。 GET NUMBER 
64B2 58 ASLB * 
64B ス 49 ROLA 659C GETNUM EQU * 
64B4 58 ASLB 659C BD 65A6 JSR GETNUX 
64B5 49 ROLA 65gF OD 76 TsT FACMQ 
64B6 58 ASLB 65a1 26 So 65F さ BNE ERR さ 
64B7 49 ROLA 65A< 96 フフ LDA FACLO 
64EB 3O BB LEAX  D.X 55 39 RTS 
64BA 1F 10 TFR X、D ネ 
64BC 1E 8B9 EXG A。B 25A6 GETNUX ECU * 
64BE CA 40 ORB 40 65A6 BD 65CB JSR SETXTP 
64CO BD 624 JSR SREG 25Q9 BD 6581 GETNU1 JSR GETC 
64C3 BE OO0OB LDX #B 65AC 25 。 o7 65B5 BCS BETNU2 
64Co FE 6004 LpU VTEXTP 65AE BD 99a7 JSR 1SDIGC 
64C9 7E 6266 JhP STMvDP 65B1 24  F6 65A9 ECC GETNU1 
ネ 65BS BD 26 65DE BSR EnCHNL 
* VDF CHR PATTERN SET. 5B5 BE eoo4 GETNU2 LDX VIEXTP 
64CC 26 。 47 6515 BNE ERRFC2 65BB A6 8B4 LDA s 
64CE VDPCP EQU 日 5EBA さ 4 2 FPSHS Aa、X、U 
64CE BD 659C JSR GETNUN 65BC 6F  B4 CLR 、X 
64D1 さ 4 02 FPSHS Aa * 25BE BD BEBBo JSR FIN 
64D さ BD 6581 JSR GETC 65C1 さ 5 52 PULS Aa.U,X 
64D6 25 。 3D 6515 BCS ERRFC ス 65C さ a7 8B4 STA 2 
64DB B1 <D CMPA 幸三 65C5 BD 65EA JSR RECPT 
64DA 26 。 39 6515 BNE ERRFC っ 25CB 9E 76 LDX FACO 
64DC B6 6003 LDA VTEXTC 65CA さ 9 RTS 
24DF 8B1 OB CHPA W*OB * 
64E1 26 さ 2 6515 BNE ERRFC っ 65CB さ 4 1o SETXTP PSHS  X 
64E さ さ 5 04 PULS  B * 25CD 9E  D9 LDX TXxTPTR 
64E5 BE 6029 LDX FTGADR 65CF BF eooe STX VTEXPT 
64EB 7E 6e4B1 JNP VDPSP1 65D2 BE eoo4 LDX VTEXTP 
し 3 65D5 さ O 1F LEAX ー1。X 
* VDF CHRACTER DUTPUT 65D7 9F D9 STX TXTPTR 
3 65D9 さら 5 oO PULS X。PC 
64EB VDPPR EQaU ネ ネ 
64EE BD 65A6 JSR GETNUX 65DB <4 10 EOCHNL PSHS  X 
64EE さ 4 10 PSHS  X ネ 65DD 7C eoo< 1NC VTEXTC 
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リス ト 1 VDP コ ント ロー ル ・ プ ログ ラム 
65Eo BE eoo4 LDX VTEXTP 2 は Pe 
65E さ さ O 1F LEAX  -1、X 
65ES BF eoo4 STx VTEXTP 66DB 27  O1 66DB CHEMA1 
65EB 35 9o EQCRTS PULS 。X。PC 66DA 58 eps 3 Eh 
ネ 
65EA RECPT EQU * 66DB さ 9 RTS 
65EA 34 10 PSHS  X 
65EC EE eooe LDX VTEXPT 6DC GETAXS EQU さき 
65EF 9F  Dg STx TXTPTR 9 3 表 ki 0 
35 ILS ・ 
3 光 の ERR さ 財 GRR 66EO 26  D6 ね 6BB ENE ERR4 
い 66E2 9D  D2 JSR CHRBET 
ネ ジィ 3 
* 。 THE SPRITE COMMAND 266S 89 2 95 AA 
* 66E Oo 
65P6 SPRTTE EQU * 66EA BD 97 さ 2 JSR CHKCON 
65F6 27  FH 65F さ EEQ ERR さ 25 婦 人 め ER 
65FB BL 40 EMFPA 者" の ら eF 
65FA 27 48 62646 BEQ SPRITA 66F2 22  C4 eeBB BHT ERR4 
65FC BD 6221 JSR BETBYT eeF4FZ eo08 STB PY 
65FF BD 66EB JSR SETADR 6F7 B1 29 CHPA  # 
6602 BD 。 9732 JSR CHKCON eeF9 26  BD ね 6BB BNE ERR4 
6605 BI 28 CMPA WP'( 66FB さ 9 ご RTS 
6607 26 。 1C 6625 ENE SPRIT4 
6609 9D  D2 JSR CHRGET * VDP PSET CONIAND 
66OB BD 622 JSR BETBYT ze aa 
に 5 2 3 に 委 は 人 66FC BD DE 66DC BSR BETAXS GET PX、FY 
- ュ TB 66FE 9D  D2 SR 。 CHRGET 
き っ GETEY 
6616 g7 4 BTB BRfsWuU 6700 27 。 1 671C BE ロ VDPPS1 
6618 BI 29 EMPA WO 6702 BD 9732 SR CHKCON 
6e1A 26  D7 65FS BNE ERR ユ 6705 BD 6221 JSR PID 
661C 9D  D2 JSR CHRGET 6708 Bo6 6O0B NO Cp 
661E 27 20 6640 BEQ SPRIT9 97oE 84 OF Ni 
6620 BD 9732 JSR CHECDN 7OD 58 ASLB 
6623 27 。 1B ee40 BEQ SPRIT9 220E 記 人 
* 
6625 SPRIT4 EQU * ネ 2 に 1 2 sr S 
ら 6625 B1 2C CMPA し. 
6627 27 09 6632 BEO SPRIT5 671 さ ER  EO ORB 8+ 
6629 BD 6221 JSR GETBYT 93 4 0 8 ES 
662C E7 42 ST PATNUN。【 
662E 9D DB Da CHRGOT 671A 26 9C 66BB BNE ERR4 
263O 27  oE 6640 BEQ SPRIT9 671C BD 67FZ VDPPS1 JSR CALBAS CALC BASE ADDRES 
66 さ 2 BD 9732 SFPRIT5 JSR CHCON 671F BD 6B2C JSR BITSHT 
6635 27 。 og 6640 BEG SPRIT9 6722 さ 4 02 VDPPS2 PSHS Aa * ネ 
69 さ 7 BD 6221 JSR GETBYT 6724 FC 6029 Lpp PTGADR 
663A EZ7 4 さ STB SFPR.CL、U 6727 ささ BB LEAU  D,X 
663C 9D DB JSR CHRGOT 4 ER 2 
663E 26 BS 65F さ ENE ERR さ > 
6640 SFRIT9 EQU * 672D BD 6e24a JSR SREG 
6940 BE ooo4 LDX 4 673O Bo  FD2E LDA VDATa 
664 さ 7E 6266 JHP SThVDP 673 さ AA  EO ORA 8+ 3 
* 6735 さ 4 Oo2 PSHS Aa * 
* BPRITES 6737 FC 6029 LDD FTGADR 
* 673A 33 BB LEAU DX 
6646 9D  D2 SFRITA_ JSR CHRGET 673C IF <O TFR U。D 
664 昌 27 。 9 65F3 BED ERR っ 673E 1E  Bg EXG A、B 
694 BD 6221 JSR GETBYT 674O CA 40 ORE 40 
664D CE 6oaF LpU #HSTAB 6742 BD 624A JSR SREG 
6650 5D TSTB 6745 S5 Oo2 PULS Aa * 
2651 27 。 oe 6a659 BEO SPRTO2 6747 BZ  FD2E STA VDaTa 
665 さ ささ CB 1B SFRIO1 LEAU 27.U * 
6e5o 5A DECB 874A FC 6027 LDD COLADR 
6657 26 FaA 665< ENE SPRTO1 674D ささ BB LEAU  D,X 
6659 SPRIo2 ECU # 274F 1F <o TFR Up 
6659 BD 。 9732 JSR CHKCON (92 1E の は 908。 
665C B1 28 CMPA 。 #"( BD 62 JSR | 
665E 26 58 66BB ENE ERR4 6756 B6  FD2E LDA VDATA 
6660 9D  D2 JSR CHRGBET 2 84 9 QNO 9E 
6662 BD 6221 JSR GETEYT =4 2 SHS * 
6965 E7 42 STB HSPR. X。U 875D B6 6oOB LDA CL GET COLr.、 
6667 BD 9732 JSR CHKCON 6760 84  FO RaNDA 。 #$FO 
66A BD 6221 JSR GETBYT 2 96 9 RG お 
666D E7 41 STE ISPR. Y、U 
666F BI 29 CMPA WP) 6766 FC 6027 LpD COLADR 
6671 26 45 66BB BNE ERR4 6769 ささ BB LEAU  D.X 
667 さ 9D  D2 JSR CHRGET 676B 1F <o TFR UD 
6975 26 。 41 66BB ENE ERR4 676D 1E 89 EXG AB 
6677 A6  C4 LDA NSPR.N、U 676F CA 40 ORB 40 
6679 1F 1 TFR U、X 8771 BD 624 JSR SREG 
667BR 30 OS LEAX さ 、X 6774 くき 本 PULS Aa ネ 
667D さ 4 02 SPRIO さ PSHS Aa 6776 BZ =D2E STA VDaTa 
667F BD eo6BA JSR AXISCL 6779 さ 9 RTS 
6682 35  o2 FULS Aa * 
6684 30 0 さ LEAX さ 。X * VDP PRESET COMMAND 
6986 4A DECA 日 
6687 26  F4 667D BNE SPRIO< 677^a VDPPRE EQU * 
2689 さり RTS 677A BD 66DC JSR GETAXS GET PX。FY 
日 677D 9D  D2 JSR CHRGET 
668A 34 SO AXISCL PSHS 。X、U 677F 27 1 6799 EEQ VDPFR1 
66BC E6 84 LDE MS.N、X 6781 BD 。 9732 JSR CHKCON 
66BE BD 66BB JSR SETADR 6784 BD 6221 JSR GETBYT 
g691 1F 32 TFR U。Y 6787 Bo6 60QOB LDA CL 
6693 35 50 PULS X。U 67BQ 84 Fo ANDA 共 $FO 
6995 E6 0Q2 LDE PS. X、X 678C 34 Oo2 PSHS Aa 
6697 BD 3 66Dp< BSR CHKHAG 678E EA Eo ORB 、S+ 
9699 EB 42 DDR NSPR.X、U 92 F7 eooB STE CL 
669B E7 っ STE SPR. XY 679 さ 9D DB JSR CHRGDT 
669D E6  Q1 LDB MS.Y、X 6795 1026 FF1F 66EB LENE ERR4 
669F BD 32 26D< BSR CHKMG 6799 BD 5C 67F7 VDPPR1 BSR CRLERS CALC BASE ADDRES 
66Q1 ER 41 ADDE NSFR.Y、U 679B BD oe82C JSR BITSHT 
6683 E7  a4 STB SPR.Y、Y 25P 3 o2 Mk Aa 
ら 6655 さ 4 5o PSHS U。X に 】 さ 4 FSHS キキ 
667 1F 2 る TFR Y、U 67A1 FC 6029 LDD PTGADR 
66A9 BE OoO4 LDX 4 6784 ささ BB LEAU  D、X 
66aC BD 6266 JSR STNvDP Z0 6 
6aF 35 Do PULS 。X、U。FPC 1 B XG に 
3 67AQ BD 624Aa JSR SREG 
66B1 9E  D9 DECTXT LDX TXTPTR 67aD Bo  FD2E LDa VDaTa 
66BS 30 1F LEAX 1、X 67EO A4 Eo ANDA 。 、S+ ネ 
66B5 9F  D9 STX TXTPTR 67B2 さ 4 oO2 PSHS Aa ネ 
66B7 39 RTS 67B4 FC 6o29 LDD FTGADR 
66BB 7E 9BO さ ERR4 JWP FCERR 67B7 ささ BB LEAU  D.X 
内 67B9 1F so TFR U.D 
66BB CE 602F SETADR LDU WSPRTAB 67BB 1E 8B9 EXG AB 
66BE BE 602B LDX SPAADR 67BD CA 40 9 40 
66C1 4F CLRA 67BF BD 。 624 SR SREG 
66C2 58 ASLB 67C2 35 Oo2 PULS Aa ネ 
66C3 49 ROLA 67C4 BZ  FD2E STA VDaTa 
oeC4 58 ASLB ネ 
66C5 49 ROLA ら 7C7 FC 602Z LDD COLADR 
66C6 さ 3 CB LEaU DU 627CA ささ BB LEAU DX 
26CB 3O BB LEAX  D.X 67CC 1F <o TFR 09 
6eCA 1F 1o TFR X、D 67CE 1E 8Bg EXG Aa 
6CC 1E 8B9 EXG A、B 67DO BD 624A JSR SREG 
6eCE Ca 40 ORE る 40 670 さ Bo  FD2E LDA VDaTA 
26DO 7E 624A JhP SREG 67D6 84 Fo ANDA 間 $FO 
を 67DB さ 4  o2 PSHS Aa ネ 
6D< CHKMAG EQU を 67DA Bo eooB LDA CL GET COLOR 
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リス ト 1 VDP コ ント ロー ル ・ プ ログ ラム 
67DD 8B4 OF RNDa 菩 和 も OF 689F CA 40 ORB 昔 和 40 
67DF AA  EO ORA ・S+ # 6BA1 BD 624A JSR SREG 
67E1 34 02 FPSHS Aa * BA4 さ 5 02 PULS Aa * ネ 
67E さ FC 6027 LDD COLADR SBA6 BE 18oo LDX 204 昌 * さ 
67E6 ささ BE LEAU DX BA9 BD 6251 JSR STCVDP 
67EB 1F 30 TFR U.D 6BAC BD 9732 JSR CHKCQN 
67EA 1E 8B9 EXG Aa、H 6BAF BD 622 JSR GETBYT 
67EC CA 40 DRB 40 6BB2 34  O4 PSHS  B ネ 
67EE BD 624A JSR SREG 6BB4 FC 602Z LDD COLADR 
67F1 35 02 PULS Aa * 6BB7 1E 89 EXG A.B 
67FS BZ  FD2E STa VDaTA 6BB9 CA 4o ORB 40 
67F6 39 RTS 6BBB BD 624A JSR SREG 

6BBE さく 5 02 PULS に 1 を 

67FZ CALBAS EOU * 68CO BE 18oo LDX #204 昌 # さ 
67F7 BD 4D 6846 BSR CALNAN 68BCS BD 6251 JSR STCVDP 
67F9 1F 10 TFR X.D 6BC6 FC 6025 LDD PATADR 
67FB 1E 89 EXG AB 6BC9 1E 89 EXG AB 
67FD BD 624Aa JSR SREG 6BCB CA 40 ORB 40 
6BOO F6  FD2E LDB VDATA 6BCD BD 624A JSR SREG 
6B0 さ 34 0O4 PSHS BE * 6BDO Ce 03 LDB # さ 

* 6BD2 4F CLRA 
eBo5 BE oooo LDX #O 6BDS BZ  FD2E VDPCL1 STA VDaTa 
6BoB Fo 60OA LDB Py Brg=FY\ ら 4 8D6 4C INCA 
BOB 54 LSRE 6BD7 26  FA 6BD さ BNE VDPCL1 
6BoC 54 LSRE 6BD9 5a DECB 
6BOD 54 LSRB 2BDA 26  F7 6BDS BNE VDPCL1 
6BoE 54 LSRB 6BDC 9D DB JSR CHRGOT 
6BOF 54 LSRE 2BDE 2 っ 6  B2 6892 BNE ERRFC9 
6B10 54 LSRE 6BEO さ 9 RTS 
6B11 27 Oo7 681A BEQ CALBA ス 円 
6B1 さ さ O  B9 OBOO CALBA1 LEAX 2048。X * VDP LINE COMHAND 
6B17 5a DECB * VDPLINE(X1、Y1) 一 (X2。Y2) 
6B1B.26  F9 6B1 さ BNE CALBA1 6BE1 VDPLIN EQU 円 

6818 CALBA2 EQU 日 6BE1 7F eo18 CLR FUNC 
6B1A 35 04 PULS  B * 6BE4 9D DB JSR CHRGOT 
6B1C 4F CLRA Drq=Drg*B 6BE6 B1 28 CHPA 
6B1D 5B SLB 6BEB 26 OoD 6BFZ BNE VDPLr 
6B1E 49 ROLA 6BEA BD 66DC JSR GETAXS 
6B1F 5B ASLB 6BED FC 6009 LDD FX 
6B20 49 ROLA 6BFO FD eo0C STD X1 
6B21 58 ASLB 6BF さ 9D 2 JSR CHRGET 
6B22 49 ROLA 6BF5 27 9B 6892 BEQ ERRFC9 
6B2 さ さ O BB LEAX  D,X 6BFZ VDPLI1 EQU * 

ネ 6BF7 B1 DA CHPA DA 
eB25 Fe eo0A LDE PY 6BF9 26 97 6B92 BNE ERRFCg 
6B2B BD 10 68 さ 3 BSR HODB 6BFBE FC 6009 LDD PX 
682A 3A ABX 6BFE FD eooC STD X1 
6B2B 3 の RTS 69O1 9D  D2 JSR CHRGET 

* 690 さ BD eo6DC JSR BETAXS 
6B2C F6 6009 BITSHT LDR FX 6906 FC eo09 LDDp FX 
6B2F B6 BoO LDA BC 6909 FD eoOE STD X2 
6B さ 1 BD 07 6BSA BSR HODB 290C 9D  D2 JSR CHRGET 
6BS3 27 Oo4 6BS9 BEQ BITSH っ 690E 27 49 6959 BEQ VDPLI9 
6835 44 BITSH1 LSRA 6910 BD 9732 JSR CHKCON 
6B36 5A DECB 6913 1 2C CHPA WW 、 
6B さ 7 26 FC 6835 BNE BITSH1 6915 27  OA 6921 BEO VDPLI っ 
683 さ 9 さ 9 BITSH2 RTS 6917 BD ce22 JSR GETBYT 

* 691A FZ 6014 STB PRSFLG 

6B3A MODB EQU * 691D 9D  D8 JSR CHRGOT 
6B3A 34 04 FSHS BE 691F 27 3B 6959 BEO VDPLI9 
6B3C 54 LSRB Brg=Ber'\B 6921 BD 9732 VDFLI2 JSR CHKCON 
6B3D 54 LSRB 6924 B1 2C CHPA 
6BSE 54 LSRE 6926 27 20 694 BEQ VDPLI5 

* 292B BD 6221 JSR GETBYT 
6B3F 5B ASLB Brq=Brg* 日 692B Be 60OB LDA CL 
6B40 58 ASLE 292E 7D eo14 TST FRSFLG 
6B41 5B ASLBE 69 さ 1 26 。 OB 693B BNE VDPLI さ 
6B42 5 NEGE Brg=Beq-(Beq\8) * 昌 69 さ 3 84 OF ANDA WOF 
6B4 く ER  EO ADDE  、5+ 6935 58 ASLB 
6B45 39 RTS 6936 5B ASLB 

* 69 さ 7 5 ASLB 

68B46 CALNAM EQU 4 693B 58 ASLE 
6B46 BE 6025 LDX FATADR 6939 2O oO2 eo93D BRA VDPLI4 
6B49 F6 600A LDB FY 69sB B4  FO VDPLIS ANDA WWFO 
6B4C 54 LSRB Brg=PY\8 2693D <4 02 VDPLI4 PSHS Aa 
6B4D 54 LSRB 693sF EA  EO ORB 8+ 
6B4E 54 LSRB 6941 F7 6OOB STB CL 
6B4F B6 20 LDA 革 さ っ 6944 9D DB JSR CHRGOT 
6B51 <D MUL 2946 27 11 6959 BEQ VDPL19 
6B52 =O BB LEAX  D.X 6948 BD 97= っ VDFLI5 JSR CHKCON 
6B54 F6 6009 LDE PX 694B 27  oC 6959 BEQ VDPLI9 
6B57 54 LSRB Beq=PX\8 294D BD ec221 JSR GETBYT 
6BSB 54 LSRB 6950 F7 eo18 STB FUNC 
6859 54 LSRB 695 さ 9D DB JSR CHRGOT 
6BSA さ A ABX 6955 1026 FF さ 9 6892 LBNE ERRFC9 
6BSE 39 RTS 2959 BD 。O1 695C VDPLI9 BSR LINES 

* 695B さ 9 RTS 

* VDP PRESET COLOR SET 

* * LINES 

685C VDFCR EQU * 
6BSC BD 6581 JSR GETC 695C LINES EQOU * 
6B5F 25 31  eB92 ECS ERRFC9 sg5C Fe eo18 LDB FUNC 
6B61 B1 3D CMFA 。 境 "= 695F 27 25 6986 BEO LINE 
6B6 さ 26 2D 6892 BNE ERRFC9 6961 BnxFUL EoU 円 
6B65 BD 659C JSR GETNUN 2961 F6 eoOF LDB Y2 
6B6B B4 OF ANDA OF ee4 Be eooD LDA Y1 
6B6Q F6 600B LDB CL 967 BI 600F CHPA  Y2 
68B6D C4  FO ANDB #*FO 696R 27 。 1 6986 BEO LINE 
6BeF さ 4 Co4 VDPCR1 PSHS  B * 696C 25 。 02 6970 BCS BOXFU1 
6871 AA EQ ORA B+ * 296E 1E 8B9 EXG AB 
6B7 さ BZ 600B STa CL 6970 FZ7 6019 BOXFU1 STB LBOX1 
6876 7E 6237 JPMP INTREG 997 さ さ 4 02 BOXFU2 PSHS 

* 975 BZ eoOoD STA Yi 

* VDP PSET COLOR SET 697B BZ 60OF STA Y2 

3 697B BD 09 6986 BSR し INE 

6879 VDPCS EQU 日 697D 35 02 PULS 。 a 
6879 BD 6581 JSR GETC 697F 4C INCA 
6B7C 25 14 6B92 BCS ERRFC ウ 6980 B1 eo19 CHPA LEOX1 
6B7E B1 3D CMPA 。 W" ニ 698 さ 26 EE 697 さ BNE BOXFU っ 
6BBO 26 10 6892 BNE ERRFC ウ 6985 さ マ RTS 
6882 BD 659C JSR BETNUN 由 
6B85 84 OF ANDA OF * LINE 
6BB7 4 ASLA 日 
6BBB 48 ASLA 6986 F6 eoOC LINE  LDB x 
68B89 4 ASLA 6989 4F CLRA 
6B8A 48 ASLA e98A 7F eolo CLR SX 
6BBB F6 600B LDB CL 298D さ 4 oo PSHS  D 
6BBE C4  QF RNDB  。 W*OF 69BF F6 eoOOE LDB X っ 
6B9O 20 DD 686F ERA VDPCR1 6992 AS  E1 SUBD 。 ,S++ 

3 6994 27 。 oBR 69A1 BEQ LINE2 
6B92 7E 9B0 さ ERRFC9 JHP FCERR 2996 20 oo 699E BPL LINE1 

3 699 5O NEGE 

* VDP CLS 6999 7A 6010 DEC SX 

を 699C 20 Oo 69A1 ERA LINE2 

6B95 VDPCLS EQU * ネ 699E 7C eo1o LINE1 INC SX 
6B95 BD 6221 JSR GETBYT 2691 F フ eo12 LTNE2 STB DX DX=X2ーX1 
6B9B さ 4  O4 PSHS ネ 29a4 FZ 6015 STB LP LaoP COUNT 
BA FC 2029 LDD PTGADR 69A7 Fo eooD LDB Yi 
689D 1E 89 EXG A、B 69aA "4F CLRA 
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リス ト 1 VDP コ ント ロー ル ・ プ ログ ラム 
69AB 7F 6011 CLR sy 6a62 B6 600C LDA X1 
69AE さ 4 06 PSHS  D 6A65 BZ 60OE STa X2 
69BO F6 600F LDBE Y っ 6A6B F7 600C STB X 
69BS AS  E1 SUBD .S++ 6a6B F7 6009 STB PX 
69BS 27 OB 69C2 EEQ LINE4 QA6E BD 6846 HSLIN1 JSR CALNAM 
69B7 2Q 06 69BF BPL LINES 6871 さ 4 10 PSHS  X 
69B9 50 NEGB 6A73 F6 600E LDB X2 
69BA 7 6011 DEC Sy 6Q76 F7 6009 STE PX 
69BD 20 03 69C2 BRA LINE4 6Q79 BD 6846 JSR CALNAN 
69BF 7C eo11 LINE さ INC sy 6a7C 1F 10 TFR X.D 
69C2 F7 eo1 さ LINE4 STB py DY=Y っ -Y1 67E 3  E1 SUBD 31+ 
69C5 FC eooC Lpp X1 SBO SA DECB 
29CB FD coo9 STD PX 6AB1 F7 60o12 STE DX 
29CB 7D 。 6olio TsT SX 8B4 F6 600 ヒ LDB X 
69CE 27 。 さ F 6aOF BEQ 。 VLINE ABZ F7 4009 8 ( 
9D0 7D 2o11 TsT sy 6aBA BD 67FZ JSR CALBAS 
29Ds 27 。 4B 6a20 BEQ HLTNE 6QBD BD 4E 6ADD BSR PXPODB 
69D5 CE oooo LDD Pe 6QBF 26 。 0O3 ea94 BNE HSLIN2 
e9DB FD eolo STD LY 6691 4F PER 
69DB BD 70 6a4D LINESO BSR DOLINE 26692 20 OB 689C BRA BR 
69DD F6 6o1S LDB DY 6894 B6 BoO HSLIN2 LDA #*BO 
29EO 4F ELRA 6a96 20 。 QO1 6 人 99 BRA HSLTO マ 
69EI F3 。 eo16 ADDD 。 LY 6 44 HSLTN3 LSRA 
69E4 FD eo16 STD LY LY=LY+DY 699 5A HSLIO3 DECB 
69E7 F6 6012 LINES1 LDBE Dx Deg=DX 289A 26 。 FC 2o898 BNE HSLINS 
29EA 4F CLRA ea9C 4A HSLIN4 DECA 
69EB 34 oe PSHS  p 6A9D BD ささ AD2 BSR HSLINS 
29ED FC eo16 LDD 民 め SF 7D 6012 TST DX 
69FO AS  E1 SUBD 、S++ Deg=LY-DX 6AA2 27 16 6ABA BEQ HSLINo 
69F2 25  QO9 ea9FD BCS LINES2 も 
69F4 FD eolg STD LY eaA4 F6 6009 HSLIN5 LDB PX 
69F7 BD 47 ea4QO BSR INCPY ea7 4F CLRA 
69F9 BD 52 ea4D BSR DOLINE SaAB C さ OOOB ADDD  WB 
69FB 20  EA 69EZ BRA LINES1 6QAB F7 6009 STB FX 
* 6AAE BD 67FZ JSR CALBAS 
69FD 26 og 60O7 LINES2 BNE LINES ぅ 6QB1 6 FF LDA 草 ま FF 
69FF CC oooo LDD #O 6aBS BD 1D 6aD2 BSR HSLTNS 
6A02 FD eo1o STD LY 6AB5 7A 6012 DEC Dx 
6AO5 BD 39 6a4Q BSR INCPY ABB 26  EA 6aA4 BNE HSLIN5 
6QO7 BD 2 6a33 LINES さ BSR INCPX ネ 
6A09 7A 6015 DEC LP 6aBA F6 200E HSLIN6 LDB X2 
6QOC 26 CD 69DB BNE LINESO eaBD F7 6009 STB PX 
6AOE 39 RTS 6ACO BD 67FZ JSR CALBAS 
* 6ACS B6 BoO LDA W$BO 
*。 VLINE 6AC5 BD 16 6aDD BSR FXHODB 
内 GaC7 27 0O6 6RCF BEQ HSLIN9 
6AOF VLINE EoU * eaC9 1 0O1 HSLIN7 SEC 
6aOF BD さ C ea4D BSR DOLINE SACB 46 RORA 
6A11 7D eo1 さ TsT py SaCC 5A HSLTNB DECB 
614 27 。 O9 aa1F BEQ VLINE2 SQCD 26 。 FA eaC5 BNE HSLINZ 
6Q16 BD 2B 640 VLINE1 BSR INCPY ACF BD 。 O1 6aD2 HSLIN9 BSR HSLINS 
AIB BD ささ  eA4D BSR DOLINE 6AD1 39 RTS 
6A1A 7A ao01 さ DEC pyY 日 
6QID 26 。 F7 6A16 BNE VLINE1 6D2 7D eo14 HSLTNS TST PRSFLG 
61F さ 9 VLINE2 RTS 6AD5 26 。 OS 6ADA BNE HSLINR 
* AD7 7E 6722 JHP VDPPS2 
* HLINE 6DA HSLINR EQU * 
* DA 7E 679E JMP VDPPR2 
ea20 HLINE EQU * ネ 
6A20 F6 6012 LDB Dx 6aDD Fe eoo9 PXHODB LDB PX 
6023 ビ 1 0 フ 7 CMPB  W フ AEO 7E 6BSA JP HODB 
6Q25 22 31 ea5B BHr HSLTNE * 
6A27 BD 24 ea4D BSR DOLINE * VDP COHMAND TABLE 
6A29 BD OB 6a33 HLINE1 BSR INCPX ネ 
6A2B BD 20 6a4D BSR DOLINE 6QE さ VDPCMT EQU * 
6Q2D 7A eo12 DEC DX NE さ 47 FCC 7GM/ 
6Q3O 26  F フ 7 eaA29 BNE HLINE1 RE 4D 
6 さ 2 さ 9 RTS 6AE5 6 さ 28 FDB VDPGN 
日 6AEZ 54 FCC /TB/ 
6ASs 7D eo1o INCPX TST SX 6REB 42 
636 2A 04 63C BPL INCPX1 6E9 6397 FDB VDPTB 
6QSB 7A 6009 DEC PX 6AEB 4 さ FCC 7CT/ 
6QSB さ 9 RTS 6aEC 54 
6A3C 7C 6009 INCPX1 INC PX 6aED 647E FDB VDPCT 
6R3F さ 9 RTS 6EF 4 さ FCC /CB/ 
日 6aFO 42 
40 7D eoi1 INCPY TST sy 6RF1 6461 FDB VDPCB 
64 さ 2A 04 6 人 49 BPL INCPY1 6RF さ 5 ミ FCC /SP/ 
6Q45 7A 600A DEC PY 6RF4 5o 
6A4B さ 9 RTS 6QF5 6497 FDB VDPSP 
6A49 7C  a0OA TNCPY1 INC PY 6AFZ 4 さ FCC 7CP/ 
6Q4C 39 RTS 6AFB 5o 
日 6AF9 64CE FDB VDPCP 
* DO LINE POINT 6aFB 5o FCC /PR/ 
由 6RFC 2 
6Q4D 7D eo14 DOLINE TST PRSFLG 6AFD 64EB FDB VDPPR 
6Q5O 26 03 655 BNE DOLIN2 GAFF 4D FCC ZS/ 
6A52 7E 671C JHP VDPPS1 6B0O トト 1 
円 6BO1 6518 FDB VDPNSP 
6a55 7E 6799 DOLIN2 JMP VDPPR1 6BO さ 4 さ FCC 7C8/ 
6BO4 5 
* HISPEED HLINE 6BO5 6879 FDB VDPCS 
ネ 6BO7 4 さ FCC ZCR/ 
65B HSLINE EQU * 6BOB 52 
ea5B F6 010 LDB BX 6BO9 6B5C FDB VDPCR 
6Q5B C1  FF CHPB W$FF 6BOB oo FCB o 
6Q5D 26 OF 6A6E BNE HSLIN1 
6A5F F6 6O0E LDB X2 END 
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CLEAR 。&H5FFF:LDADM"FJVDF" 。 。R 
人 = さ 。 14159/ 16: 全 1= ロ / さ : 2 ニ 人 KS: 介さ =S1 。 
VDP"CB=14" 
VDF'"BM=M18 さ ":VDPCLSO。&HZO0: FRT=5OTH160:VDPLTNE (160-T 。 エ +10) 一 (94+T。 エ +10) 、0。s NE 


VDPL INE (1 1 1 、61 ) (14 さ 。61 ) 。 1 。15 
VDPLINE (14 さ 。61) 一 (250。168) 。1 14 
VDFLINE (12B。61) 一 (12 昌 。16 日 ) 。1.14 
VDFLTNE( 111 61 ) 一 ( 品 。168) 1。14 
VDPL INE ( 呈 。 16 ヨ ) -(25O。 1 6 日) 。 1 14 
VDFL INE (160-4 。 10+ ヨ 6) (94+B6。 10+ 晶 6) 。O。15 


VDFL INE (160- 昌 4 。 日 6) - (94+B6。 晶 6) 。O。 1 王 
VDFL INE (76。B6) (76。96) 。O。 1 
VDPL INE(1 ヨ 0。6) (18O。96) 、O。155 


VDP "SF 日 








+CHR 和 (HOF ) + ビ HR 和 も (日 さ F ) + ビ HR 呈 (H フ F ) +CHR 和 も ( &zH フ F ) + じ HR ま (SHFF ) +CHR ま (SHFF ) 
CHR ま (SHFF ) +CHR 証 (SHFF ) 


15O_VDF "SFP ワウ ="+CHR ま (8&HFF ) + じ HR$ も ( 4HFF ) + ビ HR 呈 (8HFF ) +CHR ま (SHFF ) + ビ HR 和 ま (%HFF ) +CHR 第 (HEE ) 
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リス ト 3 デモ プロ グラ ム 





CHR*(&HC6) +CHR も (HB 人) 

16O_VDPF "SF'1Q=" リ +CHR ま (SHFO) +CHR 和 ま (SzHFC) + ビ HR 和 ま (SHFE ) +CHR 和 ま (SHFE ) +CHR 和 (SHFF ) +EHR も (&HFF ) 
+CHR ま (SHFF ) +CHR ま (SHFF ) 

170_VDF "SF 1 1= リ +CHR も (SHFF ) +CHR 生 (SHFF ) +CHR 生 (HFF ) +CHR 和 まま (SHFF ) +CHR 呈 (&HFF ) +CHR ま (SH アフ ) 
+CHR( 員 H6 さ ) +CHR ま (日 41 ) 

180 _VDF "SF4= リ +CHR も (HOO) +CHR ま (HOO) +CHR も (HOO ) +EHR も (HOO ) +CHR ま (8H る 1 ) +CHR 生 ( 史 昌 7H) 
CHR$ も (HZBH) +CHR ま (計時 1 ) 

19Q0 VDF "SF= リ +EHR 生 ( 多 HOO) +CHR も (HOO) +CHR ま (HOO ) +CHR ま (HOO ) +CHR ま (HOO ) +CHR (HOO ) キ 
CHR も (HOO ) +EHR も (HOO ) 

SQOO_VDF "SFP6= リ + ビ HR ま (HOO) +CHR 和 も (HOO) +EHR 征 ( 多 HOO) +CHR 生 (HOO ) +CHR 和 (HBO ) +CHR ま (HECO ) + 
CHR* ま (%HCO ) +CHR ま (HBO ) 

210 VDF "SF アニ テリ"+CHR ま (HOO) +CEHR 和 も (HOO) +EHR 呈 (HOO) +CHR ま (SHOO) +CEHR (HOO) +CHR 和 も (HOO ) 
CHR ま (SHOO) +CHR ま (HOO ) 

SEO _VDPF "SFO= リ +CHR 和 まま (&HOO) +EHR 和 まま (HOO) +CHR ま (SHOO) +CHR 和 まま (SHOO ) + じ HR 和 も (HOO ) + じ HR 邊 (SH6 さ ) 二 
CHR*$(%&H6 さ 3) +CHR ま (HOO ) 

< さ O_VDF "SFP1= リ +CHR 和 (HOO) +CHR 員 (HOO) TEHR も (HOO) +CHR 和 ま (HOO) +EHR 生 (HOO ) +CHR も (HOO ) 
CHR も (SHOO) +CHR 和 まま (HOO ) 

40 VDF SFS= リ + ォ CHR 和 (HOO) +CHR も (HOO) +CEHR も (HOO) +CEHR 生 (SHOO) +CHR 和 も (HOO ) +CHR 征 (HOO ) 
CHR ま (HOO) +CHR ま (HOO) 

25O_VDF "SF ヨコ = ニ リ +CHR ま (HOO) +EHR 和 も (HOO) +CHR ま ( 銘 HO0) +CHR 和 も (HOO) +CHR 生 (HOO ) +CHR ま (HOO ) 
CHR ま ( 叶 HOO) +CHR ま (HOO ) 

2S60 SGPRTTES。 (040) . 日 。4 

2720 SPRYTTE1。 (100. の ) 。 4。 1 紀 

2BO_ SFRTTEO』。 (1O0 9 よ 

GPR TTE き 。 (0。O) 。 日 。 日 

SPRITE4。 (10049) 。 4。1 

SFRTITE さ 。 (100。0) 。0。1 

SFRTITEB。 (049) 。。10 

1 SFPRITE7。 (10049) 。 4。 1 

さ 40 SFRTTE6。 (100。0) 。9。 1 

さ 50_ SFPRITE9』。(100。%&HDO) 。 0。 1 

さ 60 VDF "MSGO=S0。0。081.0.0SS。 04。O" 

さ 7Q _VDFP "MS1=S さ 。O。084.。04。085.。0.07 

3 VDF "MSS=S6。0。087.0.08 ヨ 8。049" 

390 FR X=OTO2G5 

4400 X1mSTN(R1KX)※ ポ 100 

410 XS3=SIN(ASEKX)*100 

42O_ X4=STN(A ス XX) 100 

430 X2=COUS (人 ※X+ 日 ) 70 

440 IF X MOD 16 : ヨ THEN VDP"MSO=SO。O。O B1.0。O SS2。O4。O" ELSE VDF "MSQO=SQO。0.751。0. 5 

















PFUO YR 9 

450 IF X MOD 16 > THEN VDF "MGS1=S さ 。O。O SG4.04。O0 S5。O。9" ELSE VDP "MG1=S3。0。784。0。 5 
品 。O。O" 

460 IF X MOD 32 16 THEN VDP "MS2=S6.0。0 BZ7.0.0 S ヨ 8.0.9" ELSE VDP "MS2=S6。0。7587。 9 
8 ヨコ.0.0" 


470 IF X MOD 64 2 THEN VDF "BNM=S2" ELSE VDF "GM=S さ リ 
480_ SFRITE》O』(X4+110480+XS/10) 

490 SGFRTTE91 。 (XS+110。140+X1 / 己 ) 

500_ SFRITE9S。(X さ +110.2O+X1/ 己 ) 

510 NEXTi BE=RND※10: GUTUSO 

















$6F1B か ら の 2 バイト を F1. 7D に すれ ば FM-7 で も 動き ま 
2dot SCROOL は 
圏 JG3ECZ 2dot SCROOL 


FM-8 の 画面 スク ロー ル は オフ セッ ト ア ドレ ス を 変更 する の は 
こと に よっ て メモ リ 転 送 せ ず に ハー ド 的 に 行なっ て いま す . eFIo co 1 o0 OB so BD oo G5 
これ を うま く 使 えば , 計算 上 2 ドッ ト の スク ロー ル が 可能 に 2P3O 93 Ds po 34 27 7D 4 09 





な り ま す 6F4O BE さ EE C4 Q2 2 
り 6F5O_ 60 01 27 19 
USR 関 数 の 整数 型 引数 に より , 次 の 機能 に 分 か れ ま す . ら F6O EE 人 9 40 0O 
_ SF7ZO 10 a9 Bo oo 
OwaISS 6FBO F さ 0 5 OO AO 66 
6FO_O1 





・ 変 化 な し 
た だ し , 表 穫 人 失 み ビタ ル の 移動 な ど に より , キャ ラジ アダ 用 DE SRO&31SE6G 
バッ ファ ・ メ モリ の 廊 字 が 再び 表 わ れ ます . 100 回 繰り 返す こ 2O FnR TI=O TO 1ooo 
と で , 画面 クリ ア , また は 一 周 し ます . ER 
な が おぶ パロ グラ 必 ば は ポジ デシ ョ ン ・ イ ン デ ィ マ ペン デン 上 です. 
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サ プ シ ステ ム の 使い 方 , BIOS の 使い 方 が わか る に つれ , 
高速 ゲー ム も いく つか 発表 され まし た . し か し , FM- 8 の 
キー 入力 は 一 番 最 後に 押さ れ た キー の 内 容 が いつ まで も 残 
り , いま の と ころ ソフ ト で キャ ン セ ル す る こと は で きま せ 
ん . この こと は ゲー ム で は 致命 傷 と な り , 手 を は な し て も 
ビー ム 砲 な ど が か っ て に 移動 し て し まい ます . そこ で , 誰 
で も 簡単 に で きる わずか な 改造 で リア ル タ イ ム の キー スキ 
ャ ン を 可能 に し た の て 発表 し ます . 





FM-8 の キー は まず MB8841 と いう 4 ビッ ト の キー ボー 
ド 専 用 マイ コン に 読み と られ , PF キー を 含む ほとん どの 
キー を ASCII コー ド に 直し て 出力 側 に 送り ます . つぎ に 
この マイ コン が パル ス を 送り , サブ CPU に FIRQ を か け , 
入力 が あっ た こと を 知ら せま す . そし て サブ ・ モ ニタ が $ 
D401 (アド レス は サブ CPU 側 ) を READ す る と トラ イ ・ ス 
テー ト ・ バ ッ フ ァ が ON に な り デ ー タ ・ バ ス に 乗り ます 
つま り , トラ イ ・ ス テー ト が OFF の 状態 で も その 直前 まで 
は デー タ が 出力 され た まま に な っ て お り , これ が 誤動作 の 
原因 に な っ て いま し た . 

リピ ー ト は , FIRQ を か ける パル ス の 長 さ を 操作 すれ ば 
よく , 初め の 入力 が あっ て か ら 約 0.4 秒 お いて な お 同じ キ 
ー が 入力 され 続け て いれ ば , その 後 断 続 的 に パル ス を 送り 
出し て いま す . だ か ら こ の パル ス を 操作 し な いと , 最初 の 
入力 が あっ て か ら ワ ンス テッ プ お いて し まう た め ゲ ー ム で 
は と て も 実用 に は な り ま せん . 

この パル ス の 間隔 は MB8841 に プロ グラ ム さ れ て いる の 
で , 書き 変え る こと は まず 不可 能 で す . そこ で この パル ス 
を 操作 する 回 路 を TT エ で 組み まし た が , 回 路 が 複雑 に な 
っ て し まい , パターン ・ カ ッ ト も 必要 な の で 没 . 号機 。 
3 号機 を 作っ て いく うち あき ら め よ うか と も 思い まし た . 

そん な ある 日 , つい に 非常 に 簡単 な 方 法 を みつ け ま し た -. 
アナ ログ ・ ポ ー ト が 大 き な 口 を あけ て 寝 て いる の で , これ 
を 使わ な い 手 は な いと きっ そく 図 1 の よう な 配線 を し た と 
ころ 結果 は 良好 で し た . 

これ で ポー ト の 内 容 を BIOS で 読む こと に よっ て フラ グ 
代り に 使え ,. つい に リア ル タ イ ム の 夢 が 実現 し まし た . 
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高速 ゲー ム に 欠か せな い リ アル タイ ム ・ キ ー 入 力 を 可能 に する 










田 長 川 茂 














抵抗 1 MO 1 

560kQ… 37 が 洪 
コン デン サ (マイ ラ ) 0,04/F… 5 
シー ルド 線 40cm で らい … 1 本 
ダイ オー ド IS1588 な ど …0… ド ーー 2 本 











これ は いた っ て 人 簡単 で , 一 度 で も ハン ダ ご て を に ぎっ た 
人 な ら 5 分 ぐら いで 完成 する で し ょ う . 

注意 と し て は 配線 は 必ず シー ルド 線 を 使っ て くだ さい . 
も ちろ ん 1 m100 円 ぐら い の 切 り 売 り 特価 品 で 結構 で す . 
電気 街 へ 行け ば すす ぐみ つか る で し ょ う . あと は いつ も の 抵 
抗 , コン デン サ , ダイ オー ド だ け で す . 











相手 が アナ ログ だ け に 少々 調整 を 必要 と し ます . まず 
リス ト 1 を 打ち 込み RUN さ せ て くだ さい . キー を 押し て 
いる と き は 255, 離し て いる と き は 0 に 近い 数 字 に な っ て 
いる こと を 確認 し ます . つぎ に キー を すばやく チェ ンジ さ 








リス ト 1 





10 A=ANPORT (0, 1 ) 
20 PRINT A: 
30 GOTO10 





図 2 
キー を すばやく 変え る 





手 を は な す 
〆 


255 
C な し | 
0 
恒 1 1 
255 
C あ り 
0 


ぜ だ とき (だ た と えば イン ペデ テ ダ ー ゲ ダー ム の よう に 右 で ぺい っ 
だ た ら す ぐ 左 へ 戻る よう な キー 操作 ), チェ ンジ させ た 瞬間 
も 255 に な っ て いる こと と , キー を 上 離し た ら す ぐに 255 以 下 
の 数 字 が 出る こと を 確認 し ます 。 も し この よう に な ら な い 
場合 は C の 値 を 次 の よう に 少し 変え て みて くだ さい . 
すばやく チェ ンジ させ た と き に 255 が 変化 し て し まう 














@ 手 を 上 離し て も し ば らく 255 が 続く と き …… 減少 
@ の 2 調整 を 最 優先 させ て くだ さい . 夫 の 方 は 多少 な ら 変 
化し て も か まい ませ ん . また コン デン サ を 小さ くし すぎ た 
場合 キー を ずっ と 押し て いる に も か か わら ず 255 が 次 化 
し て し まう こと が ある の で 注意 し て くだ さい . 

な ぜ こ の よう な こと を する か と いう と , 素早 く チ ェ ン ジ 
させ た と き あ まり シビ ア に 反応 する と , イン ベー ダー ゲー 
ム の よう な 左右 の 切り 変 を が 激しい も の で は 少々 ギク シャ 
ク し て し まう か ら で す . そこ で 急激 な 変化 に 対し て は 入力 
が 続く よう に し ます ( 図 2 ). 

逆 に 手 を 離し て 入力 を 継続 させ な い 場 合 は すぐ に 値 を 変 
化 さ きせ, 入力 が 終わ っ た こと を 知ら せな けれ ば な ら な い の 
で 立ち 下り を 早く し ます . 以上 の こと は ソフ ト で も 人 解決 で 
きま す が (PC-8001 な ど は そう し て いる ), 私 の 場合 は コ 
ン デ ン サ を 付け る こと に よっ て 実現 し て いま す . 











今回 は チ テン ・ キ ー の み を リア ル タ イ ム ・ ス キャ ン 可 能 に し 
まし た . 1I C の 足 と キー の 種類 お よび チャ ネル の 関係 は 表 
1 の よう に な っ て いる の で , それ ぞ れ の 足 か ら 別々 の チャ 
ネル に 接続 すれ ば , 読み 出す チャ ネル に よっ て 押さ れ て 
いる キー が 調べ られ ます . 2 人 や 3 人 で も 同時 に 遊ぶ こと 
が で きま す . どう で す , こん な に 簡単 に .。 し か も キー を 別 
々 に 判断 で きる な ん て すご いで し ょ う . も ちろ ん 普段 の 使 
用 に は まっ た く 影 響 あ り ま せん . 

これ か ら も っ と FM- 8 の ゲー ム が 増え る こと を 希望 し ま 
す . 皆さん , FM- 8 を 最高 の ゲー ム ・ マ シン に し よう で は 
あり ませ ん か / 

避 参 考 文献 
1) FM- 8 活用 研究 
2) 1/O "82 年 7 月 号 
表 1 LS145 の ビン と 対応 する キー 


関係 する キー 


V 


0 一 7 (テン ・ キ ー) 

8 …・ と RET.X 2 (テン ・ キ ー) 

ACG, @ 

HO 

PーW 

メーZ,。 一 。 へ 。 \。[,」 ム 

0 一 7 

Brs9。 素 。 ルル 。 4 

ESC, TAB, INS, DEL, EL, CLS, HOME, SPACE 
PF1PF8 


で や つい の の お CO oO 一 


ー ご 














その 他 は ハー ド の 都合 上 で きま せん 
MB4052 


つつ の の モ 
co ho の 
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FM-7 で ゲー ム を や る 場合 , キー が 押さ れ て いな い 
状態 を 判別 で きず に 苦労 し て いる 方 も 多い と 思い ます . 

そこ で , シン プル な 接点 式 の JOYSTICK を 製作 し 
良好 な 結果 を 得 た の で , ここ に 発表 させ て いた だ きま 
す 





回 踏 は いた っ て 簡単 で 、 図 1 の よう な も の で 充分 で す . 
多少 、 実 物 と 異な っ て いま す が , これ は 実物 の 方 が 4 つま 
で JOYSTICK を 接続 で きる よう に し た た めで す . また 、 
JOYSTICK の 各 接 点 と ビッ ト の 対応 が 不 自然 に 思わ れる か 
も し れ ま せん が ソフ ト の 人 負担 を 軽減 する た めで すか ら こ 
の 通り に 接続 し て くだ さい . 














JOYSTICK は ジャ ンク 屋 な ど で 購 入 し ます . 私 は 8 方 向 
タイ プ の も の を 使い まし た が , 通常 の グ ゲーム は ほとん ど が 
4 方 向 で 充分 で すか ら 8 方 向 型 を 使用 する 必要 は な いと 思 
いま す . それ に ., 4 方 向 型 の 方 が ソフ ト も 楽 で すし , 動作 





も 確実 な よう で す . 

つぎ に スイ ッ チ で す が ., 一 番 力 の か か る 部 分 な の で 頑 未 
な も の を 使い まし ょ う . TTL 類 は 一 般 的 な も の ば か り で 
す が , コネ クタ は 多少 入手 困難 か も し れ ま せん . 

部 品 が 揃っ た な たら, あと は ほとん ど 板 金 加工 で す . 最低 
も ドリ ル ,。 リー マ ,。 ヤス リ な ど が 必要 で す . 見 栄え 
する た め に は JOYSTICK は ネジ 止め せ ず . エポキシ 系 接着 
剤 な ど で 固 定 す る の が よい よう で す . 











8 方 向 JOYSTICK で 4 方向 デー タ を 読む プロ グラ ム を 
リス ト 1 に 示し ます . キー ボー ド と 同様 に 前 の デー タ を 保 
持 す る よう に し た い 場 合 は BRA SETKEY を NOP な ど 
に 変え て くだ さい . 
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FM-7 に つい て 一 部 誤っ た 情報 が 流れ て いる よう な の で . 
気が付い た 点 を 書い て お きま す . 

⑩ ANPORT が な く な っ た . 

BIOS, BASIC 共 に サポ ー ト し て お り , FM-8 と 同じ A 
DC (産業 用 の た め 入 手 困難 ) を SFD0C ボ ポー ト に 接続 すれ 
ば 利用 で きま す . 

@ キー の 先 き 読み が で き な い . 

BASIC で PRINT CHRS(27) 十 'g を 実行 する こと に より . 
32 文 字 の 先 き 読み が で きる . これ は マニ ュ ア ル に も 書い て 


1O 


FM-7 に は 各種 の キー ボー ド 制 御 機 能 が 付い て お り , 先 き 
読み の 中 断 な ども 可能 で す (FM-7 ユ ー ザ ー ズ ・ マ ニュ ア 
ル ・ シ ステ ム 仕 様 書 2-31 参 照 ). こ こ で 注意 し な けれ ば な ら 
な いこ と は “エスケープ ・ シ ー ケ ンス は 同 -- フ ィ ー ル ド 内 
で 定義 きれ な けれ ば な ならない" こと で す . で すか ら , PRI 


NT CHRS$(27):“g" と や っ た の で は 先 き 読み モー ド に は な 
ら ず ,“g' が 表示 され る の み で す . で すか ら , PRINT CHR$ 
(27) 二 g" と し ます . 


JOYSTICK 読 み 込 み プ ログ ラム 還 還 還 間 昌 昌 昌 昌 間 昌 昌 間 昌 昌 間 昌 





ある の で す が , 以外 と 知ら な い 人 が 多い よう で す . また 、 
EPRKGEES 吾 1 
OOO1 OOQOO 日 
O002 OOO0O ョ FM-7 JOYSTICK CONVERT FROBRAN 
OOO さ  QOQO H 
OO04 OOOO ュ : For 4 DST. Then ERey 
0005  QOO00 5 
O006 OOQ0O JYPURT= ま $FD ヨ O 
O007 OOOO H 
OOO8 2000 RG 第 2000 
O009 2000 日 
OO010 2000 3404 CONVRT : PSGHS 日 
QO11 2002 680 LD 音 $BO 
O012 2004 F6FDBO LDE  JYPORT 
OO1 さ 2007 2 人 2F BPL RET 
O014 2009 ロ 
OO1 紀 2009 6OD LDR 音 争 OD sCR Code 
OO16 200B C54O BTITH 村 40 
OO17 200D 2729 BE RET 
OO1 200F 日 635 LDR 音信 5 LDR 葵 7 呈 * 
O019 2011 C52O0 BITB 幸 争 20 
OO20 201 さ 272 さ BEQ RET 
O021 2015 5 
O022 2015 ビ 1 FCB 生じ 1 
OO2 さ 2016 FF ULDBIT:FCB も を も FF 
OO024 2017 271 フ 7 BE RECUVR 
OO025 2019 EZ7BDFFF STB ロ LDBIT,PCR 
OO26 201D H < 
O027 201D 日 6 さ 2 LDA 昔 "2 ァ 
OO28 201F 54 LUOP:  LSRB 
0029 2020 2506 BCS NEXT 
OO3O 2022 18DO0OB CMPA_ OLDKEY,PCR 
O003 さ 1 2026 260C BNE SETKEY 
OO32 2028 4 ビ NEXT』i INCA 
OO ささ 2029 4 ビ INCA 
O03 さ 4 202 138 CMP 人 草 征 さ 人 
OO さ 5 。 202C 26F1 BNE LOOP 
OO36 202E 』 
OO37 202E 3 上 fy ツ OuU いっ a ロ 上 上 ロ unD ら 5 呈 己 口 号 モ a も いら 5 
OO0 さ SB 202E | て hen u5 己 f 〇 1 1Owin ロ = モエ a モ me ロモ 
QO39 202E 31sG On" us5ed。 
OO4O 202E ] 
OO41 202E 2004 BRQA SETKEY 
OO42 203O0 H 
O04 さ 203O 6 RECUVRsFCB  $ 昌 6 
OO44 2031 00 ULDKEYiFCB O 
OO45 2032 3584 PULS B。PC 
OO046 2034 H 
O047 2034 7ZBDFFF SETKEY:STQA OLDKEY。PC 
OO4 コ 203 日 SB58B4 RETs PULS B。PC 
0049 203 代 H 





(Non _ Rep らら at ) 


(2。4。 ら 6。 日 。。 CR . STOP ) 


j:Set STOF Key Condition 


sbit 7 Head SGwicCh Pr 刀 呈 呈 @ 


sCheck B1ue Swich 


sCheck Bl1ack witch 


ぇ s CMPB 韻 xx ロ P Code 


s Condition Not Chenqed 


s Key Condition 一 > ビ a レ レツ ア 


s New Statusg 


LDR 音 xx ロ P Code 
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参考 資料 TTL ピ ン 接 続 図 
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V うこ っ QOOO SOFEG 
NH SUB 5 Daoo 4 .$ORG SET 
# un125A nonn 5 ES 
A 5-SY 3 Doo AaK ド COD 
DISPLAY SUE-SYSTEM MONITOR 91 が ET 
+ LOCI Co125A OOOn 
* | CONS0LE 6 Aa ド CODz EQU 
GRAPHIC ^ ・ ま ORG SET 
# ド EYEOAD uo127A DS 
1 TINEF A ACKIEQ EQU 
1 A . ま ORG SET 
FACILITIES oo1 Qooo DS 
un15 DISPLAY (VREAN 1EK*3) A BUzZzER EQU 
dn キ FEEYBOFD 15388086 A DEG 8 
! Qn123 
17 N OSITUNER A ATTENT EQU 
*# A .$ORG SET 
ト BY MYaHAUCHI QQ130A Qoo DS 
に さ SP | A IORDUNM EQU 
t AUG。 ヨ SUE-SYSTEN2 VB.Q JR。 VERSION | A ・$ORG SET 
1 | な ツタ A CRTON EGU 
3Y M.YAMAUCHI D408 
6 OOEOR 0 | D403 。 A .$ORG SET 
# ALL F ESEAVED | 00132A 0000 DS 
4 ik | Daog AVACC EQU 
*# D4oA 。  A .$ORG SET 
SORG MACE 00133A OO00 DS 
、$OEG SET =n DoA 。 AEUSY EQU 
ENDIi D4oE  。 A .$ORG SET 
DS MaCF 00134A 000Q DS 
\*Q EQU .$ORG | DoE A IORDN2 EQU 
・$ORG SET .*$ORG+\1 D4oD A .$ORG SET 
ENDN |] Q0135A Oonn DS 
FLGENT | DdoD A INSLED EQU 
| DdOE A .$ORG SET 
| Q0136A QOOQ DS 
| DoE a SOFFST EQU 
| D410 Aa .$ORG SET 
UE K MACR C0137 ま 
2 FCE * ま BC CNPX # キネ 
1 ENDN | goo7 。 AaMCL EQU 
SKIP1 NaCi | ooo8 。 AANKV EQU 
FCE *21 oo10 。 AaMPT EQU 
| ENDI oo40 。 AaNMD EQU 
RTSPUL NMACF oogn 。 AAMFL EQU 
| PULS PC キ 
ENDN Oo5n 。 a CSCX1 EQU 
| ACK ACE Oo2g Aa CSCX2 EQU 
| BITA ACKIRQ oo1 ヨ 8 AcCSCY1 EQU 
ENDH | Ca148 Co14 Aa CSCY2 EQU 
SCRON MACR | 0014 ヨ Go50 。 AGXESZ EQU 
EITA CRTON | no15Q 280 。 AGBXD EQU 
ENDN | Qo151 ooCB AGYD EQU 
SCROFF MACE | Oo152 Qoo8 。 ACFH EQU 
STA CRTON | 00153 キ 
| ENDI 00154 oo1o 。 APFSzZ EQU 
VACON MACR 00155 ネ 
BITA VACC | 00157 * VARIAELES 
OnoB1 ENDN | 00158 ネ 
On0E2 VACOFF MACE | oo153A DooO ORG 
9003 STA VACC | 0o160 Dooo Aa VAREL EQU 
0Q0E4 ENDM 00161A Daoo 0001 A ..ABRT RME 
BSYON MACE 00162A Doo1 Qoo1 A ..CONT RNBE 
STA BUSY QQ163 * 
ENDH 00164 * KEYBEOAD 
BSYOFF MACE Qo165 ネ 
OO TST EUSY 0016BA DOQ み Qoo1 A KLOCK RMB 
Con7Q ENDM Qn1B7A DO03 Qoo1 A KBFFLG RINE 
aao7 1 BUZZON MACR 0o188A DO04 Qoo1 A KCOUNT RNE 
2 BITA BUZZER Co1S ヨ A DOo5 Oo02 AKHEAD KMPE 
ENDN | 0o170A DOQ7 Co02 。 AKTAIL RMB 
SYSREQ MACR | oo171 ネ 
EITA ATTENT 0o172 * ネ TINER 
ENDN oo173 * 
INSON MACR 0o174A DO0 ヨ Ooo1 A .PFIRQ RE 
BITA INSLED no175A DoOA Qoo1 A .TMAC RMB 
ENDN 00175A DOOE 0oo1 A .$TC RMB 
| INSOFF MACR 00177A DooC Oo04 。。 A .$T1 RMBE 
| STA INSLED oo178A Do10 oo04 Aa .$T11I RMB 
| ENDN | QQo17A DO14 0004 A . 和 ま T2 RME 
| SEF MAC 00180A DO18 Q004 A . ま T2D RME 
DRCC # ま 4 Q0181 
ENDI1 no182A DO1C Qoo1 A .CURSR RME 
CLF_ MACR oo183A Do1D ooo1 Aa .CURTM RE 
NDCC #$EF | Q0184A Do1E Qoo1 人 .CURST RMB 
ENDN | oo185A Do1F Q002 A .VOFST KME 
* Q01SSA DO21 Qoo1 A .CSCTL RNB 
# 00187A DO22 Qoo1 A PUTCFG RMB 
# CONSTANT VALUE ON LAEEL Qoo18BA Do23 oon1 A CSLCDS RE 
# no18A DO24 Co0A 。 A .TABEST RMB 
A 。.VE EQU BLUE VEA Q01 ヨ 0A DO2E Qoo1 A RE 
A ..VE EQU RED_VEAN 00131A DOzF Qoo1 Aa RMB 
Aa ..V6 EQU GREEN FAN Q01 ヨ 2A DO3Q Qoo1 き RNBE 
A ..CRE EQU CHARACTEF EUFFEF Qu1 ヨ 3A Do31 Qoo1 A RMBE 
A ..ATE EQU 2000 ATTEIEUTE BUFFER 0n1 ヨ 4A DO32 oon1 A RE 
A .COMAR EQU COPMMUNICATION AREA oo1 ヨ 5A DO33 Qoo1 A RE 
A ..CFNT EQU ORIGINAL FONT 001 ヨ SA DO34 Qoo1 A ・ RIE 
A STKTOP EQU oo1 ヨ 7A DO35 Qoo1 a RME 
* Q01 ヨ BA DO3G uon1 Aa RE 
3 * ま COMMUNICATION REG.。 | 913 ヨ A DO37 uno1 A RE 
On1n4 * Ooz2o0A DO3 Qoo1 A RB 
no1o5 A EREEEG EQU -COHAR EREOF CODE | 3 ooo2 。 A RMBE 
Aa STATUS EQU .COMAF+1 | A RB 
Aa CHDEEG EQU ・COHAF+2 COMHAND CODE A RE 
| ^A CNDPEM EQU ・COHAFE+3 PARANETER | A RE 
a CONEND EQU ・COMAR+128 END OF AREA PAST 1 | A RE 
Go0110 # 020EA A .EPAD RNE 
oo111 a PFI EaU STATUS 0-3 0o207A A .BAAD KNE 
Go112 A TNI EQU STATUS 4 00208A A EVAD RME 
3 a INI EQU STATUS 5 00z0 ヨ A A .MDRG RMBE 
Aa NuDI  EGU STATUS 5 | 002104 A GTTOPC RNB 
a CNTFLG EQU STATUS 7 | 002114 A GTBTMC RE 
Go115 A PFI$ EQGU  -PFI-s*FFQ1 Oo212A A BTTOPA RMB 
Co117 Aa THMIS 。 EQU  -TMI-s*FFQ1 00213A A GTETMA RNE 
QQ0118 A INI$S 。 EQU -INI-$FFQ1 Oo214A ono1 A .CY RMB 
oo11 ヨ き NMDI を EQU -NMDI-*FFO1 Gos15A Do5 ヨ aoa1 A 、CX RNE 
01 a CNTFL* EQU -CNTFLG-*FFa1 ooz215A DQ5A Cod2 Aa .CBAD RMB 
1Z キ 
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A .CAAD 2 CUSOE ATTE ADDE 
A .CVAD 2 CUSOE VAM ADDR 
*DHGQO Aa 1 COLOE CODE 
ま *DHO \ 人 1 FUNCTION CODE 
FCOD1,1 HISE ド DS A 2 AXIS Y GEAPH 
・ ま OFG 人 き 2 AXIS X GFAPH 
・ ま OEG+1 人 2 VEAN ADDF 
ド C0D>,1 ド DO- ド ED7 A 1 ETIT MAR 
・ も OFG Aa 内 EOX X1 
OFEG+1 A 較 EOX Y1 
ACKIRQ,1 ACNOMLEGE IFQ A っ BOX 
・ ま ORG Aa 2 EOX - 
・ ま OFG+ 1 公 な 2 X CO-OEDINATE OF POINT1 
BUZZER。1 EUZZER A 2 Y CO-OFDINATE OF POINT1 
・ ま OF a ・ 2 X CO-OEDINATE OF POINTS 
・ ま ORG+1 谷 3 円 Y CO-OEDINATE OF POINTS 
ATTENT,1 NHAIN SYSTEH REQUEST 次 内 CLEAE EUFFEE TOP ADDE 
・*OFG Aa 2 CLEAF EUFFEF BOTTOM ADDF+1 
・*OEG+1_ A 2 CLEAFE VEAM TOP ADDE 
IOFDUM,3 DUNY 人 2 CLEAF VRAM EOTTOM ADDR+1 
・ ま OFEG A . 内 ERASE IX 
- ま OFG+3 
CFTON,1 DISPLAY ON/OFF 3 _CETOP 
・ ま OFG ^ 5OEG SET .CETOP 
.*$OEG+1 Qnz40A ps ELUSID。3 LINEX SIDE。ELUE 
VACC,1 VEAM ACCESS A ELUSID EQU _*OEG 
・ ま OFG A .$OEG SET . ま DEG+3 
.* ま ORG+1 noz414 DS FEDSID、3 LINEX S1DE. FED 
BUSY,1 BUSY STATE A REDSID EQU ・$*ORG 
・*OEG A .$OEG SET .* ま ORG+3 
. ま OFEG+1 aoz42A DoS3 DS GEESID、3 LINEX SIDE. GEEEN 
IOEDM2,2 DUMY A GEESID EQU .$ORG 
.$OEG A .$DEG SET - ま ORG+3 
・$ORG+2 # 
INSLED,1 INSEET NODE LED A EXFONT RE 18 EXTD FONT 
.$OEG Qoz245A SOFG EXFONT 
-* ま OFG+1 A . ま DEG SET EXFONT 
SOFFST、2 VRAM OFFSET FEG. 00246A DS ELUDSP、 ミ RAM HOOK BLUE'DOT DISPLAY 
.* ま ORG A ELUDSP EQU .$ORG 
・ ま ORG+3 A .$DEG SET ・ ま OFG+3 
ーー! 
Onz47A Do ヨ 5 DS FEDDSP、3 FAN HOOK FED DOT DISPLAY 
A REDDSP EQU ・*OEG 
COLOF_ HASK ON ATTF. A .$ORG SET . ま ORG+3 
FEVERSE MASK ON ATTE. Oo24BA Do35 DS GREDSP,3 FAM HOOK FOR GREEN DOT DISPLAY 
PROTECT AS ON ATTR. DoB ヨ A GEEDSP EQU ・$ ま ORG 
MODIFYED TAG MASK ON ATTE、 DosC A .sOEG SET 。 ま OFG+3 
FIELD STAFT MASK ON ATTR. ooz43A Do35 DS ELULIN,3 RA HOOK FOR X PARALLEL LINE'S ELUE 
A BLULIN EQU ・$ORG 
NUMEEF OF COLUHN IN LINE、ANY A .$OEG SET 。 ま ORG+3 
NUMEEFE OF COLUMN IN LINE。LITTLE Oo250A Do ヨ 5 DS REDLIN,3 RAN HOOR FOR X PAEALLEL LINE'S RED 
NUMBEFE OF LINE,MANY Do8F AREDLINEQU ・$ ま OEG 
NUMEER OF LINE,LITTLE Dogz  。 A .*ORG SET . ま DEG+3 
HOEIZONTAL BYTES,GRAPHIC oo251A Do35 DS GEELIN、3 RAM HOOK FOF X PARALLEL LINE'S GREEN 
HORIZONTAL DOT A GRELIN EQU ・$ORG 
VERTICAL DOT A .$ORG SET ・$ORG+3 
HEIGHT OF CHAF FONT A HKFLG FE 2 CUEFENT COLOF FOF CHAFACTER 
_ A HKELUE RE BLUE 
16 aa HEEED FE FED 
ム HRGEEE FE 3 GEEEN 
# 
A Duau ム .MOEF FE .COMAR- (PFSZ ま 10+ ま 2C0) 
*Dono + 
* A DCo A .PFTEL FME PFSZ#1O PF TAELE 
1 AEORT FLAG A VGFEL ま EQU 1 
1 CONT FLAG SAVE A ド EYEUF FME 32 
a ド EFEND EQU 
* 
REPSSRY が YS 光 RRB か REYKYREDNYSNS) 
1 BEY_EOCRAUNCDGS TTL MAIN - CRT SUESYYSTEM2 - 
1 BUFFER ooDo ED 
1 NUMBER OF CODE IN KEY BUFFER 9D9 は 0 Ni 
2 ADDEESS OF CURRENT EUFFEE HEAD t 
ADDRESS OF CUERENT EUFFER TAIL thEESTAET POINT 
ま 
A RESTAF EQU H 
内 A #$Du 
1 PF INTERRUPT CODE 内 に A。DP 
1 ACCESS FLAG 全 LDD #Q INIT VARIAELE 
1 CONTROL Aa LDX #VAEEL 
4 CLOCK 
nA | III 二 
* INTERRUPT TIhE 人 Te 
EUCNIERN EonF Eooa ELO EESTuu 
4 ESTORESDATA Aa Eo11 0 A LDX #EEYBUF REY EUFFER PTE INITIALIZE 
1 STATE REG. OF CURSOR DISPLAY 4 人 SD DE 
1 TIMER OF CURSOE が 人 AA TUH0PGSYBIRGEAR4 
E A STA .ACL 。 ATTEIEUTE 
四 VA OFFSET FOR SCROLL D4o0n 。 Aa LDD KCOD1 TUFEN OFF THE FEY STEOEE. 
1 CONTINUANCE PUT FLAG. A TA に SB AbSAMOREM 
1 CONSOLE COLOE DISAELE (MONO SELECTION) * 
1 noo 
1 RCTEPiBOhHEREODE Dono ム 9 LDS #STRTOP INIT SP 
1 EACK COLOFE CODE A JSE DEFALT DEFAULT INIT 
A LDA せま 
1 CHAF WIDTH FLAG ,Q=SMALL , 1=LARGE 5 
1 CHAR UNDER MAEGINQ OR 2 人 5 ENSAU 
INSEFT FLAG の 3 1 
靖 Dss1 A CLE 。 STATUS CLEAF INTEREUPT 
1 ENTER'REY CODE AF が ANDCC #$*AF EEHOVE IRQ AND FIEQ MASK BITS 
。 
1 NUMBER OF COLUHMNS IN LINE ns 
1 NUMEER OF LINES IN DISPLAY IE 
1 KEY INDICATE FLAG A 
2 VEAH ADDE UNIT OF CHR COLUYN EEE 
円 VEAM ADDE UNIT OF CHE LINE A LDS STETOP INIT SP 
MNOE JDA EERDE A CLFE CRDREG COPMAND NON 
BUFFEE PTR Y A JSE CUEGG 
1 EUFFEE PTE X 内 JSR CMDMAr 
| 本 二 硬 4 
る 『 PTR。ATTR. 4 
EUFFER PTE'、VRAM ADDR の CNDCT1 E9U。 
CURRENT VINOOM TOP (CHARD 9 寺 RE 
1 HAF 0 1 
COGENT VINDOO BOTTO CH A CiDCNT 吉 R。 CORTNT CTL REG CLEAR 
EENT INDO (ATTE) 3 
1 5 る A CLE -・AEET CLEAR AEOFT FLAG 
KGENKSMANUDWTBDTTONIDxNOLAUS A LDE CMDPN NO. OF AVAILAELE CONNAND 
1 CUSOE ADDE Y A LDX #CHDPTE CONMAND ENTRY TAELE 
1 CUSOF' ADDR X 3 
2 CUSOE BUFFEF ADDR Bd A CHDCTz CMPA 
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] 
Eo55 25 04  EO5E BLO CMDCT3 LOu | oo415 * INTERMIDIATE 
EQ57 a1 A CHPA 1,X | 00415 ネ 
EQ53 OB  EO63 BLS CMDJMP EXIST THIS ELOCK | Q0417 * 。 CONTINUOUS 
EQ5B ロ d4 A CMDCT3 LEAX 4,X NEXT BLOCK | oo418 *  EUSY LINE 
Eo5D DECB Go413 * 。 AND MAIT 
EQ5E ENE CMDCTz キ 
EOBQ JMP ERE7O UNAVAIRABLE * 。 IF NEM 
* BREAK NOM 
ネ 
EQU * 
2 2 5 EoF5 34 A PSHS 
SUBA 0、X OFFSET ON ELOCE EOF7 SG A LDA 
A LDX szx VECTOR TABLE TOP EOES .BA n IA 
に LDX AX 00427A EQFC E7 A S 
* 00428A EQOFF 8D 3 。 
RG 5 yp ood23A E101 81 
EoBA AD 84 A GOchO JSE X ERANCH TO CONMAND 04808「 E+25 こ 110 に ET15 ENE 
の ペー 2 の 3 * 
EoBC 20 CB5 3 は CNSENO ERA CMDCTL SEND E MAIT A CONT02 Eo 
a AR E105 7F A 3 
EoSE Aa IEQAE EQU * | OBB ^ LO 
0 1 0 E10A E4 A 
Do。 BITA ACEIEQ 2 | E1QD B7 A STA 
A。 LDA #*FF. SET AEOFT FLAG | 
oo A STA  ..aBRT | E110 7F い BR 
| RT RTSPUL 
5 MA A PULS 
# 
ム CMDPN FCE (CON*-CNDPTR) /4 
> FDR 0 本 本 
4 CHDPTE FDE *Q1QD、CON を CONSOLE BLOCK E145 A CNTABT LDS 
A 5 20 BE 9 E11 ヨ 3 A PSHS 
| A FDE $*1520、GEA$ GEAPHIC ELOCI E11E A SR 
| A FDE い YEORD ELOCk nod444A E11E A JM 
| A DE 、KEY ま EYEORD ELOC 0 人 ROYWEEBUR 失 6 
に FDE TIN ま TIMER ELOCE 00447 * 
A OOd48 * GET CONTINUOUS 
A CONE  FOE INIT | 00448 * ネ 
A FDE ERASE | On45Q * BEUSY LINE 
A FDE PUT 0o451 * 。 WAIT FOE 
|] A FDE GET 00d52 3 AND SAVE 
A FDE GETC 00453 * 
Aa FDE CGELF1 00454 * 。 IF NEW 
A FDE CPELK1 oo455 * BREAK NOM 
A FDE CGELKz 00455 # 
| A FDE CPBLKS oo457A E121 34 2 A PSHS 
A FDE GETEAD oo458A E123 8D  QE  E133 ESE 
A FDE TAESET 0od53A E125 81 GE4 A CMPA 
A FDE CNSCTL Qood46OA E127 26 EC  E115 ENE 
Aa FDE NEEASE | 00461A E12 ヨ SKIP2 
A GRA* 。 FDE LINE A E123 BC A FCE 
A FDE CHAIN 00452 * 
A FODE POINT 00463A E12A 34 02 A COMINT PSHS 
A FOE PAINT 0o464A E12C EE  D381 A CONTI2 LDA 
A FDE SYMBOL QodG5A E12F ヨ 7  Q1 A STA 
A FDE CHANGE Co46BA E131 20  D2  E105 BRA 
A FDE GELK1 Qod57 * 
A FDE PELK1 0046S 本 まま 本: 
A FDE GELK2 Qo470 A CMDMAI EQU 
A FDE PELK2 00471A A CHDMA5 LDA 
A FDE GCURS 00472A A ANDA 
A FDE CHRLN | Q0d73A A STA 
A KEY も  FDE INKEY Oo474A BSYOFF 
A FDB FUNKEY A A TST 
A FDE GSTRPF | oo475A 382 。  ACMDMAS LDA 
A FDB PFINT Q047GA Q7 。 E14A ENE 
ATIM* 。 FDE SETTIM 00477A D38O Aa LDA 
A FDE REEDTIN | 00478A EB  E133 EMI 
A FDE TEST 00473A F4  E13E ERA 
* ま 0048OA CHDMA ヨ ESYON 
A INPARM FCE 08025,Q。25、0。1.0 Aa DoA 。 A STA 
人 RTS 
A | * 
Aa | EE 
A | 
A | # 
上 * INIT COMMAND 
# 
# キネ .COMAR+3 
* ネ * ・COMAR+4 
* ネ ・COMAR+5 
*EFEROE ENTRY * ・COHAR+E 
* .COMAR+7 
| A ERRSO LDA #EQ INIT PARAW H .COMAR+8 
SKIP2 + 
A FCE *SC CHPX # E14E A INIT EQU 
A ERES1 LDA SG51 C0-0RDINATE OF CONSOLE 22 A CLR 
SKIPz EDEF Aa JSF 
A FCE *SC CHPX # D38O  A LDU 
A ERRB2 LDA #Bz ORDER SEQ. 33 が LDA 
SKIP2 2F A STA 
Aa FCE ま SC EMPX # CLRBE 
A ERRS3 LDA #53 C0-0FDINATE OF GRAPHIC A LDX 
SKIP2 3 A LDA 
A FCE BC CHPX # Go5n5A E1Eo 81 A CHPA 
A EREB4 LDA #G4 FUNCTION CODE Co505A 2 2 E16C BEQ 
SKIP2 Qn5n7A E154 81 A CMPA 
A FCE ま SBC CHPX # Qo5OBA E1EGE 25 E1C5 ENE 
A ERRS5 LDA #55 N0. OF C0-0RDINATE Qn BS CB A LDE 
SKIP2 1 Aa LEAX 
A FCE *BC CNPX # Oo511A E1EC 3 ヨ 7 A INIT21 STA 
A ERRSG LDA #5G NO. OF CHARACTER oo5 A STE 
SKIP> Aa STX 
A FCE $SC ChPX * CLEBE 
A ERRS7 LDA #5Z7 N0. OF COLOR Oz2BO Aa LDX 
SKIP> 45 A LDA 
A FCE CMPX # 18 A CMPA 
Qo4o1A A ERRSB LDA PF NO. 0 ヨ  E185 BEG 
CO4Q2A SKI 00513A E17C 81 14 A CNPA 
A EQE ヨ 四 A FCE *BC CNPX # 2oA E17E 2B 4B  E1C5 ENE 
Ood03A EOEA BE 45 A ERRSB LDA SE INVALID PARAMETER 521A E1BO CR  Q2 A LDE 
QudCdA ECEC SKIP< Co522A E182 BE  Q320  A LDX 
A EQEC A FCE *BC CHPX # 3A ky A INIT31 STA 
odn5A EQED SG A ERR70 LDA  #7O INVALID COMNAND 32 A STE 
Q4OR キ 3B A STX 
A ERROE EQU キ 5 A STX 
| A STA CONAE SET ERROR STATUS | 48 Aa LDE 
A JMP CMSEND SEND | 38 A STB 
* | Qoo523A E131 27 02  E135 EEQ 
キキ 本 本 本 本 本 ネネ 本 本 本 キ 本 キ キキ ネネ 本 00530A E133 4A DECa 
EoF5  ACONTO EoU キネ 00531A E1 ヨ 4 4A DECA 
* ネ Co532A E135 87 43 A INIT4Q STA 





















































SEND PROCESS A STA -・DMAP+2*2+1 PAGE2 END LINE 
Aa CHPA 5.U 
FLAG ON, E1C5 ELS INIT ヨ 0 SCROLL START EREOE 
LO A LDA 5iU 
FOR CONTINUE COMMAND. A STA ..DMAP+2*Q SCROLL START LINE 
A STA 。-DHAP+2*1+1 PAGE1 END LINE 
COHMAND IS NOT CONTINUE, A ADDA 7.U 
CONMAND AND DO NEM COMMAND. A CMPA 。..DMAP+2*3 
E1C5 EHI INITS 
A A STA -・DMAP+2*0+1 SCEOLL END 
#CNTFLG 05434 A STA ・・DMAP+2*2 PAGE2 START 
STATUS 00544A A CLE ・・DMAP+2*1 PAGE1 START Q、CONSTANT 
STATUS 00545A A LDA ・・DNL 
CHDMAT MAIT 00545A A STA ・・DHAP+2*3+1 INDICATE END、DISPLAY END 
#1 ロ 0 CONTINUE ? 00547A A TST フ 。U 
CNTABT nn548A E1C5 ENI INIT3O SCROLL NEG. 
00543A A LDA 10iU SET CONSOLE COLOR DISAELE SWITCH 
ま CO550A E1ED EEQ INIT5o 
ERRREG oo551A A LDA #$FF 
#CNTFL* oo552A A INIT50 STA CSLCDS 
STATUS 00553A A LDA ヨ ュ U 
STATUS no554A E1Da EEQ HOME NOT ERASE 
CIHDEEG no555A A JMP ERSALL ERASE 
A Q0555 * 
APC A INIT3O LDA  #6O ERROR CODE 
A STA EERFEG 
本 キ キキ キキ 本 本 キ キキ まま キキ A DEFALT LDX #INPARNM 
#STKTOP A LDY #CMDPRN 
人 A LDE 
CUFSET A JSER MOVE 
CHDCNT A JMP INIT  。 DEFAULT SET 
# 
ERR2SKBRSEESMESRESRDESDEERDE2EHSERHRTRESRE は SDD 
DaTA 
A HOME EQU * 
LOM, A JSK INDICT 
CONTINUE COMMAND, A LDU  *#、.DHAP 
CONT FLAG・。 CLEB 
HOE19 INCE 
COMMAND IS NOT CONTINUE, A LDA U+ 
COMMAND AND DO NEM COMMAND. A CMPA  ,U+ 
E1E1 EEQ HOME1Qo 
A A STA .PDEG 
CMDuAI MAIT A STA .EPY 
#100 。 CONTINUE ? A STE DRG+> 
CNTAET A LDE  -1.U 
A STE PDEG+1 
BC CHPX # A CHGMIN JSR GETENG 
E1FA ESF EFPTEL 
A A JMP CURESET 
STATUS A EFPTRL CLE 、BPX 
、.CONT EUFPTR ESE EEADR 
CONT02 5 EEA EVADE 
# 
RSE33733S331 A EEADE EQU 
# MAIT FOR CONMAND 人 ESE EADFN 
ERRREG 全 STX ・EPAD 
せま 7F 合 STY ・EAAD 
ERRREG 5 RTS 
BUSY EADEL CLREE 
CHDREG SKIPS 
CMDMA3 全 FCE CIPX # 
EERREG A BADEN LDD .BPY CURRENT BUFFER POINTER 
CMDMA5 AEADR EQU + 
CMDWAE 人 PSHS BE 
A LOB LNC 
BUSY MUL 
A ADDE  、S+ 
A ADCA  *..CRE/255 
EEESEEESERSSSSS33 A TFE DX 
INIT - INITIALIZE CODE - A LEAY  ..ATB-..CRB、X 
RTS 
EQU 
BACK COLOR CODE ESR EVADN 
N0. OF COLUMN ON LINE STD .EVAD 
NO. OF LINE ON DISPLAY RTS 
START LINE NO. OF SCFOLL * 
NO. OF SCROLL LINE E EVADL CLRE 
INDICATEF FLAG E SKIP2 
E A FCE *8C CHPX # 
+ E A EVADN LDD -EPY CURRENT BUF PTR 
PUTCFG A EVAD EQU # 
CUECLR E A PSHS 4^ 
#。COMAR E A LDA VCU+1 
3.U E MUL 
SET BACK COLOR E A PSHS  D 
E A LDA 2.S 
E A LDE ..VLU+1 LSB 
E MUL 
E A ADDD  ,S 
E A STD ・S 
E A LDA 2.S 
INIT ヨ O WIDTH EFFOR E A LOE --VLU MSB 
FI CHAR MIDTH FLAG= は =LARGE E MUL 
1.X E A EXG AuB 
・・LNC E A ADDD  ,、S 
.・CMD CHAR UIDTH FLAG SET E A LEAS 3.S 
VCU UNIT OF STEP E FTS 
* ネ 
#GXESZ*CFH 
5rU SET NO. OF LINE ミ AS CA 
#CSCY1 * ネ 。 .COMAR+3 MINDOM NO. 
INIT31 ネ ・COMAR+4 EACK COLOR CODE 
# き CSCY テ ネ ・COMAR+5 COLOR CODE (NEM ERASE COMMAND 
INIT ヨ Q HEIGHT EEEOE キ 
#Z CHAR HEIGHT FLAG=2=UNDER MARGIN 00633A E241 OF 22 A NERASE CLR PUTCFG 
#GXBSZ ま (CFH+2) Qos40A E243 ED EDEF  A JSR CURCLR 
・DNL Oos41A E245 F6  D385  A LDB .COMAR+5 LOAD COLOE. 
・CHT CHAR HEIGHT FLAG SET Qo542A E248 20 07  E252 ERA ERASDO 
・.VLU UNIT OF LINE STEP 00843 * 
HRFLG 00644 E24B A ERASE EQU ネ 
8U O0545A E24E OF 22 Aa CLR PUTCFG 
・FS 。 INDICATE FLAG Q0545A E24D ED EDEF  A JSR CURECLR 
INIT4O Oo547A E250 DS 2E A LOE ・-ACL LOAD THE CURRENT COLOR CODE 
の QO548 E252 AERASDOEQU キ 
USE < LINE FOR INDICATE 0o643A E252 BE  D383  A LDA .COMAR+3 
・DMAP+ デ 3 INDICATE START LINE QoE5oA E255 25 41 Ez238 ENE ERASEO 
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Oo851A E257 D7 2E A STE SET THE COLOR CODE. 00767A E331 3B 7E A ERSBUF LDA 
00G52A E25B ES  D3S4 A LDA ・COMAR+ き 00768A E333 BD  E208  A JSR 
OoR53A ヨ A STA -・ECL SET EACK COLOR 0076 ヨ A E335 34 20 A PSHS 

A ERSALL EQU * 00770A E33B 33 84 A LEAU 
Aa LDX #Q 00771A E33A 35 7D A LDA 

A LDU きま 4000 Q0772A E33C ED Ez2O8 A JSR 

Aa NEG CSLCDS 0Q0773A E33F 34 20 A PSHS 

SCEOFF Q0774A E341 CLRA 

に STA CRTON 00775A E342 SD 04  E348 ESR 

ns5 ヨ A A JSE ERSSo4 Oo776A E344 5 2E A LDA 

| OOBBQA SCFON Q0777A E345 35 5o A PULS 

| A BITA CRTON * 

] に 1 NEG CSLCDS A ERSARA EQU 

E A LDA ・・DMAP+2 TOP VRAM Y * 

E に LDE .DHAP+2*4-1 BOTTON VRAM Y PAST 1 * A STOEED DATA 

E 人 STD ・CVTOP * X START ADDR 
| 1 仙 JSF EFSBEUF ま U END ADDE 

| E A JSE HOME # 

| E A ASSFLD LDU #。.DMAP ASSUME FIELD MAFE キ ま THESE PARAMETERS 

E A EESAL5 LDA ュ U++ # 
A JSF BADRL * THE X 1S LESS 
E LDA Wi Qn78 ヨ * SIZE (U-X) IS 
0 E ^ OFA #AMFL 007 ヨ 0 キキ GREATER THAN 8. 
QB7SA ビ 1 STA sY Q07 ヨ 1 ま 
CoB73A EE 1 CMPU #。 。DMAP+8 007 コ 2A E348 02 Aa LEAY 

| QoS74a E EHI ERSAL ヨ 007336 E34A Os A LEAX 
CoB75A4 E ELO ERSAL5 Oo07 ヨ 4A E34C 30 A PSHS 
O0E75A EE LEAU  -1。U Q0735A E34E 83 A TFF 

| E ERA ERSAL5 Qoo735A E35O 1F  oQ1 A TFE 

E ERSALB RTS 0o737A E352 Aa LEAY 
* に Q0738A E354 A ERSAR3 PSHU 
E ERASEO CHPA  # き 3 Q073 ヨ A E35E Aa CMPU 
LEHI ERFBu QOSQQA ES5 ヨ 2: は EHS 
選 STE ・・ACL SET THE COLOR CODE. QOSQ01A E35E て NHPU 
E2A0 A ERASE1 EQU * 00802A BLO 
E LSLA 00803A BEQ 
選 1 LDX #。 。DMAP- ス OQ0S04A Aa STD 

| E A LEAX AxX QoS805A A ERSARB STD 

| E ら LDE 0.X 008OEA ERSAR ヨ RTSPUL 

| E A CMPE 1.X A A PULS 
QOSB ヨ A E2AA 1027 FE21 EQOCF LEEQ ERRGSO 00B07 キ 
COBdOA EZ2AE 4 は LSEA OO0SOSA E35B すす EFSV LSFRA 

| 005 ヨ 1A EZAF 7 4F A STA -HDRG+2 ド IND O08BOBA E36 ヨ 34 52 Aa PSHS 

| OoB ヨ 2A E2B1 EC 84 A LDD nrX Oo810A E3SE BE 0O A LDA 

| GoB ヨ 3A E2E3 4D TSTA IS THE CURRENT UINDOM oo811A ESED 24 01  E37Q BCC 

| OOR ヨ 4A E2E は 25 2BA BNE ERASE5 FULL OF LOGICAL DISPLAY AREA7 00812A E3BF 43 CONA 
QoSd5A E2ER D1 Aa CMPE  ..DMAP+2*#3 00813A E37Q ERSVO5 VACON 

E2ES 2 E25E BEQ EFSALL YES. | AE370 BE5 D BITA 
A ERASE5 EQU キネ Qoo814A E3738 8D Di: BSR 
EzEA DD A STD ・CVTOP 00815A E375 VACOFF 
EzEC DD A STD .NDEG A E375 BE7  D4Q ヨ A STA 
Qo7Q0A EZ2EE ヨ 7 A STA ・EPY 00816A E378 35 2 A PULS 
Qoo701A E2Co ED Aa JSR CHGMIN 00817A E37A 3O 83 4000 A LEAX 
00702A E2C3 SD 325 ESR ERSSOF Q0818A E37E 33 CS 4000 A LEAU 
00703A EZC5 : Aa ASNFLD LDA ・MDRG ASSUME FIELD TAG AT CURRENT UINDOM TOP. 90818A E382 38 RTS 
00704A E2C7 に 1 JSR BADRL 00820 TTL 
Q07Q5A E2CA A LDA ・Y 0822 * GAXC 1TEST 
00705A E2CC 8 A OFA #AMFL # 
QQ0707A E2CE A STA sY GAXC EQU 

| Ez2Do A JP BUFPTR E LDX 

| R E LDY 

] # GAXCR EQU 

| 2 # EEASE_ DISPLAY ,CHRACTER BUFFER | E GAXC] CMPX 
ロ 0713 # AND ATTEIEUTE EUFFER E BHS 
007 1 * | E CHPY 
no715 # E GAXC2 RTS 
C0715 + CVTOP START LINE OF ERASE # 

* CVTOP+1 PAST END LINE OF ERASE # 
# E A EAS FCE 
A EESVEM EQU * E A FCE 
A LDA .CVTOP+1 GET ADDRESS THAT IS PAST 1 E FCE 
Ez05 A JSE EVADL TO END OF ERASE AREA。 E A FCE 
E2DS 人 TFE DiU SET U. E な FCE 
EzDA に SUED  # ま dQ OUT OF ELOCK | E A FCB 
EzDD ED ELS EESSo3 NO. E A FCE 
Ez2DF A LDU # ま OO | E A FCE 
1 OB 人 PSHS D ま 
Q7  E2ED ESR ERSSo3 | * ま 
po00 。 a LDX #0 # 
| 30 Aa PULS U 3 
ロ 7 E2F4 BFA EFSSC4 * 
E2ED ERSSQ3 EQU 大 ま GPGETE 3 READ 
LDA .CVTOP GET TOP ADDRESS OF ERASE、. # ま 
JSR EVADL E334 A GPGETR EQU 
TFR D,X SET 区 GPGET1 VACON, 
ERSSQ4 LDA CSLCDS COLOR ENAELE テ D303 A BITA 
EEGQ ERSVN YES. QOS51A CLRA 
EMI EFSMNO NOWILL 1 ERASE THE ONLY GREEN? 00852A C+ A BITE 
LDA 8 NO・ Q1  E3A3 BEQ 
LDE 。.ACL INCA 
BITE 。#AMRV 、 REVERSE CB 4qo0 A GPGET2 BITE 
E3o0 2 ENE EESSQ5 YES DISPLAY IS EEASED BY GREEN. | GOB5EA 02 ESABE BEQ 
E3C2 < CLRA | Qo857A 02 A ADDA 
EEA EFSSQ5 DISPLAY IS ERASED BY BLACK。 | QoS58A C ヨ Sooo A GPGET3 BITE 

| EESMNO LEAX  ..VG,X 1 MILL ERASE ONLY GREEN VRAM。 Q085 ヨ A G2 ES3B3 BEQ 

| Q07454 LEAU  ..VGiU QA Q4 A ADDA 
Q0745A CLFA 1A GPGET4 VACOFF 
Qn747A LDE -・ACL A ] D4og A STA 

| On748 ム BEITE  #AMEKV 008BE2A E3ES 3 ヨ RTS 

| On74 ヨ 4 EEQ ERSV キ 
nn750A INCA ネ 

| Go751A E315 BFA ERSV キ 
Qn752A E317 ヨ 2E A ERSVN LDA --ACL IS IT REVERCE? キネ 

| oo753A E31 ヨ 8 85 98 A BITA  #AMRV ネ 
Co0754A E31E 25 2  E31F BNE ERSSQ5 YES。 ERASE COLOR 1S CHAR'S COLOR. * ネ CFADR ! MARE 
Go755A E31D 35 2F A LDA ・BECL NO, ERASE COLOE IS EACK COLOR. ネ 
Co756 E31F A ERSSQ5 EQU も E3E7 A CFADR EQU 
On757A E31F BD 47 36S ESR ERSV BLUE | ESB7 34 06 A PSHS 
Qo758A E321 ED 45 に BSE ERSV RED | 00872A E3EB CB QB A LDE 
Q0075A E323 20 43 BRA ERSV GREEN & RETURN | っ 0873A E3EE 3D MUL 
07BQ * )0874A E3BC CS DBoo Aa ADDD 
Q00751 E325 A ERSSOF EQU キ Q0875A ESEF 1F 01 A TFR 
00752A E325 SCROFF Q0875A ESC1 RTSPUL 

AES25 E7  D408  A STA CRTON AE3C1 35 85 ^ PULS 
00763A E328 0O 23 A ERSSUB NEG CSLCDS 00877 ネ 

| 00754A E32A BD  A7  E2D3 BSR ERSVRH 00878 内 
007B5A E32C OO 23 NEG CSLCDS 0087 ヨ 3 
007B5A E32E SCEON | Qoos8o * 

AE32E B5 Do8  A BITA CRTON | QoS81 キネ CEADR ! CALCULATE 
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CVTOP+1 GET BUFFER ADDR THAT IS 
BEADRL PAST 1 TO END OF ERASE AREA. 
Y SAVE ATTR ADDR. 

ュ X SET U CHAR ADDR 

・CVTOP GET BUFFER ADDRESS THAT。。 
BADRL IS TOP OF ERASE AREA. 


Y SAVE ATTR ADDFER・ 
ERSARA ERASE CHAR BUFFEER・ 
・・ACL 

X%U 


ERASE ATTR BUFFER・ 
キ 


IUST EE AS FOLLOWMS. 


THAN THE U. 
EVEN NUMEER AND 


2 
BiX 
XY 
AE MAKE DATA 
D,X 
ュ X 
DiXiY 。 SET 5 BEYTES. 
rS IS THE FEMAINDER .GE.5r 
ERSAR3 YES. 
CH HOM MANY BEYTES IS REHAIND 
ERSAR IT IS 0。 
IT IS 2。 
IT IS 4。 








| oo884A E3C3 DC 58 
|  Qo8g5A E3C5BD  E20C 
BSA E3CB 





レン テオ テス ネオ コ 


も 
CEADR EQU ネ 


LDD sCY 
JSR EADE 
STX ・CEAD 
STY ・CAAD 
LDD ・CY 
JSE EVAD 
STD ・CVAD 
RTS 

* 

# 

# 

キ 

キネ 

* ま CAXCE 1 TEST CHARACTEF C0-OFDINATE 

# 

CAXCE EQU # 
CMPA ・・LNC 
ECC CAXC2 
CNMPE ・・DMAP+ ジ まき 

CAXC2 ETS 

* 

# 

BADDE EQU # 
PSHS ArX4Y 
LDD 1.S 
ESE GXOFFF 
EXG D,Y 
LDA #GXESZ 
MUL 
LEAU D,X 
LDD #EAS 
EXG DiY 
LDE ErY 
RTSPUL (AX。Y) 
PULS ArXaYjPC 


キ ま GOXFFI CALCULATE OFFSET VALUE AND EIT NUIEEE 





AXU 
OO 
ERSVQ5 


VACC 
ERSARA 


VACC 
ArXU 
* ま 4000。X. TOP ADDRESS OF NEXT COLOR. 
*Q0n。U END ADDRESS OF NEXT COLOR・, 


COMION SUBROUTINE 
GRAPHIC CO-OREDINATE XY 


* 
・GX 
・GY 

# 
#GXD 
GAXCZ 
#GYD 


ま BG 
ます 0 
まま 20 
ま 10 





# OF GEAPHIC X CO-OFDINATE 


GXOFF EQU # 


TFR D,X TRASFEF X CO-OFDINATE TO X 


ぷ GXOFFE ESE LSEDS 


SET OFFSET VALUE 
SET EIT NUMEEE 


EXG DX 
ANDE # 和 ま ロ 7 
RTS 

# 

ま END GXOFF 


# 

LSED3 EQU # 
LSEA 
FORE 
LSEA 
FOREE 
LSFA 
FOREE 
RTS 


EOXINV LDX #CMDPFIN 
LDY #.EOXX1 
LDE 9 
ESE NOVE 
BSF EOX 
LDD ・EOXX< 
SUED ・EOXX1 
TFE DX 
LDD ・EOXY> 
SUED ・EOXY1 
FTS 





EOXi TEST TuO POINT CO0-ORDINATE 


# 
EOX EQU # 

LDU #.EOXX1 TOP ADDRESS U 
EOXFE  LDX *U 





COLOR CODE 





・.VG,U 
GPGET4 
4 


VACC 


CHARACTER FONT ADDRESS 


* 
AE 
#CFH 


#。。CFNT 
DX 
(AE 
ABPC 


BUFFER ADDRESS 





E44A AB 8BO 1 
E44C A7 An に 1 
E44E 5A 


E44F 2B  F ヨ  E44A 
003 ヨ 4A E451 3 ヨ 

00 ヨ 35 

00 ヨ 3B 

00 ヨ ヨ 7 

00838 

01000 

o1001 





LDY 
ESF 
LDX 
LDY 
ESE' 
CMPX 
EHS 
LDD 
STX 
STD 
EOX1 CIPY 
EHS 
LDD 
STY 
STD 
EOX2 RTS 
# 





GAXCHK JSE 
ECS 
JP 


CO00RDINATES CHEC ド 
0K. 
ERROR 





# 
* ま END BOX 
キキ 
キ 


キ 

ま 

キ ま MOVEI MOVE DATA 
3 

NOVE EQU キキ 


LDA 1X キ LOAD MOVE DATA 
STA vY+ キ STORE MOVE DATA 
DECE 

BNE MOVE 

RTS 


ま 
ま END MOVE 
キ 


キ 
* ネ SET UP LINEX ROUTINE 
ネネ 
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Q1002A E452 7F DOAQO AINITLNCLE LNCHR CLRB 
Q1003A E455 DC Eo A LDD -GCL LOAD COLOR AND FUNCTION CODE. ^ LSE ・S 
01004A E457 SE FOBO A LDX #LNFUNC LOAD FUNCTION ENTRY TAELE ADDRESS. ROLE 
01005A E45A CE DOBC 4A LDU #ELULIN LOAD RAM HOOK TAELE ADDRESS. A LSF 1S 
0100EA E45D 8D 2  E471 BSR 。 LENTRY SET THE RAM HOOKS. ROLE 
G1oo7A E45F DC A LODD ・GCL SEP。 3 1381 LSLE 
Q10OBA E4B1 昌 A LDX #LNXFNC PARRALLEL TO X AXIS LINE'S SIDE TO SET ENTRY | A LDU BX 
1oodA E4Gd CE A LDU #ELUSID 人 STU ・Y+ キ 
Q1n1QA E4S7 BD QB  E471 BSE LENTRY DECA 
| o1n11 # AND DO GPDSP INITIALIZE. E4FS ENE CDSINE 
| Q1Q12 ネ RTSPUL (DX) 
| Q1013 * SET UP GPDSP ROUTINE A PULS DXiPC 
Q1014 * PICKUP AND SET VECTOR TO DISPLAY * 
n1n15 # A EITEXT EQU キ 
1Q15 E4G ヨ A GPDSPI EQU キ LSF^ 
Q10174 3 A LDD ・GCL A=COLOR =FUNCTION FOFE 
A GPDSIE LDX #GPDFNC MAKE FAM HOOK FOR DOT DISPLAY. ASFE 
A FENTRY LDU #ELUDSP LOAD RAM HOOK ADDEESS. LSEA 
| A LENTEY CMPE  #1 ID THE FUNCTION CODE PEESET? FORE 
7 ENE NOTPRE NO. ASFE 
A LDA ・・BCL YES, USE EACK COLOE. LSRA 
NOTPRE LSLE FROEE 
LSLE NAKE ADDRESS OF CURRENT aSRE 
| AEX FUNCTION'S ENTRY TAELE . LSFA 
| LDE #$7E LOAD JUMP OPERATION CODE . FROFE 
| ESE SETENT SET ELUE*'S RAN HOOI ASEE 
BSE SETENT SET FRED'S RAM HOOK RTS 
| # SET GEEEN'S EAN HOOK. * 
E SETENT STE U+ SET JUMP. A CDSPC LDX ・.CVAD 
E LSRA SET COLOR BIT TO C. SKIPS 
E PSHS  D SAVE Aa FCE BC 
E LDD 3 ASSUNE BEIT-ON'S ENTEY A CDSPE LDX .BVAD 
E ECS CEITON IS IT ON? YES. Aa CDSP EQU * 
E LDD 2.X N0, LOAD EIT-0FF'S ENTRY。 | Q1141A A LEAU  ,X 
E CEITON STD ュ U++ SET ENTEEY ADDFESS. 1142A 1 A JSF CFADR 
E RTSPUL D 1143A 選 1 LDA CSLCDS 
E PULS DiPC G1144 7 E534 BEQ CDSPN 
q1145A 5 08 A EITE NAMRV 
# 01146A G 05 ES52F BNE CDSEv 
| * GPDSP ? DISPLAY DOT ON GRAPHIC C0-0RDINATE 91147A E52A CC  QQQ4 人 LDD 025E 
| Q1148A EEA CDSPQ 
# Q1143A CDSMFEV LDD #d ま 255 
Aa GPDSP EQU H 01150A ERA CDSPo 
A LDX ・GX LOAD X COORDINATES G1151A A CDSPN LDA ・。BCL 
A LDY .GY LOAD Y COORDINATES 01152A A BEITE 。#ANEV 
| A GPDSPC JSE GADDF  VEAM ADDE. MADE 01153A C BEQ CDSPu 
| A GPDSPF PSHS SAVE BIT MASi 01154A Aa EXG AuB 
A JSE BLUDSP Q1155A A CDSPo PSHS  X』U 
A LDE.、 。S Q1155 + 
4QOO A LEAU  ..VEuU n1157A A ANDA 。#7 
Aa JSE REDDSP Q1158A A ANDE # 叶 7 
A LDE S n115 A CNPD HKRFLG 
全 LEAU ・・VG- 。 。VE 。U 011EQOA EEQ CDSP1 
0 A JSE GEEDSP Q1181 ム BSE CDSINT 
Q1o55A FTSPUL E 01152 CDSP1 EQU ネ 
A Aa PULS EuPC 01153A LDA CuD 
G1056 l Q11E4 キ 
| Gu1057A E4AD EdC1 A GPDFNC FDE GPORA,GPAND SET 01185A EEQ CDSP5Q 
E4CD Aa 9115BA LDU #EXFON 
E4C1 に FDE GPORA,GPAND PRESET Q1157A STU 、S 
E4CD  a 01158A LDE #CFH 
E4C1 Aa FDE GPORA,GPNOP OF 01153A PSHS BE 
E4CC Aa Q1170A4 CDSP3 LDA ュ X+ 
E4CC 4A FDE GPNOP,GPAND AND 01171A ESE ETITEXT 
| EaCD 4 Q1172A STE BuU 
E4DA 4A FDE GPEOR,GPNOP EOF 01173A BSR BEITEXT 
E4CC 。 A Q1174A STE ュ U+ 
# 01175A DEC 1S 
# 01175A ENE CDSP3 
| E4C1 A GPORA EQU * LEAS 1.S 
| 1 VACON CDSP5Q LDA CSLCDS 
Daoa 。 Aa BITA VACC ENE CDSPMN 
NOP | 3 
C+ A DEE Q.U | A LDU 3S 
C A STB Oi | A LDX 2 
VACOFF A LDD #CFH 
Daa 。 Aa STA VACC A JSR HKBELUE 
GPNOP RTS o1185A E573 EE A LDU S 
# 01186A E575 AE GE2 A LDX 2S 
# 01187A E577 30 8 4000A LEAX  ..VE,X 
E4CD AGPAND EQU # 
COPE oo08 。 Aa LODD  #CFH 
VACON ヨ A 人 JSR HKRED 
D4o ヨ A EITA VACC E4 A CDSPIMN LDU sS 
NOP 8 62 人 LDX 2.S 
C+ に ANDE OU き S ヨ SO00 A LEAX  ..VG6,X 
C+ A STE 0。U に 0008 に ) LDD #CFH 
VACOFF Q1134A E5SE 3D 3D A JSR HKGREE 
Daoa 。 Aa STA 。 VaCC | q11 ヨ 5A E58D RTSPUL (X。U) 
RTS AE5SD 35 DO 人 PULS 。X,U,PC 
は 0113EA E5BF 43 CDSRVL COMA 
* 01187A E5B0O 34 14 A CDSNNL PSH BE 
E4DA A GPEOR EQU # C1138A E5 ヨ 2 SD QB  E53A BSR CDSNMS 
VACON 01183A E534 35 14 A PULS XiB 
Do 。 Aa BITA VACC 01200A E5 ヨ 5 30 01 A EEAX。 5 
NOP | Qu1201A E53S SKIP1 ネ 
C4 A EOEB ouU | A E538 31 ^ FCE  *21 
| C4 Aa STE 0.U 01202A E5 ヨ ヨ 43 CDSRVS COMA 
VACOFF 01203A E5 ヨ 3A ヨ 7 30 A CDSNYS STA 。・.CLEX 
D4o ヨ 。 Aa STA VACC 01204A E5 ヨ C VACON 
RTS | A E5 ヨ C B5 人 き BEITA VACC 
* | 01205A E5 ヨ F A5 A CDSTA LDA ュ U+ 
Q10 ヨ 1 * END GPDSP Q120BA E5A1 8 A EORA  ..CLEX 
| 010 ヨ 2 * 01207A A STA > 
01034 ネ Q A A LEAX 。GXBS2, 
| o1o35 * *CDSP' DISPLAY CHARACTER DECE 
01036 ネ ENE 。 CDSTA 
010 ヨ 7 * A IS THE CHARACTEE CODE. 01211A VACOFF 
01038 * ネ E IS THE COLOR CODE. A STA VACC 
0108 ヨ ネ X IS THE DISPLAY ADDRESS. G1212A LDA ー・CLEX 
Q1100 ま ロ 1213A SKIP1 
01101A 15 A CDSINT PSHS  D,X A FCBE 21 
01102A 35 A STD HKFLG Q1214A CDSONS COMA 
01103A E5DO 。 A LDX SCDJMP 91215A CDSOFS VACON 
01104A 31 A LDE .・CuD A BITA VACC 
Q11Q5A AEX 1218A ADDE  ..CHT 
0110EA Do ヨ 7 A LDY #HKELUE Q1217A EEQ DSRTS 
Q1107A 03 A LDA 3 01218A CDCLR STA 1X 
Q1108A 7E A CDSIN5 LDBE #$*7E ロ 1218A LEAX  GXESZ。 
Q11Q ヨ A E4FS E7 AO A STE ュ Y+ JUMP CODE 01220A DECE 
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01221A E5EF 26 F8 ES5BS BNE CDCLE 
a1222A E5C1 DSRTS VACOFF 
A A STA VACC 
23A RTS 
CDSONL COMA 
A CDSOFL PSHS  X.B 
E5Ez BSR CDSOFS 
A PULS XiB 
A LEAX 1.X 
E5E< BRA CDSOFS 
# 
A CDJMP FDE CDSOFS OFF 
A FDE CDSNIS NORMAL 
EXTEND A'S LOUER 4 A FDE CDSRVS REVERSE 
EITS TO SEITS ON E. 人 FDE CDSONS ON 
RETURNS A IS LOGICAL 人 FDE CDSOFL OFF 
SHIFTED RIGHT 4. A FDBE CDSNML NORMAL 
A FDE CDSRVL REVERSE 
A FDE CDSONL ON 
TTL CONSL - PUT CODE - 
A PCRORD EQU .MORK CR ORDER FLAG 
A PUTGET EQU PCROED+1 PUT/GET 
A PUTIX EQU PUTGET+1 
A PUTFLD EQU PUTIX+2 ERASE FIELD FLAG 
A PUTEND EQU PUTFLD+1 
# 
* GET COMHAND 
* 
* PUT COMNAND 
CNPX # 
FLGENT PUT、GET,PUTGET 
A GET FCE BE LDA # 
PUT CLRA 
X=FONT ADDR. Aa STA PUTGET 
* 
A PUTaoo EQU * DISPLAY STRING BEGIN 
A LDX #。COMAR+ は 
A STX PUTIX STRING PTR INIT. 
A CLF PCEORD CLEAR CR ORDER FLAG FOF SUSPEND TO PUT. 
A PUTQ10 EQU # 
ーー ニテ | 
JSR PUTDA1 TAKE PUT CHAR 
BCC PUT100 EXIST 
TsT PUTGET DATA END 
EACK COLOF LOADED. LENE GEToon GET OPRATEFES INPUT 
IF REVERSE IS DIRECTED LDA ・CSCTL SUSPEND TO PUTP 
BACK COLOF AND CHAE BITA 、#CSLSUS 
COLOR ARE EXCHANGED. | EEQ N0・ _- 
SAVE COLOES,FONT ADDR | LDA DID ME DO CR ORDER 
AND DISPLAY ADDR. BEQ NO 
LDA 
| BEQ 
1S REQUESTED COLOF SANE AS CURRENT COLOE | LOE LOAD ESC_ CODE 
YES. 012704 LDX GET ADDEESS OF KEYEUFFER 
HK COLOR Q12714 PUTQ070 CMPB ESC EXIST-IN KEY EUFFER ? 
01272A Es14 BEQ PUTO8O YES」 SUSPEND PUT. 
IS THE CHARACTEE WIDTH 01273A EE DECA MORE DATA IN BUFFER ? 
SMALLY 1274A E5O E62A BEQ PUTO ヨ 8 NO。 END PUT COMMAND. 
YES. | Q1275A ESOF BD FD35  A JSR INCREX CORRECT PTR FOR BUFFER 
N0, MARE LAEGE CHAR。 01276A E512 20  F4 ESOS BRA PUTQ7Q SEARCH MORE DATA. 
FONT ADDR RESTORE . Q1277A ES14 ED  FDSE A PUTO8Q JSE KEFERA CLEANUP THE KEY EUFFER 
01278A E517 6 0O A PUTO ヨ 0 LDA 。-AERT BREAK MAS TYPED? 
Q127 ヨ A ES1 ヨ 8 2B OF  E62A SNE PUTo3 ヨ YES. 
OFEIGINAL FONT LOADED. Q01280A EB1E SB 04 合 LDA KCOUNT 
EXTEND LOMEE 4。 | Q01281A ES1D 27 FS E517 EEQ PUTQ ヨ Q 
| Q1282A ES1F E5 SF Doo5A LDE [KHEAD] 
EXTEND HIGHER 4EITS. | 91283 1E ^ CMPE  #ESC 
| 01284A E625 27 03  EG62A BEQ PUTo ヨ ヨ 
END? Q1285A E627 ED  FD75 A JSR KEYINQ 
NO0。 GO DO MOEE. 01285 EB2A A PUTO ヨ ヨ EQU キ 
YES,。 RESTORE SP., | 01287A ES2A 7E EDES A JP CURSET 
NONO | 01288 ま 
YES. | Q128 ヨ E62D A PUT10O EQU 
| 01280A ES2D DS 21 A LDE 。CSCTL 
01231A ES2F C5 02 A BEITE 。#CSLORD 
01232A E531 27 21 ES54 BEQ PUT1O6 ORDER DISAELE 
01233A ES33 81 20 A CMPA ま * 
01234A E635 24 18 ESG5o BHS PUT1o5 
01235A E637 34 02 A PSHS  A 
01236A E63 ヨ BD EDEF A JSR CURCLR 
01237A E63C 35 2 A PULS A 
01238A ES3E 81 1B A CMPA ESC 
01239A E540 .1027 Q1E7 E7FB LBEQ ESCSEQ 
Q1300A E644 81 14 A CMPA 。 #$*14 
01301A E646 24 12 ES5A BHS PUT1Q8 CURSOR ORDER 
01302A ES48 BE  EBO8  A LDX #PUTORD 
01303A EB4B 48 LSLA 
Q1304A ES4C AD 36 Aa JSR [A,X] 
| 0Q1305A ES4E 20 BE  E5EE BRA PUTo10 
| 01306 上 
013q7A EB50 81 7F A PUT105 CMPA  #$7F 
01308A ES52 27 ヨ 7  E5EB BEQ PUTo1Q 
0130 ヨ A EB54 8D 22  EB78 PUT10B BSR PUTCHR 
0131QA ES5S OF 1E A CLE ・CURST 
NOT REQUEST 01311A E558 2 31  E5EB BRA PUTo10 
01312 ネ 
MSB_PUT Q1313A ES5A 8O 1C A PUT10B SUBA  #$1C CURSOR CODE 
Q1314A ES5C 2E SD  E5EE EMI PUTq10 NO, NO OPERATION・. 
A 315A ES5E 34 02 A PSHS  A SAVE 
LSE PUT ] 1EA ESEQ BD  E77E A JSR BTOC 
01317A ES63 35 02 A PULS 4 
NOT REQUEST 01318A EEB5 48 LSLA 
REQUEST BIT STRING STORE | 01313A EBSB BE ECE4 Aa LDX #GETJCS CURSOR ENTRY 
| 0 ヨ 5 A JSR [AiX] CURSOR MOVE 
E787 A JSR CTOE BUFFER PTR. SET 
E1FC A JSE BUFPTR 
22 A CLE PUTCFG 
E5EE Aa JP PUTo10 
* 
| 20 A PUTSPC LDA 1 
| EB78 A PUTCHE EQU * 
| BF DG47 A STA CBPAD] CHAR STORE 
1 ヨ Im 層 + 
RESTORE A・. | に 1 Aa LDX ・EAAD 
| 2E A LDBE ・-ACL LOAD CUREENT ATTR 
EP9 A TST 隊 FILED? 
QC ES32 BPL PUT11Q NO. (THE FIELD TAG TS THE MSE.) 
BQ A OFE まま SO 
22 A TST PUTCFG CONTINUANCE ? 
ADD MARGIN | OR 。EG5 ヨ 2 EEQ PUT110 NO. 
IF MARGIN 1S 2ERO GO RETURN・ 01337A ESE ォ A JSR PUTATR ATTE SET ONE FIELD 
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1 LDE 。.ACL ロ 1454 ぬ 4 E715 ヨ 7 435 全 STA 
SKIP> Q1455A E717 D7 45 A STE 
に 1 FCE *BC CMPX # 1455A E713 引 Do3D Aa LDX 
A PUT11Q STE s% SET CUREENT ATTRIEUTE 91457A E71C 4F CLEA 
1 JSR CDSPE ロ n PUT75n INCA 
Aa JSE PUTINC CIPE 
A LDA #$FF ELO 
に STA PUTCFG CMPE 
FTSPUL (AB,X) EHS 
人 PULS ABE。XiPC STA 
* LDD 
キキ まま まま ます キキ まま STD 
# # | JSFE 
* EFASE FIELD * ERA 
# # 3 
まま まま まま ます n は お えよ ネ ま も う 】 
ま 01470 ま 
さる PUTOEL EQU ま ロ 147 1 ま EEPEAT 
に CLE PUTCFG ロ 147< * 
に 1 JSF ETOC 01473 まま まま まま えま 3 
A JMP ELKEY ロ 1474 # 
# | 01475 1 A PUTORC EQU 
キキ 本 ま まま まま まま 0147GA E745 BSE 
# # BCS 
# EELL * TFE 
* # ESR 
| まま まま まま まま まま ECS 
| * TSTB 
| A GETEEL EQU # EEQ 
A PUTOEL EQU # PUTSO5 JSE 
EUZZON DECE 
合 BITA BU2ZER ENE 
PUTNOP RTS RTS 
# 
ネ キ 本村 本 本 EQU 
# # PSHS 
ネ ERASE ALL キ # PUTDA1 EQU 
| # だ LDA 
まま まま る すう 3 お る まる) ENE 
| # LDA 
A PUTOCL EQU # | 144 EhI 
Aa LDA .IDEG+2 KIND OF PLACE ロ 1435A SEC 
| Aa JSR ERASE1 | 01436A RTSPUL 
に CLE PUTCFG A PULS 
| RTS PUTDA2 LDX 
| * LDA 
林木 本 本 | STX 
# # 1500A DEC 
* ネ NEM LINE キ | 01501A CLC 
# # ロ 1502A RTSPUL 
まま キキ | A PULS 
* | 01503A PUTDA3 JSR 
A PUTOCR STA PCRORD SET THE CR ORDER FLAG. | Q1504A LDX 
A CLR ・EPX SET THE MOST LEFT POSITION. 1505A STX 
A LDA ・CSCTL | Q150EA ERA 
Aa EITA 。#CSLALF IS THE AUTO LF ENAELE? | 01507 
EEC1 EEQ PUT550 NO。 n1508B 
A PUTOLF EQU ネ Q1503 
1 JSR PUTDM | Q1510 
A PUT55o EQU # | p1511 
A CLR PUTCFG 91512 
A PUT5EQ JMP BUFPTR p1513 3 
A PUTOHM LDA ・MDRG TOP Y COORDINATES 91514 E76E A PUTOES EQU 
01338A A STA -EPY Q1515A E7BE 3E 43 に 1 LDX 
01383A ESCA OF 45 A CLR ・EPX 01516A E7GD AG 84 A LDA 
Q1400A ESCC 2 F3 ESC1 ERA PUT550 01517A E7EF 2E QA E77B EMI 
01401 * Q1518A E771 8D OB EZ77E ESR 
01402 01513A E773 ED  EASQ A JSR 
01403 #4444 Q1520A E775 SD OF E787 ESR 
01404 01521A E778 BD  E1FC A JSR 
Q1405 1 START FIELD 4 91 E77B OF 22 A PUTOE3 CLR 
01408 | E77D 38 RTS 
01407 HU | *# 
01408 E77E : AETOC  LDX 
01408 ESCE A PUTOSF EQU ト 3 E781 A LDY 
01410A ESCE ED  E745 A JSR PUTDAT ATTR GET E785 20 07  E78E BEA 
01411A ESD1 25 35  E708 BCS PUT720 E787 BE Do58 A CTOE LDX 
01412A ESD3 84 SF A ANDA  #ー(AMFL+AMMD) -$FFO1 NOT AMFL E78A 198E Do45 A LDY 
01413A ESD5 ヨ 7 2E 人 STA ・・ACL | E7SE C5 OS A CTOEIM LDE 
01414A ESD7 BD  OE  EBE4 ESR PUTATR | E73o 7 E444 A JP 
+ 
01415A ESD ヨ 3E 43 A LDX ・BAAD | o1 内 
0131BA ESDE AB 4 に 1 LDA sX 0Q153 トド ホル ホネ ルル ルポ : 
91417A ESDD SA 80o A ORA #ANFL 0153 * ネ * 
01418A EEDF A7 84 A STA ュ X Q1 ネネ TAE ま * 
01413A ESE1 OF 2 A CLR PUTCFG 015 ま ま 
01420A ESE3 33 RTS o1 キキ 本 本 本 
01421 ネ | 0153 キ ま 
01422 ESE4 A PUTATR EQU ネ | 0153 E733 A PUTOTE EQU 
01423A ESE4 34 0B に 1 PSHS AB Q1540A E575 A JSR 
Q1424A ESES BE 48 A LDX .EAAD | Q1541A A LDA 
Q1425A EEEB AB 8 は A LDA sX LOAD THE ATTR IN CURR. POS. | Q1542A BSE 
0142BA EREA 84 3F A ANDA  # ま 3F PICKUP USER'S ATTR FIELD 01543A EEQ 
01427A ESEC A7 8 Aa STA ュ X 01544A RTS 
ESEE 31 2E A CMPA  ..ACL SAME AS CURR ATTER G1545 * 
EBFO 27 ESFE BEQ PUTAT ヨ YES, DONT RESTORE. ] Qu1546 E73D A TAECHK EQU 
E5F2 ヨ 5 に 1 LDA CSLCDS MONO | Qq1547A E7 ヨ D DR 21 A LDE 
ESF4 25 EEFE BNE PUTAT3 YES. GO RETURN. uo1548A E7 ヨ F C5 04 A EITE 
ESFS ヨ 5 2 Aa LDA ・-ACL Q154 ヨ 4 E7A1 27 。 15 E7EB EEQ 
EBFB A PUTAT5 EQU # no1550A E7A3 4D TSTA 
ESF8 A7 Bo A STA s+ 01551A E7A4 27 12  E7EB EEQ 
EBFA E5 84 A LOE 1X u1552A E A TFF 
ESFC 2A  FA  EBFB EPL PUTAT5 01553A LSRE 
EBFE PUTAT ヨ RTSPUL (AB) 01554A LSRE 
ESFE 35 SB に PULS AE。PC | 01555A LSEE 
* | Q155EA 人 a ANDA 
ネ キ キネ 本 本 キキ キキ 本 キ キネ キ | Q1557A A LDX 
* キ 01558A Aa LDA 
ま SET EUFFER ADDRESS キ uo15534 A LDX 
* * 015GOa Aa BITA 
キキ まま まる きま きま まき Q1551A RTS 
ま 1552A TAECK ヨ INCA 
E7oo A PUTOSE EQU * 01563A RTS 
G1448A E7o0 8BD 43  E745 BSR PUTDAT X CO-ORDINATE 01564 ネ 
01447A E702 2 04  E708 ECS PUT7zo Q1555 キキ キキ 本 本 
01448A E704 1F 8 ヨ A TFE AE Q1555 キ ネ 
Q1448A E7OB SD 3D  E745 BSR PUTDAT Y CO-OEDINATE Q1557 ネ INCREMANT キネ 
0p1450A E708 1025 ヨ EQD5 PUT720 LECS ERRG52 015G8 ま * 
91451A E7QC 1E A EXG AE 0156 ヨ キネ キキ キキ 本 
Qu1452A E7OE ED Aa JSR CAXCR 0157Q キネ 
1 E711 1924 FaCo EoD5 LECC ERRS2 ORDER ERROR 91571 E7BA A PUTINC EQU ネ 
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・EPX 01572A E7BA OC 45 Aa INC -BPX 
・EPY 01573A E7BC 5 45 A LDA .EPX 
#。。DMAP 01574A EZ7BEE 31 35 Aa CMPA  ..LNC 
01575A E7CO 24 16  E7D8 BEHS PUTIN5 EIGHT OVER 
01576 E7Cz A PUTIN2 EQU ま * 
ュ X++ 01577A E7C2 47 に LDX .EPAD INCREMENT CHAR PTR 
PUT75n 01578A ロ 1 A LEAX 1.X 
ー1,X 47 A STX -EPAD 
PUT75o 4 ヨコ Aa LDX ・EAAD INCREMENT ATTE PTR 
・DEG+S ド IND Q1 A LEAX の 
ー デ ュ X 4 に STX -EAAD 
・DEG RANGE 3 ヨコ A LDD --VCU INCREMENT VREAN PTR 
GETFNG 3E 人 ADDD  .EVAD 
PUT5SG 4 A STD ・EVAD 
RTS 
まま まま E7D5 A PUTIN3 EQU * 
+ E1FC 4 JMP EUFPTR 
HARACTER # 
# 45 A PUTIN5 CLER -EPX DOMN 
ERPSD1 21 A LDA .CSCTL | 
F7  E7D5 BI PUTIN3 | 
1 R | 
PUTDAT NO. OF FEF RT3Y39932991 | 
PUT7:zo # * 
AE * DOwN 
PUTDAT CHAE * 
PUT72Q # 寺本 | 
* 
PUT E7DE A PUTDM EQU * 
PUTCH 45 ^a INC BPY 
45 A LDA .EPY 
PUT8o5 4E A CHPA  .NDRG+1 
EF  E705 BLO PUTIN3 INNER 
# 4F A LDA .DRG+2 KIND OF UINDOM 
X Ga1 A CMPA  #1 
* 42  E82E BEQ SCROLL 
.COMAR+3 B * ま PAGE 
PUTDAS Q1510A E7EC ヨ 5 21 A LDA ・CSCTL 
CONT 01511A E7EE 85 08 A BITA 。#CSLPAG PAGE LIMIT WAIT ? | 
PUTDA3 OR  E7F8 EEQ PUTD7O NO. 
3A BUZZON 
% A D A BITA  EUZZER 
XPC 514A F A JSR KEYGET 
PUTIX 01515A E7FS 7E APUTD7ZO JMP PUTOCL 
ュ X O A ESCKEF EQU * コ ERASE KEY BUFFER 
PUTIX Q Aa ESCKLC EQU ! KEY LOCI 
・COIAR+S Qi A ESCKUL EQU KEY UNLOCK 
Q A ESCEUF EQU *G+$ ま 20 EUFFER MODE 
% の Q A ESCNBF EQU *H+ ま 20 NONEUFFER MODE | 
1 
CONTI E7FB BD A ESCSEQ JSR PUTDAT GET SECONDARY CHAR. 
#。COMAR+4 E 2! 】 BCS ESCSE ヨ 
PUTIX E Aa CMPA  。#ESCKEF EEASES 
PUTDA1 E 5 ENE ESCSE2 NO. 
E A JSR 。 KEFERA DO EUFFEF ERASE. 
E B ERA ESCSE ヨ 
AE A ESCSE2 CMPA  #ESCKLC LOCK? 
AE 3 ENE  。 ESCSE3 NO. 
AE A LDA #$FF SET LOCK. 
A A STA  KLOC 
* AE 32B BRA ESCSE3 
.BAAD 
・X AE ESCSE3 CMPA 。#ESCKUL UNLOCK7 
PUTOE3 FIELD TOP AE 2 ENE ESCSE4 NO. 
BTOC AE CLE KLOCK SET UNLOCI | 
CSL AE ] EFA ESCSE3 | 
CTOB ESCSE4 EQU ま 
BUFPTR E CHPA  #ESCEUF 
PUTCFG E ENE ESCSE5 
E LODA #$*FF SET EUFFER MODE 
E STA ド BFFLG 
#.EPY E 1 ERA ESCSE ヨ 
#.CY E ESCSE5 CMPA 。#ESCNEF NON EUFFER 
CTOEN E 1 ENE ESCSES ND, CHECK OTHER. 
#.CY E a CLR ド EFFLG SET NON EUFFER MODE 
#.BPY A ESCSES EQU # 
#B A ESCSE3 EQU * ま 
IOVE A JNP PUTo10 
本 本 ネネ 本 
# # 
* SCEOLL * 
# # | 
は 1363 くす 231 
ま A SCROLL EQU  # 
時 A LDA .NDEG+1 
TAECHE 1 ER NG | 
FUTOTB A STD  .CVTOP | 
A CHPA 。..DIAP+7 IS THE DISPLAY FULL SCROLLS 
EE ENE SCROo4 NOD. 
* A LDE -MDEG IS THE TOP OF SCEOLL UINDOM SAE AS THE TOP 
.CSCTL OF 
# DISPLAY" 
TBC 内 PSHS CC 
Ca BBD ENE SCEoo5 NO. 
UBS A LDA  ..FS DISPLAY PF 
6 554 BEQ SCRoo2 NO. 
A LDD ・CVTOP YES。 ERASE THE LAST LINE OF DISPLAY 
A ADDD  #$0202 
まあ 07 015 A STD CVTOP 
4BAS 01575A A JSE EKSVENM 
3 2 3 台 。 議 有 
W 1 IHSIDS4 
Me A STD .CVToP 
1 Aa SCOo2 EQU ま 
A JSR ERSVRI EEASE LAST LINE BEFOR SCROLLING.。 
A LDD .VOFST 
A ADDD  ..VLU 
VACON 
A EITA VACC 
A STD .VOFST 
A STD 。 SOFFST 
VACOFF 
A STA VACC 
A JSR INDICT 
ESEC ERA SCRo15 











































































































# | 0180GE ネネ キキ キキ 本 
Aa SCRO04 EQU # 01807 3 
A PSHS CC | 01808 A GTFLD EQU 
SCFuo5 DECA 0180 ヨ A GTSCRL EQU 
40 A CMPA  .NDRG Q1810 キネ 
BA ESBDC BEQ SCRQ ヨ Q ONLY ONE LINE 91811 A GETon EQU 
A LDA .NDRG+1 | 01812A E OF A CLE 
A JSE BVADL | Q1813A ED A JSR 
Aa TFR DX SOURCE END ADDRESS 01814 3 
A LDA ・MDRG | 01815 * RENOVE MODIFIED 
が JSR BVADL 01815 # 
A TFR DrY DESTINATION TOP 01817A E ヨ 35 SE 54 A LDX 
人 a ADDD  ..VLU A GETQ5Q LDA 
A TFE DiU SOURCE TOP Aa ANDA 
01703A VACON Aa STA 
A A BITA VACC ^A CMPX 
01704A A LDA CSLCDS MONO? 37 ELO 
01705A AB ENE MNSCRL YES. * 
0170EA A PSHS  X SOURCE END a GET10Q EQU 
01707A 3 A TFE  U.X LOAD TOP OF SOURCE TO X. Aa JSR 
01708A ESSF EC 83 SooO A MRSCRL LDD VMG,X 人 LDA 
017Q03A STD VMG,Y 人 A STA 
01710A LDD VRE,X 人 JSF 
Q1711A STD ・.VRY に JSF 
01712A LDD ュ X キ キ ^a PSHS 
01713A STD ュ Y+ キ ^ ら JSE 
91714A CMPX  .S 人 PULS 
01715A BLO MRSCRL 人 LDE: 
01715A LEAS 2。S 34 LENE 
01717A BRA SCRQ13 な CNPA 
ロ 1718A LEAX  ..VG,X ES ENE 
01719A A ヨ Bon A LEAY  ..VGY A JSF 
Q1720A C3 Sooo A LEAU  ..V6iU 341 EEA 
01721A 38 | BSE 。 COPLOP A GET11Q CHPA 
01722A 3 VACOFF 0 dED BLO 
Aa STA VACC な JSF 
! 341 BEA 
A SCEO15 LDA .DEG DESTINATION TOP ADDFESS GET12Q LSLA 
に 1 JSE BEADRL 人 LDX 
人 A PSHS XY SAVE 人 JSR 
Aa LDA DRG+1 SOURCE END ADDRESS E341 BRA 
Aa JSE BADRL ! 
に 1 PULS U LOAD DESTINATION TOP ADDEESS. + MINDOM RANGE 
A PSHS  Y SAVE ATTE'S SOURCE END ADDEESS. # 
Aa LEAY  』U SET Y DESTINATION TOP ADDRESS. *。 X CHAFR TOP 
A LDE ・.LNC *+。Y ATTR TOP 
A LEAU EuU SET U SOURCE TOP ADDEESS * 
ESF1 BSF COPLOP COPY THE CHAR. ^a GETFNG EQU 
a PULS XY LOAD SORCE ADDRESS TO X. 人 LDA 
* LOAD DESTINATION TOP ADDRESS TO Y. JSR 
人 き LDE LNC 人 STX 
A LEAU BY MAKE SOUECE TOP ADDEESS. ^ STY 
ESF1 ESF COPLOP COPY THE ATTR. | Aa LCA 
* | A JSR 
A SCFO ヨ O EQU * | A STX 
0 A LDD .CVTOP A STY 
01743A DECA GETNOP RTS 
01744A DECE * 
Q1745A A STA .BPY さも せれ は は 1】 
01745A A STD ・CVTOP * ネ *# 
01747A A PULS CC * ネ DATA * 
ロ 1748A ESEE EEQ SCRo35 和 ネ 
q1748A A JSE ERSVRM 本 林 玉 まま 
01750A A SCFRQ ヨ 5 JSR ERSEUF 5 キ 
017514 a JNP ASNFLD ASSUNE FIELD. 91870 E38A A GETDT EQU 
Q1752 H Qo1871A E3BA ヨ E 5A A LDX 
EsF1 A COPLOP EQU # 01872A E38C 10 ヨ E 5C Aa LDY 
*# 01873A EEF ES  A4 A LDE 
* COPY DATA 01874A EB ヨ 1 C5 10 A BITB 
# 01875A E ヨ 33 2 04 ESBS EEQ 
* U SOUFECE TOP ADDEESS 01876A E3 ヨ 5 BUZzZON 
*# Y DESTINATION TOP ADDEESS A E ヨ 85 B5  D4o3  A BITA 
* X SOURCE END ADDEESS 01877A E3 ヨ 8 33 RTS 
1 8 * ま 
(OLT | 33 A GETDTo TST 
*# MOD (X-U、8) 、EQ.Q 35 ESD2 ENE 
* EK! A GETDT1 STA 
19 A PSHS  X 40 Aa ORE 
15 A COPLDO PULU DX | 4 A STE 
A4 A STD ュ Y E518 Aa JSF 
EA44 A JSR 
Q1 A STX 2.Y 14 ESEF ECC 
nu1 A PULU  D,X 4F A LDA 
Q1 A STD 4.Y DECA 
01770A A STX BY | OF ESEF BNE 
091771A Aa LEAY SuY | ES2E 人 A JSR 
01772A Aa CMPU  ,S | As A COH 
Q1773A 3 ELO COPLDO | に 1 A CLR 
01774A RTSPUL X | 45 が LDD 
A A PULS XPC 58 A STD 
Q1775 * E1FC 4 JP 
01776 A ESC EQU  $1B GETDT4 RTS 
Q1777 * E3C3 AGETDT2 JSR 
01778 A PUTOED EQU ま 2 人 は A LDE 
01773A A FDE PUTNOP *oo 018 ヨ 3A E ヨ C4 2 03 ESC3 BPL 
人 A A FDE PUTNOP  * ま Q1 5 EUZzON 
01781A Aa FDE PUTNOP A BITA 
01782A A FDB PUTNOP | A GETDT3 LDX 
01783A A FDE PUTNOP | に CIHPX 
01784A A FDE PUTOEL ES3EE ELS 
人 A FDE PUTNOP 人 JIP 
01786A Aa FDE PUTOBL * 
01787A A FDE PUTOES 人 GETINS EQU 
01788A A FDE PUTOTE 人 CLR 
Aa FDE PUTOLF 4 LEAY 
A FDE PUTOHIY A GETI10 TST 
1 FDE PUTOCL Q ロ 1 ヨ 1QA E3E2 BEQ 
A FDE PUTOCE' Qq1 ヨ 11A E ヨ DA SD An に 1 TST 
A FDE PUTNOP 01 ヨ 12A E ヨ DC SA F8 E3D5 EPL 
Q1784A A FDBE PUTNOP ロ 1813A EUzZON 
Q17 ヨ 5A A FDE PUTNOP 人 ^ EITA 
Q17SBEA A FDE PUTOSF 18134 FTS 
01737A A FDE PUTOSE | Q1 ヨ 15 A GETIzQ EQU 
01788A Aa FDE PUTOEC 5 A LDX 
01733 ^a PSHS 
Q18Qn TTL GETCM - GET CODE - | A LDX 
01802 も 31131329221513 Aa LDY 
01803 * ま ネ A GETI3O EQU 
01804 ネ GET COMMAND ネ 人 TFR 
01805 ネ * A LDA 
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ト よ そえ 01 ら LDE sY 
91324A ANDE  #ー-AMFL-$FFO1 REMOVE FIELD 
PUTEND 25A PSHS AB STORE POS DATA SAVE 
GTFLD+ 1 人 TFF U.D 
a ESF GETDT1 
キネ 1 JSF CEADE 
PUTCFG a PULS AiE 
CURSET 人 a TSTa 
A ENE GETI3O NOT NULL 
DATA TAG a PULS D 
GTTOPA STD .CY RESTORE CURSOF POS. 
電 】 ATTR TST GTSCRL EXECUTED SCROLL“ 
#ーANMD-$FFO1 RENOVE BEQ CSE NO CURSOR TO RIGHT 
、X+ CNPA  .NMDRG YES。 1S THE CURSOR ON THE START LINE 
GTETMA EEQ GETI4Q YES. 
GETQ5Q DEC .CY N0. CURSOR TO UP. 
ERA CSF CUESOR TO RIGHT 
* GETI4Q CLR -CX CURSOR TO TOP OF WINDOM. 
CEADR ETS 
#1 * 
・CURTI キキ キキ ます キネ キネ キキ キキ キキ 
CURGO # + 
KEYGET #。 RIGHT.MEAP キネ 
人 ム A # ま 
CUFE'SCL キキ キキ キキ キキ キキ キキ キキ 
A * 
・AEET AEOFRTP CSRL EQU # 
CHDCTL YES. INC ・CX 
# ま 7F 。 DELETE LDA ・CX 
GET11Q CMPA ・・LNC 
GETDEL ELT CSRL ヨ o 
GET1QQ CLE EX OVER 
せり CSRLSO RTS 
GET12Q * 
GETDT DATA キキ キキ キキ キキ キキ キキ キキ 
GET1QQ # ま 
* LEFT.MRAP * 
RGETJMP CONTROL KEY # ネ 
[A,X] は まもる 66233 
GET1nn # 
CSLL EQU 3 
DEC 26X 
BPL CSLL3o 
LDA ・-LNC 
DECA 
STA CX 
ま 01 ヨ 70A CSLL3o RTS 
DEG+1 91371 ネ 
EADEL 01 ヨ 72 EEEYESYYTD3 
GTETMC CHAE BTN 91373 ボ * 
GTETMA ATTR BTM キ ま 。 UP・MWRAP ネ 
DEG * キ 
EADRL SR23331333 は 3 
IORE A CsUL EQU # 
KUR A DEC  .cy 
Aa LDA .CY 
Aa CMPA  .NDRG 
EA35 EGE CSUL3Q 
Aa LDA DRG+1 
DECA 
A STA ・CY 
CSUL3Q RTS 
内 # 
.CBAD は 33 も 4631313 も 363: 
・CAAD # 3 
Y * DOMN.MRAP * 
#AMPT # ネ 
BETDTO まま まま すす 333 は する 31 
* 
BUZZER EA37 ACSDL EQU # 
^a INC .CY 
58 A LDA sBY 
..INS INSERT ? 4E A CMPA  .MDRKG+ 
GETINS YES G4 EEA43 BLT CSDL3o 
,X 4D A LDA ・PDEG 
AMMD 58 A STA sCY 
,Y CSDL3o KTS 
CDSPC * 
CSE ネネ 本村 本 
GETDT2 * * 
・MDRG+2 * RIGHT ネ 
* ネ 
GETDT2 PAGE E ま まま また さき よ まえ 
SCROLL に 
GTSCRL SET SCEOLL FLAG FOR INSERT NODE. EA44 Aa CSE EQU ネ 
_EPX EA44 QC ド A INC CX 
EPY EA4E 3 ョ A LDA ・CX 
CY EA48 ヨ 1 Aa CMPA  ..LNC 
BUFPTR EA4A 2D EAS5D BLT CSRgo 
EA4C OF A CLR ・CX 
CEADR EA4E QC 1 INC ・EY 
。Y Q2015A EA5O 85 A LDA sGY 
GETDT3 02017A EA52 ヨ 1 に 1】 CHPA ・MDRG+1 
02018A EA54 2D  Qo7  EA5D BLT CSE3o 
BUZZER Qzo1 ヨ A EA55 3E 4D A LDA IDRG 
-CY 02020A EA58 7 58 A STA .CY 
BPY Oz2021A EA5A 14 oO1 SEC 
GETDT4 02022A EA5C 3 RTS 
CTOE 02023 ネ 
02024 EA5D A CSL3Oo EQU ま 
3 02025A EA5D 1C FE CSR30 CLC 
GTSCRL 02025A EA5F 33 RTS 
1.Y PERE INC 02027 ネ 
ュ X 寺 NULL SEARCH 02028 トド ネ それ ネネ ャ ネ を そそ 3 
SETIzQ FOUND Oz202 ヨ ネ ネ 
。Y キ AMFL IS MSB 02030 * ネ LEFT * ネ 
GETI10 NOT FIELD 02031 ネ ネ 
Q2032 も 33632 
BUZZER 02033 * ネ 
02034 EAso A CSL EQU 3 
キ 02035A EASO O4 5 ヨ A DEC 。GX 
・CY 02036A EAS2 2A F ヨ  EA5D BPL CSL3o 
X 02037A EA54 6 36 A LDA ・LNC 
・CBAD 02038A EABB 4A DECA 
.CAAD 02039A EAS7 37 53 ヨ A STA ・CX 
ま Oo2040A EAS ヨ 04 58 A DEC CyY 
DiU CHAR,ATTR SAVE 02041A EABB ヨ 5 58 A LDA ・CY 
3X Oz042A EASD ヨ 1 4D A CMPA  .MDRG 
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Ooz2o43A EASF 2C EC  EA5D EGE CSLSo 本 
02044A EA71 5 4E A LDA MDRG+1 | キ 
02045A EA73 4A DECA * ま EEASE FIELD 
0204BA EA74 7 58 A STA .CY # 
Q2047A EA7B 1A  Q1 SEC MLAALLESL 
Oz048A EA78 33 RTS # 
02043 * ネ A ELREY EQU 
0z050 3 人 LDD 
o2051 オキ キネ 本 本 内 PSHS 
02052 。 * キネ ま 全 LDX 
Qz053 * ま ENCODE C0-ORDINATE キ 還 LDY 
Qz054 # キ 人 LDE 
Qzo55 2 ネネ キキ も る ささ する る 3 る も 3 る すさ すう 3 な OFE 
02058 ネ 人 _ STE 
Oz2057 GETENC EQU * Aa ELEEYS EQU 
OZ05BA TFE X.D CHAR A LDA 
SUED GTTOPC OFFSET EE07 EEG 
EEA GETEN CLFA 
ま 合 STA 
GETENA EQU *# が LDE 
TFR YiD A JSE 
SUED GTTOPA OFFSET A ELEEY4 EQU 
# が JSF 
GETEN EQU # 人 JSR 
LDX MDRG Aa LDE 
STX .CY TOP Y,DESTEOY .CX EAFB BPL 
# ^A CMPX 
GETEN5 SUED  ..LNCD EE1C BLS 
BNI GETEN ヨ ^a LDD 
INC ・CY に STD 
BFA GETEN5 A JSR 
| A ELKEYE EQU 
GETEN3 ADDD  ..LNCD | が PULS 
STE .CX | A STD 
RTS | RTS 
H 3 
3 する さる 3 する 3 は る すれ る 3 る は 
キ キ 4 
+ HONE キ * 
# * | * 
Pt | ま 
| 
# | A GETDUP EQU 
CSHONE EQU * A LDA 
LDY BTTOPA ATTR 02205A EB23 DB 58 Aa LDE 
CSHOMo LDA RAPMFL Qo220BA EB25 D1 4D Aa CIPB 
LDE #AMPT 02207A EB27 2 2C  EB55 BEQ 
CSHOM5 BITA .Y 02208A EB2 ヨ 4Q NEGA 
BEQ CSHON7 02208A EB2, SKIP1 
BITB  .Y A EEB2A 21 A FCE 
BEQ CSHOM ヨ 0z2210 ネ 
CSHOM7 LEAY 1.Y A TAE EQU 
CMPY GTETMA CLEA 
ELO CSHON5 A TAEDUP LDE 
CSHOM8 LDY GTTOPA A PSHS 
5 CSHON3 BSE GETENA Aa CLE 
02038A EAAF 33 RTS A TAB10 LDA 
020B8 キ | A LDE 
も も る る る 313131333333 EE3C EEQ 
* * ま A LDX 
* FORMARD FIELD * A LDA 
* # A TAB15 JSR 
02104 まる ます 3 も 333131313333. A JSR 
oz105 * A LDA 
02105 EAEQ Aa GETFFD EQU * A JSR 
Qz107A EAEO ED 。 EA43 Aa JSR CSR RIGHT | EE51 ENE 
K A JSE CBADR A LDX 
7 BFEA CSHONQ a LDE 
キ A BITB 
# | 532 EEQ 
* BACKMAED FIELD | A TAEO PULS 
# A STE 
GETBFD EQU # GETDU ヨ RTS 
JSE CSL LEFT 3 
4 JSR CEADR | は も 3 ル 3 キキ 5 
| キ 
GETEH EQU * | キネ EIGHT WOED 
* * 
+ SEAFCH UNPEOTECTED FIELD 23 も 331312413 
* FOE EACK 1 1 
い 02240 EB5E Aa CSU EQU 
EAEE CC 8o1o Aa Lpp #AMFL キ 25E+AMPT Q2241A EB5S QF  A5 A CLE 
GETEH5 BITA ,Y Aa LDX 
EEQ GETBH7 NOFIELD | A LDY 
EITE ijY | EE75 CSRM1Q BSR 
EEQ CSHOM3 DEFINE EB5D BCS 
GETEH7 LEAY  -1.Y # 
CMPY GTTOPA 75 CSEM20 ESR 
BEHS GETEH5 EE51 ECC 
ERA CSHOB PHISICAL HONE A LEAX 
* * 
本 本 まま * ON 
キ ま キ ま 
* CLEAE キ A CSEWBO CHPX 
| EB72 BLO 
キキ ミド ミド ミト ャ | | ^a LDA 
# | A STA 
GETCLE EQU # | Aa CLF 
LDA -NDEG+2 | RTS 
JSE EFASE1 | A CSKM ヨ 5 JP 
LDD ・EPY | キネ 
STD ・CY | A CSRMS EQU 
LDa だ | A TST 
JMP GETCE1 ENE 
# ESR 
キキ まま キキ キキ 合 LEAX 
# * A LEAY 
* ま INSERT * が LDE 
電 キ に 1 EITE 
まま すす 3 も も さす る 3 EEB7 EEQ 
* | 人 INC 
INSEFT EQU * CSEMS5 RTS 
CONM .・INS Aa CSRMS ヨ LEAS 
BNE INSEF5 EBB7 BRA 
INSOFF * 
STA INSLED A CSMCK EQU 
FTS | Aa LDA 
INSEE5 INSON | A LDU 
BITA INSLED | Aa LDE 
FTS | A CSMCK1 CHPA 
# | HBE ELO 






























































[ 
bt | 5F CMPA  -1,U 
ま OB ELS CSMCE3 
REY | DECE 
H F5 ENE CSCE1 
本 | FE CLC 
RTS 
1 o1 SEC 
.CY RTS 
p 1 
.CBAD すま まま 
.CAAD ま ま 
Y ま LEFT MORD * 
#ANHD NODIFY TAG 1 B 
JY キキ すす キキ 
F 1 
人 CsLu EQU #* 
ELKEY3 NULL SKIP EEA4 OF CLE GTFLD 
| EEAS ED JSE CSL 
,X EEA ED JSF CEADR 
YY EBAC SD ヨ CSLu1O BSE CSLUS 
CDSPC EBAE 24 B CSLM10 OFF 
* * 
CSR EBBO BD ” Q7  EBBB CSLMzOESR CSLMS 
CEADR EEE2 25 FC EBBo ECS CSLuso ON 
ュ Y 1S HERE THE TOP OF FIELD? 
ELKEY2 NO. (FIELD FLAG IS MSB) EBB4 31 22 A LEAY zuY 
.BPAD IS HERE OVER THE BUFFER POINTER? EBBS 7E EA7ZF AaCSLU3qJNP GETENA 
ELKEYS 
。S EBE8 ”ACSLMS EQU * 
・BPY EEE ヨ QD  A5 A TST GTFLp 
EUFPTR EEEE 25 OF  EBCC ENE CSLMS3 
キ EEBD CE 8o A LDB WANFL 
p EEBBF E5  A4 A BITE ,Y 
.CY EBC1 27 02 EEC5 BEQO CSLuS5 
EEC3 OC  A5 A INE GTFLD 
| EBC5 8D "C5  EBSC CSLMS5 ESE CSMCEK 
02317A EBC7 30 1F A LEAX  -1.X 
02318A EBCB 31 3F A LEAY -1.Y 
02313A EECB 39 RTS 
02320A EBCC 32 62 A CSLMS ヨ LEAS 。 2,S 1 NEST REMOVE 
02321A EBCE 31 21 A LEAY 1.Y 
* DUPLICATE G2322A EBDO 20  E4  EBBG BRA CSLuao 
、、LNC 02323 . * 
.CY 02324A EBD2 o4 A CSUCKT FCEB 4 
、MDREG 02325A EED3 3o A FCB "0,' ヨ 
GETDU A EBD4 38 A 
02325A EED5 41 A FCB  'Au'z 
| A EBDS 5A A 
*$2 02327A EED7 1 A FCB *B1,$7A 
EBDS 7A A 
# EED ヨ SO A FCB $BO。*FF 
| EBDA FF A 
..INS R 
p OR2331332233 
。.INS UNEFFECT 1 * 
F * BACKSPACE & DELETE * 
、S 1S IT DUPLICATE ま * 
TAB15 NO, TAB. | RSTTSY23311t1139391 
、CBAD 1 
B。X EBDE 38 GETESB RTS 
GETDT EEDC GETES EQU  * 
CBADR LDX  .CAAD 
2 LDA  ,X 
TABCHK TAB STOP? BI ” GETBS3 FIELD 
TAESQ 。 YES. (TAE DISAELE) JSE CSL EACE 
.CAAD NO. JSE CBEADR 
際 FIELD TOP H DELETE 
#ANFL+ANPT OR PROTECTY R 
TAE1O NO. RERESE 
p * 
..INS * DEL *# 
+ * 
REERSSD 
ま 計 ま ネ 
R GETDEL EQU  * 
* | LDA #$FF LOCK KEYEOAD 
+ | STA  KLOCK 
ま ボ ま ] LDD sCY 
PSHS  D 
53 LDX  .CEAD 
GTFLD FIELD FOUND CLEAR LDY CAAD 
.CBAD LOE  ,Y 
・CAAD EITB  #ANPT 
CSRuS EEQ GETD1o 
CSRu10 ON BUzzON 
BITA BEUZZER 
CSRuS ERA 
CSRU20 OFF GETD1n EQU 
=1.X STOP POS LDE 
EITB 
| ENE 
| LDA 
GTBTC STA 
CSF35 TST 
.NDRG OVER | BEPL 2 
:EY | ORE #ANFL FIELD MARK 
36 GETD12 STB  ,\+ 
CMPY  ・BAAD 
GETENC EC1E ENE GETD15 
A PSHS  D 
』 EC19 BD E787  A JSR CTOE 
GTFLD 02377A EC1C 35 05 A PULS 0 
CSFMSB 02378 EC1E AGETD15EQU キネ 
CSuC 02378A ECTE BD  E518 A JSR COSPC 
11X 02380A EC21 BD  EA44  A JSR CSR 
0 E3CS  A JSR CBADR 
#ANFL 84 A LDA  .X 
JY D5 Ecoo BNE GETD1Qo 
CSFS5 * 
STEEB 02385A EC2B 4F GETDz0 CLRA 
A4 A LDB  .y 
2,S 40 A ORE  #AMND 
CSRMBo A4 A STE  ,Y 
4 A STA  ,X 
+ | E518  A JSE CDSPC 
1X Q テ A BETD28 CLR  KLOCK UNLOCK KEYEOAD 
#CSMCET | o5 A PULS D 
、U+ | 58 A STD  .cy 
1U++ | RTS 
CSMCRE * 
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キネ キキ ネネ キキ キキ まま 
キ ま も 


ま CANCEL キ 


キ キ 
まま キキ キキ キキ キキ キキ 
キ 


GETCAN EQU ま 


LDA #1 
SKIP1 
FCE ま 21 


ま 
キキ キキ キキ キキ キキ 


キ キ 
ま ENTEE ま * 
キ キ 





キ 





みよ ホホ キネ ホホ ネオ | 
キ 
ECEC 人 GETEAD EQU 
ECEC DC 5 全 LDD 
ECEE 1E B ヨ 合 EXG 
全 STD 
RTS 





ま 
キキ キキ キキ まま まま まま キ 


も 
ま 。 BET CHAEACTEF 
ま 


まま 
+ 



































































キキ キ まま まま キネ キキ キ ECF+ SOFG 
R Doa0o AaA .*ORG SET 
GETCK EQU * ECF+ DS 
CLEA Daau 人 ム CECND EQU 
GETCR1 EQU 当 、 Doa1 A .$ ま ORG SET 
STA -EKEY ECF+ DS 
LEAS 2、S REMOVE EETURN DaA1 ACEY1 EQU 
* DoA2 Aa .*OEG SET 
* SEND MODIFIED FIELD ECF4 DS 
* DoA2 。 ACEX1 EQU 
GETC EQU キ # DoA3  A .*ORG SET 
LDA ・EREY ECF+ DS 
STA .COIAR+3 | DoA43 。 ACBYz EQU 
LDY GTTOPA DoA4 。  A .$OEG SET 
LDE #AMMD ECF4 ps 
GETCo5 LDA SV DoA4 ACEX2 EQU 
EPL GETCo7 DoA5 。 A .*OEG SET 
LEAU  ,Y 0z537A ECF4 DS 
GETCQ7 BEITE ュ Y+ DuA5 A ム CEXTOP EQU 
1 BNE GETC1Q DoAE Aa .$ ま ORG SET 
CHPY GTETMA 、 ECF+ Ds 
BLO GETCo5 DoAa5 。 AaCPEAT EQU 
DoA7 Aa .*%OEG SET 
* NO DATA ECF+ DS 
* | Do47 AaCPECNT EQU 
CLE COIAR+4 A .*%ORG SET 
RTS Q2540A ECF4 DS 
* A CESAVE EQU 
A GETC1O EQU  * | A .$ORG SET 
A LEAY  -1.Y SET THE FIRST OF MODIFY. | キ 
A LDE 才 FLGENT 
A GETC15 ANDE 。#$FF-AMD | CGELK2 FCE 
A STE rY+ CLEAR THE MODIFYED DATA TAG. | CGEL ド 1 CLFA 
A LDE 放 STA 
7 BPL GETC15 MORE DATA IN FIELD. ES 
A LEAY  .U LDU 
A LEAX  ..CRE-..ATEU | CLE 
A PSHS XY | CGE1OQ ESR 
A JSR GETENC | LDA 
A PULS XY | EEQ 
A LDU #.CONAR+4 | LDA 
A LDA 3 ESR 
A STA ュ U+ A CGE120 LDA 
A LDA #*12 SETFIELD BSE 
A STA ュ U+ BRA 
A LDD eNA 尼 
A EXG AiB CGEDT EQU 
A STD ュ U++ | CHPU 
A LEAY 1.Y PRE INC THE ATTR PTR. | BLO 
3 | 0255BA JSR 
A GETC2O EQU キネ | 02559A LDU 
A LDA ュ X+ Q25EOA CLR 
ECA7 BEQ GETC35 nz5E14 C6EDT5 INC 
A CHPU  #.COHAR+128 Q STA 
ECA2 BLO GETC3o RTS 
Q24B5A EC ヨ ヨ BD  EOF5  A JSE CONTO # 
Q246BA ECBC 7F  D384 Aa CLR ・COMAR+4 CEINIT EQU 
Q2467A ECF CE  D385  A LDU きま COMAR+5 | LDD 
02488 ECA2 Aa GETC30 EQU JSR 
Q24E3A ECA2 A7 CO A STA YUr ECC 
Q2470A ECA4 7C  D384 Aa INC ・CONAR+4 STA 
Oz471A ECA7 ER AO A GETC35 LDE sY+ STE 
02472A ECA ヨ 2A  E4 ECEF BPL GETCzo LDD 
Qz473A ECAB 3 RTS JSR 
02474 * CEINO5 LBCC 
0z475 キ CNPA 
| 02475 * CONTROL KEY JUNP TAELE | BEHS 
| 02477 * ネ A STA 
02478A ECAC E83 A GETJMP FDBE GETNOP *oo 人 LDA 
Q2473A ECAE E38 ヨ A FDE GETNOP ま *Q1 A CEIN50 STA 
02480A ECEQ EBA4 4 FDE CSLM  $Q2 Aa CNPE 
02481A ECB2 EC3E Aa FDE GETCAN *$Q3 2 D BHS 
02482A ECB4 E383  A FDB GETNOP *Q04 025g18 ED4S D7 Aa1 A STE 
02483A ECBG EAEC Aa FDE ELKEY  *Q5 625824 ED4A FE  D384 人 LDE 
02484A ECBB A FDB CSRM ま *OB Q2583A ED4D D7  aA3 A CEINEQO STB 
02485A ECBA A FDE GETBEL *Q7 Q2584A ED4F DE Az2 A LDE 
( ECBC A FDE GETBS  *Q8 A5 A STE 
ECEE A FDE TABE *03 RTS 
ECCQ A FDE GETNOP *OA キ 
ECC2 A FDE CSHONE *OB ED54 ACELADE EQU 
ECC+ A FDE GETCLR *QC A1 A LDD 
ECCE Aa FDE GETCE  *QD AB A STD 
ECC8 A FDE GETNOP *OE | 3 A CMPA 
ECCA A FDE GETNOP *QF 10 EDBC BEHI 
ECCC A FDE GETNOP *1Q E20C JSE 
ECCE Aa FDE GETDUP *11 A1 人 LDD 
ECDo A FDE INSERT  $12 | INCE 
ECDz A FDE GETNOP $*13 0253BA EDS2 D1  A4 A CNPBE 
ECD4+ A FDE GETNOP $13 025 ヨ 7A EDG4 23 03 EDS ヨ ELS 
ECDG A FDE GETNOP $*15 02538A EDEE 4C INCA 
ECDS A FDE ” BETNOP $18 Oz5 ヨ 3A EDB7 DR  A5 Aa LDEI 
ECDA A FDE GETNOP ま 17 02BooA EDS ヨ DD A1 A CELAD7 STD 
ECDC A FDE GETCAN *18 02B01A EDEE 3 ヨ RTS 
ECDE A FDB GETBFD ま 18 02BO2A EDBC 32 B2 A CBLEND LEAS 
ECEQ A FDE GETFFD まま 1A 926Q3A EDSE 7E  E27D し 1 JMP 
ECE2 A FDE GETNOP $1B 092604 ネ 
ECE4 A GETJCS FDE CSRL  $*1C OzSO5 玉林 
ECE5 A FDE CSLL  *D 92B05 * 
ECES 和 FDE CSUL  s*1E 02Bo7 キネ 。 PUT CHARACTER 
ECEA A FDE CSDL ま *1F 02508 ネ 
3 GBS9 森林 本 ボ 本 
TTL GBADR - CONSOLE CODE - ネ 
キネ 本 ネ ネネ ネネ キネ 926114 ED71 FLGENT 
A ED71 86 A CPELK2 FCB 
* ネ GET BUFFER ADDREESS キ AA ED72 4F CPBLK1 CLRA 
























































A ED73 37 AO A STA CBECMD 
Oz612A ED75 8D  AC ED23 BSR CBINIT 
02613A ED77 CE  D3B7  A LDU #CNDPRM+ は 
# OzB14A ED7A EC  C1 A LDD 。U++ 
BPY Oz515A ED7C DD As A STD CPEAT 
AiE oz2s15A EDZE BD  D4 ED54 CPB1OO ESR CBELADR 
・COMAR+3 AO 人 LDA CECI 
03 ED87 BNE  CPE12o 
AE A LDA  CPEAT 
キキ キキ キネ キキ E| SKIP ミ S 
# A SC 人 き FCE $*SC CHPX # 
BLOCK * AE 1C EDA5 CPB1zO BSR  CPBDT 
A EE| き A TFR AuB 
本 本 本 A | 8 EDA5 ESE CPEDT 
A ED8I 4 A STA ュ X 
MO 人 A ED: A4 が STE sY 
・MOE ド AE 0G A PSHS D 
CECNHD,1 A EI Ag Aa LDD CBSAVE 
,*OEG 5A E225 Aa JSE EVAD 
・ あ ORG+ 1 A EI E+ A LDX sS 
CBY1。1 AE E4 A STU 8 
・ ま も ORG A ED: Q1 A EXG D,X 
・ ま OFEG+ 1 A ED: E51p A JSR CDSP 
CEX1.1 A EDA1 40 A PULS U 
N A EDA3 D3 ED7E EKA CPE10n 
キ 
EDA5 AaCPEDT EQU H 
A7 A DEC CPBCNT 
10 EDE ヨ EPL CPEDT5 
A LDA 。.CONT 
DeC EPL CBLEND 
A JSR CONTI 
A LDU #CHDPRIM 
A LDA ュ U+ 
A STA  CPECNT 
EDA5 BRA  CPEDT 
A CPEDT5 LDA 。U+ 
.$ORG+1 RTS 
CPECNT、1 * 
・$ORG キネ 
ニー 
・ ま ORG+1 02651 * TABSET 
CBSAVE,2 02652 * ネ 
・ ま ORG 02653 EDBC Aa TABSET EQU ネ 
・$ORG+2 02654A EDBC SE  D38S3  A LDX #CMDPRI TABSET DATA 
02855A EDEF 108E DO24  A LDY #.TABST TAESET AREA 
CGELK1,CGBLK2CBCPD 2B5BA EDC3 CE 0A A LDE  #1O SO BITS FOR USE 
BE LDA # ozB57A EDC5 7E  E44A  A JMP MOVE SET & RETURN TO MAIN 
0255 ヨ 肖 
CECID 02EBO * CONSOLE CONTEOL 
CBINIT * ネ 
#CNDPRI A CNSCTL EQU キネ 
ュ U+ 026B3A EDCB BG Aa LDA CMDPEM 
CELADR Q2B54A EDCE ヨ 7 21 A CNSINT STA .CSCTL SET THE CONTROL MORD. 
CECID 02SS5A EDCD 85 0Q1 A BITA 。#CSLCUR DO YOU WANT CURSOR 
CGE120 026BGA EDCF 2 12 EDE3 BEQ 。 CUKOFF NO, GO OFF THE CURSOR. 
Y 0z657A EDD1 15 EDEB BSR 。 CURSET YES,。 SET THE CURSOR ADDRESS. 
CGEDT 025B8A EDD3 1C A CURON LDA .CURSE MAS THE CURSOR SELECTED? 
4 0265 ヨ A EDD5 44 LSRA 
CGEDT 0270A EDDG O6 EDDE BCS CUEON5 YES. 
CGE100 5 OB A LDA #$*05 NO. SET THE CURSOK TIMER. 
1D A STA .CURTM 
* 1E A CLF .CUEST CLEAR THE CURSOR STATUS. 
#COMEND Q1 A CUEON5 LDA # ロ 1 SET THE CURSOR SELECT BIT 
CGEDT5 1C A STA ・CURSR 
CONTO RTS 
#CMDPRM QB8 EDED CUEOFF ESR 。 CURSCL STOP AND CLEAR THE CURSOR. 
iU+ 1C A CLE .CURSK CLEAF THE CUKSOR SELECT EIT. 
CHDPRI RTS 
ュ U+ 17 EEQ1 CUESET ESE CUESTP STOP THE CURSOE 
E77E 4A JMP ETOC 
12 EEQ1 CUESCL ESR CURSTP STOP THE CURSOR. 
ネ .1E A CURCLR LDA .CURST IS IT REVERCE 
ChDPRI OD EEoo EEQ CUERTS NO. 
CAXCR ヨ F DO5A A LDa [.CBAD] YES. 
CEINo5 F Do5C Aa LDE [.CAAD] 
CBX1 E518 Aa JSR 。 CDSPC DISPLAY NORMAL CHAR. 
CEY1 1E A CLE .CURST CLEAR THE REVERSE FLAG・ 
CHDPRM+2 CUERTS RTS 
CAXCR 3 A CUESTP LDA .CUESE STOP THE CURSOR' 
ERRGS1 
BQ A OFA # あ 0 
CEX 1 04 EEQOE ERA CURSTA 
CBIN5Q 1C A CUEGO LDA ・CUESR CLEAF THE CUESOR STOP. 
CEX 1 7F 全 aNDA # ま 7F 
CDPRI 1C A CURSTA STA .CURSR 
CEX2 RTS 
CEY1 A CSLCUFE EQU 
CEIN5q A CSLOED EQU 
CEY1 Aa CSLTAE EQU 
CDPRf+1 A CSLPAG EQU 
CBY2 A CSLSUS EQU 
CEX1 A CSLALF EQU 
CEXTOP A INDICT EQU * 
キ PROGEAPAELE FUNCTION REY'S STEING 
* ま INDICATOR. 
ま 和 
CEY1 SOEG  .EOXX1 
CESAVE A . ま OEG SET .BOXX1 
CEY2 Qz710A EEOE DS INDLP1,1 
CELEND A INDLP1 EQU . ま DEG 
EADE A .$ORG SET . 和 DEG+ 1 
CEY1 Oz7114 EEOE DS INDLP2。1 
_ Aa INDLP2 EQU 
CEX< A .*$OEG SET 
CELAD7 0z712A EEOE DS 
A INDLP3 EQU 
CBXTOP Aa . ま ORG SET 
CEY1 Q2713A EEOE DS 
了 A INDPF EQU 
2。S REMOVE ム . ま OEG SET 
ASSFLD UINDOM TOP FIELD MADE & RETURN DS 
は A INDESV EQU 
MM a .$OEG SET . ま DRG+ 1 
3 
BLOCK * 内 LDA ・・FS 
* EE32 EEQ INDIC ヨ 3 NO DISPLAY DIEECT 
本 水 A LDA  #15 NUIEEE OF CHAE FOR DISPLAY 
3 フ | の 
CPELK1,CPBLK2,CECD EE1A BEG NBtEP YYESET 
*BE LDA # A LDA  #7 NO. 
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に ドー トバ ドー5KNe 
YIi 中 導出 生 
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oc8 は BE 
A INDICS STA INDPF 桂 2 電 2 ST 
A LDA Fr EEDD SD BSK 
A STA INDESV BCL SAVE EEDO 80 8 
E A CLF ..ECL BACK BLACI EEDE BE EpX 
上 A LDX PFTBL EEE2 9E SA 
EI 1 LDA ・・DHAP+5 EEE7 SF STX 
ョ RES EEE3 BSR 
上 1 UN EEEE BE LDX 
| LDA ・・DHAP+A EEEE'3F STX 
E ESF IiNDI EEEE 3 NN 
AE LDE INDESV FOX 
E A STE  ..BCL 9 
AE INDICH FTS + 
6 EEF7 ALINE2Q EQU 
全 INDI EQU キ N 
に 1 JSF EVADL UEAM ADDE. U * ま 。 PAINT A 
ト に 】 TFF DU 4 
ド に 1 LDE # ら ム STX 
A STE INDLP1 へ 5 
4 INDI3 ESF PFDSP 人 DA 
A DEC INDLP1 tp 
3C BNE INDI3 ト EO65 
に EFo7 BHS 
6 NEGB 
INDSPC CLEA NEG 
0 A LINE30 STA 
A STA 
A INDCHE EQU  * STa_ 
全 PSHS AE4X。U A PSHS 
内 0 0A  EF1A ESF 
A JsR COsP 98 ^ BSR 
A LDO ad.S 98 9 MG 
A ADDD  ..VCU VRAMNEXT 8 9 INc 
人 STSBUE 1 FE  EFQE BNE 
RTSPUL X,D BNE 
A PULS 、UJPC 9 2 RTSP 
キ 
A PFDSP EQU # SPOTE2Sv 1 
A PSHS  X 0 
A LDE  、%t INTEFRUPT * END OF "LINE 
ENI PFDSP3 YES. * 
LODE 。 *s*oD NO. 
PCB ClPX * 1 
FCE *BC 
PFDSP3 LDE #sOB ! DRAMA 
LODA INDPF DISPLAY CHE 1 岳 * 和 
STA INDLP3 COUNT 
PFDSPS LDA  ,x+ 1 し 
BSE INDCHE LT X 
DEC INDLP3 1 rtY1Y 
BNE PFDSP5 1 LLS 
| ME EXT PF 8 床 
| LEAX PFSZrX N 
BRA INDSPC A LNCHR EoU 
TTL GRAPHIC CODE - GRAPH - ^ NEPY EoU 
ACHRLN EQU  +* ALNOX EQU 
A LDU  *.COMGE 4 NOY EQU 
6 OB ALNUY EQU 
れ DS や A LNPY EQU 
| A JSR CAXCR ALNPY EQO 
BCC R 6 
A LDA 全 AN EQU 
上 N OS F14 ALINES EQU 
EI A JSF CAXCF EN 内 
| 2 CHRLER LECC EREG1 9o01 4 LDX 
E A CLE 5iU FR 4 Lu 
き Bt 2 71 A SUED 
E 人 RE 04  EF2A EMI 
| A CLR 11.U 9 A Bi 
E A LOA *sFF 2 放 STX 
上 A STA LNCHE Lnesi 時 8 
上 EEA5 BEA LINEDO STU 
NM SUED 
| + LINE CONMANE CNES2NAPRE 
M : STD 
*#。 .COHAR+3 COLOE CODE STD 
キ 。 ・COHAR+4 FUNCTION CODE STp 
*。 .COMAR+5 X CO-OEDINATE OF P1 LOp 
*。 ・COHAR+7 Y CO-OEDINATE OF P1 SU8 
* 。 COMAR+S X CO-ORDINATE OF P> 
# ・COMAR+11 Y CO0-OEDINATE OF P< 6 内 SAX 
*。 .COMAR+13 BOX FLG 06 2 Nss BR 
0 73 A LDD 
1 77 A SUED 
ASEMNS 9 問 ooo1 Aa LINES4 ADDD 
A LODD  .conARr 09 ^ ADD| 
に 1 ANDA きま ロア 
A CrPE 5 に 
EEC3 EHS FUNCTION CODE EREOR Sa Na 
A STD 。 .GCL SET COLOR AND FUNCTION CODE. OE BNE 
| に 1 JSR INITLN と 36 1F A LEAX 
au 。 NOMOERN2 02833A EF54 27 74  EFCA BEQ 
の dEU 2 02834A EF5B BE  A5 A LDX 
提議 028354 EF5B 30 1F A LEAX 
2 RA 02836A EF5A 1027 QOBB EFEB LBEQ 
人 STY yEY1 2 コ 37 * 
hs ey o238A EF5E CC oooo ALNCDSPLDD 
人 AM と 028384 EFS1 DD 6B A STD 
の EDR OMRROS 028404 EFS3 DC 71 A Lpp 
EEC7 RE SMMB1D 02841A EFS5 DD 64 A STD 
0 028424 EFS7 DC 73 A LDD 
*。 DRAM A STRAIGHT LINE 0284205EE6Z2DEY =28 い ED 
了 02344 * 
い の Oo245 EFSE ALINES5 EQU 
A SB 02845A EFBB BD  EFAO  A JSR 
EE RA 02347A EFBE DC 6B A Lpp 
NE ロ 0248A EF70 D3  A5 A ADDD 
cgRESezI nrERRGB3 02843A EF72 DD AB A STD 
o285o * 
EEE 26 02851A EF74 83 23 A LINESS SUED 
| に 2 02952A EF7E 23 OF  EFS7 LS 
2953A EFZ78 DD AB A S 
02833 キネ 。 DRAM A RECTANBLE 002 EE 人 了 DE 
2 02855A EF7C DE AA A ADDB 
02835A EECA F 75 A STX  .LX2 0239503EEZCSDS 2 か AM 
02836A EECC EE  D387  A LDX  ・CONAR+7 2 * ま LDD LNPY 
02837A EECF F 77 A STX  ・LY2 92352 EDDJENR 
02838A EED1 BD 47  EF1A BSR LINES  X1Y1-X2、Y1 288 SUBDAENDX 
02838A EED3 BE  D385  A LDX .COMAR+5 人 1 
02840A EEDS F 75 A STX  ・LX2 
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.COMAR+11 02B1A 1 AB A LDD LNPY 
.LY2 028B2A EFS5 20 ED  EF74 ERA LINESS ENDi 
LINES 。 X1.Y1-X1Y2 02BB3 キ 
.COAR+ ヨ 02864 EFS7 ALINES7EQU  * 
.LX1 5 EF ヨ 1 BNE LINESS PY .NE. DX THEN GOTO LINESS 
.COMAR+11 A STD LNPY  PY 
.LY1 | A LDE .GY+1  GY=GY+UY 
LINES  X2.Y2-X1Y2 A ADDE LNUY+1 
.COMAR+ ヨ A STE .GY+1 
.LX2 A LINESE LDD  .GX 
COMAR+7 A ADDD LNUX | 
.LY2 A STD  .GX GX=GX+UXi | 
LINES X2.Y2-X2。Y1 A LDX LNLP 
合 LEAX ー1.X 
キ 全 STX LNLP ] 
EFGB ENE LINES5 
RECTANGLE LINES3 RTS | 
キ ] 
A LNPOIN LDA LNCHE | 
EFC7 EEQO LNDOT 
A LDE  .GX+1 | 
A LDA  .GY+1 
A PSHS  D 
A JSR 。 EADR 8177/7 
A PULS D | 
A JSE EVAD | 
A PSHS  D 
A LDA .COMAF+4 
A STA 肌 
E A LDE 
LINES A ANDE 。 #$BQ 
LY1+1 A ORE .COMAR+3 
.LY2+1 A STE 
sS 全 PULS X 
LINE35 A JP CDSP | 
E AA LNDOT JIP GPDSP 
Bi。PC ま DRAM A LINE THAT 1S PAFEALLEL TO Y AXIS。 | 
キ 
LINEY LDX | 
COAND LDY -LY1 ASSUME POINT-1 CO0FDINATES. 
| LDA LNUY 1S IT A NEGATIVE DIEECTION“ 
EPL LINEY2 NO. 
LpY -LY2 YES,THE STAET POINT IS THE POINT2. 
LINEYS JSR GADDE GET THE VEAN ADDRESS OF STAET POINT. 
STEAIGHT LINE LINEY4 LEAX  ,U SAVE IT TO X 
JSF 。 GPDSPR DISPLAY ADOT. 
LEAU 。GXBSZ,X 
DEC LNDY+1 
C0-0RDINATE OF POINT1 ENE LINEY4 
C0-0RDINATE OF POINT1 LINEXE RTS 
C0-0FDINATE OF POINT2 キネ 
C0-0RDINATE OF POINT2 * ネ DRAM A LINE THAT IS PAREALLEL TO X AXIS. 
キ 
.WORI LINEX LDX .LX1 
LNCHR+1 LDU  .LX2 _ 
LNBPY+2 LDA LNUX IS IT NEGATIVE 
LNDX+2 EPL LINEX2 NO 
LNDY+3 EXG  X,U YES EXCHANG LX1 AND LX< 
LNUX+2 LINEXS STX LNUX SET LEFT X TO LNUX.(DESTROY UNIT OF STEP 
LNUY+2 STU LNUY SET RIGHT X TO LNUY.DESTROY UNIT OF STEP 
LNPY+S LDA LNUX+1 
LNLP+2 ANDA  #$07 GET LEFT EIT POS 
LDX  #EAS 
+ LDE AX 
LSLE 
DECE LEFT SIDE EIT NAS 
A LDA LNUY+1 
O A ANDA  #*O7 GET RIGHT BIT POS 
FQQ3 8 A LDA AxX 
THEN UX=1i Fao5 DECA 
Foos COPA RIGHT SIDE BIT MAS 
ELSE DO! UX=-15 Foo7 Os A PSHS AuE SAVE THE SIDE MASK 
DX=X1-X21 | Foo ヨ A7 A LDD LNUX 
ENDi FooE ED ESFE  A JSR LSED3 
DX=DX+1! FoOE 34 04 A PSHS 
Fo1Qo DC Aa A LDD LNUY 
03038A FO12 BD  E3FE  A JSR 。 LSRD3 
Q303 ヨ A FO15 EQ EQ A SUBBE  、S+ GET THE NUMEER OF BYTE 
03040A FO17 26  Q7 Fo2Q ENE LINEXS INTERVAL IS GRATER THAN 1. 
LINES3 IF DY>=Q | 03041A FO18 ER  EO A LDB  、S+ ONLY ONNE BYTE. 
LNUY THEN UY=1i 03o42A FO1E E4 Eo A ANDE  ,S+ LOGICAL AND THE BOTH SIDE EIT MASK. 
LINES4 Q3043A FO1D 7E Fo5A  A JMP LNRSID SET BIT IMG. AND RETUFEN 
LNUY ELSE DOiUY=-1! 
.LY1  DY=Y1-Y21 
.LY2 ENDi oso45A Fo20 D7 AD A LINEX3 STE LNLP SAVE 
#1 DY=DY+1i Q3046A FO22 EE  EO A LDB  ,S+ 
LNDY 03047A FO24 C1  FF A CMPE 。 #$FF IS THE RIGHT SIDE FULL BYTE 
Q3o48A FO26 27 05 Fo2D BEQ LINEX4 YES. 
LNCHE SHALL 1I DISPLAY CHARACTER | 03048A FO2B BD  FO5A  A JSR 。 LNRSID NO, PUT BYTE UITH MASK 
LNCDSP YES. | Q3050A FO2E 0A AD A DEC LNLP 
LNDX 03051A FO2D ER  EO A LINEX4 LDE ,8+ IS THE LEFT SIDE FULL BYTE? 
ー1。X 03052A FO2F 2B 0D  FOSE EMI LINEX5 YES. 
LINEY 03053A FO31 BD  FO5D  A JSR 。 LNLSID NO。 PUT EYTE WITH MASE 
LNDY 03054A FO34 BE  A7 A LDX LNUX LEFT SIDE IS POINTED NEXT. 
ー1。X 03055A FO3S 30 08 A LEAX 8.X 
LINEX 03056A FO38 SF  A7 A STX LNUX 
03057A FO3A 0A AD A DEC LNLP 
#Q 03058A FO3C 2B A7  EFE5 BI LINEXR NO BYTE REMAIN。 GO FINISH。 
LNPY PY=oi 03059 FO3E ALINEX5ECU ネ 
.LX1 03060A FO3E 103E 73 A LDY .LY1 LOAD THE Y COORDINATE. 
.GX GX=X11 | 03081A FO41 SE Aa7 A LDX LNUX LOADTHELEFT X 
.LY1 03062A FO43 BD E3DC  &A JSR GADDR GET LOMEST DOT ADDRESS. 
-GY GY=Y1i 03083A FO46 DB AD A LDB LNLP 
03064A FO48 9D 8C A JSR BLULIN 
ネ 03055A FO4A 33  C9 4000A LEAU  ..VR,U 
LNPOIN CALL GPDSPi 0306SA Fo4E DS AD A LDB LNLP 
LNPY 03087A FO50 8D  BF A JSR REDLIN 
LNDY 03058A FO52 33  C ヨ 4000A LEAU  ..VG-..VR,U 
LNPY PVY=PY+DYi 0306 ヨ A FO5B DR AD A LDE LNLP 
03070A FO58 OE 32 A JMP GRELIN 
LNDX DO WHILE(PY>DX) i | 03071 キネ 
LINES7 | 03072A FO5A SE  A ヨ A LNRSID LDX LNUY LOAD THE RIGHT X COORDINATE. 
LNPY 03073A FO5C SKIP2 
.GY+1 A FO5C BC A FCB *BC CHPX # 
LNUY+1 03074A FO5D BE  A7 A LNLSID LDX 。 LNUX LOAD THE LEFT X COORDINATE. 
.GY+1 。GY=GY+UYi 03075A FO5F 10E 73 A LDY 。 .LY1 LOAD THE Y COORDINATE. 
0307BA FOB2 34 04 A PSHS  B SAVE BIT MASK. 
| Q3077A FOE4 ED  E3DC  A JSR GADDR GET VRAM ADDR. 
| 03078A FOB7 30  C4 A LEAX  ,』U TFR U TO X. 
LNPOIN CALL GPDSPi 0307 ヨ A FOS ヨ 31  E4 A LEAY  ,S Y POINT TO EIT MASK 
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| CLRE 03187 A HCSV 
| 73 A JSE  。 BLUSID ELUE 38 A NOTF 
C3 4000 A LEAX  ..VRU X PTR RED VRAM A CPTE 
CLRE A MOP 
6 A JSR REDSID RED A HOP 
C3 Soon A LEAX  ..VGuU X PTR GREEN VRAM A FMEK 
CLEE A FPTR 
A JSF GRESID GREEN A Lu 
RTSPUL BE ALH 
人 PULS EPC A _SYIHFNT 
A LNXFNC FDE LNXOE。LNXAND PSET ま 
A | 
Q3031A A FDE LNXOE,LNXAND PRESET | A SYMEOL 
光生 A F103 FC A 
| Q30 ヨ 2A A FDE LNXOR,LNXNOP OR F10E OF A 
A F1og C1 A 
| A FDE LNXNOP ,LNXAND AND 932034 F10A 22 。 F1  FOFD 
A 032044 F10C 26 03  F111 
A FDE LNXEOR,LNXNOP EOF 93205A F 10E な 
内 3 03205A F110 
* G3207A F111 A SYMBOo 
LNAND CLEA OS208A F114 A 
SKIP2 | 03203A F117 
A FCE  $SC CMPX # | 03210A F118 A 
ALNOE  LDA # ま FF 93z11A F11B A 
VACON 03212A F11E に 1 
sITA 。 VACC 03213A.F122 A 
RI 032144'F125 B 
) 0 03215A F127 A 
Se 3215A F12 A 
Fo3A EPL LNOEDO 03217A F12B 3 A SYMEQ1 
VACOFF | 03218 キ 
| 03213 # OS 
A STA VACC に だ 
LNNOP RTS 03220 キネ 28 
+ 83221 *# 4。S 
LNEOR VACON スー * 6,S 
A EITA VACC 03223 * 
03103A NOP 03224A F12D CE D385  A 
OS110A C5 A LNEORD COM BuU 03225A F130 4F 
| 03111A DECE 
| 1 A 
FoA7 EPL LNEORD 04 。 F13 ヨ 
VACOFF AB A 
A STA VACC 42 A 
RTS EFAD EOEA SYMBO4 
* A 
A LNFUNC FDE LNORuLNAND ^A 
A A 
| A FDE LNOR,LNAND A 
A F14 ヨ 
| A FDE LNOE,LNNOP が 
| A A 
A FDE LNNOP,LNAND 
A A 
A FDE LNEORLNNOP F155 
FOC2 A Aa 
A 
*#* 柱 END OF SUEROUTINE “LINES" 人 
ネ SYMBQ5 
キネ A4 Aa 
| * CHAIN COMMAND 
* 
キネ ・COMAR+3 COLOR CODE 032 Eo A 
| * ネ ・COMAR+4 FUNCTION CODE 03248A QB  F1E5 
ネ ・COMAR+5 NUMEER OF POINT | 03250A AA A 
*# ・COMAR+5 CHAINED POINTS 93251A F15 AA A 
ネ 03252A F1E3 CB FE Aa 
FQC4 A CHAIN EQU ネ Q3253A F155 5C SYIEOE 
03134A FOC4 FC  D383  A LDD CMDPRM A=COLOR,B=FUNCTION 4 
03135A FOC7 C1 05 A CHPE  #5 A 
0313GA FOC3 24 32  FOFD BHS CHAIN7 FUNCTION CODE ERROR ^ 
03137A FOCE Bo A STD ・GCL A SYME10 
03138A FOCD E452 。 A JSR INITLN A 
03133A FODO Ds85 A LDU #CNDPEM+2 に 
03140A FOD3 Co A LDA ュ U+ 
3141A FOD5 : 01 A CMPA  #1 A 
03142A FOD7 27 F1oo BLS CHAINE NUMBER OF POINTS EEROR A SYMB13 
03143A FOD ヨ : 1E A CMPA  #30 A 
03144A FODB 22 23 F1oo BHI CHAINE NUMBER OF POINTS ERROR Aa 
| 03145 * ネ A 
A SYMB15 
0314EA FODD 4A DECA 
03147A FODE 37 30 A PULU XY F18B 
0Q314BA FOEO BD  E442  A JSR GAXCHK | 
0314 ヨ A FOE3 F 71 A CHAIN2 STX .LX1 Ao A 
03150A FOE5 103F 73 Aa STY .LY1 
03151A FOE8 37 30 A PULU XY F4 。 F181 
| 03152A FOEA BD Ed442 A JSR GAXCHK A 
| 03153A FOED 9F 75 A STX <LX2 A 
| 03154A FOEF 103F 77 A STY 。LY2 03274A F132 FC A 
03155A FOF2 34 72 A PSHS 。 X,YiUiA 03275A F135 DD A 
Q315A FOF4 BD  EF1A  A JSR LINES Q327BA F1 ヨ 7 ED A 
03157A FOF7 35 72 Aa PULS XYiU,A 03277A F13A 25 02 F1SE 
03158A FQFB 4A DECA 03278A F18C 
03153A FOFA 2E  E7  FOE3 ENE CHAINz AF1BC 35 ム 
031SQA FQFC と FTS 03273A EE に A SYME17 
1A0 37 A 
FOFD 7E EQDB  A CHAIN7 JMP ERRB4 | A SYMB2O 
F1oo 7E EQODE AaA CHAINS JP ERRB5 | F1Az AE A 
F1A5 AF A 
* END OF “CHAIN" COMNAND | F1AS SE A 
# A SYIE3Q 
8 F1AE 3 ヨ F A 
F1AD BD A 
* SYMEOL COMMAND F1EQO 24 
| * 。 .COMAF+3 COLOR CODE F1E2 35 
| * キ 。 .COHAR+4 FUNCTION CODE F1E4 A5 
| キネ  .COMAR+5 ANGLE CODE F1ES 26 QA 
+ 。.COMAR+S IMUL OF MIDTH F1EA 
| * キ 。 .CONAR+7 MUL OF HEIGHT F1EA DC AA 
| * 。 .COMAR+B X COORDINATES | F1BC AE 62 
* ま 。 .COMAR+1Q0 Y COORDINATES F1BE E3 84 
* COMAR+12 NUMEER OF CHARACTER F1CO ED 84 
* .COMAR+13 CHARACTER STRING F1C2 20 。 34 
染 
# F1C4 Aa SYMB35 
DoAo 。 AMAX EoU .MORK PTE OF MK MAX F1C4 BS  D387 A 
] DOAS AHAX EQU ・MOEK+2 PTE OF MK H AX F1C7 ヨ 7 B7 A 
DoAd A MSV EQU WORK+4 M DOT STEP F1C ヨ a  A svYME4o 
| DoAB A HSV EQGU ・MORK+E H DOT STEP F1C ヨ ER  D3SG A 
| DoA48 AMCSV EQU .MOEK+8 M CHR DOT STEP 03304A F1CC ヨ 7  BG A 











EGU ・MOR ド +10 H CHR DOT STEP 





EGU FONT NOT FLAG 

EQGU CHARACTER PTR 

EGU り OFG 

EQU H ORG 

EQU FONT TEST MASE 
EGU FONT PTRE 

EQU LOOP W 

EGU LOOP H 

EGU TEMP FONT AEEA 
EGU キ ENTRY 

LDD CMDPRI 

CLE' NOTF 

CMPE  #5 NOT 


EHI CHAIN7 

ENE SYMEan NO. 

COM NOTF 

CLEE FUNCTION IS PSET 
JSE GPDSIFR 

LDA ・COIAR+5 ANGLE 


LSRA 
LDD #。GX 
LDX #。GY 


LDY #.COMAR+B 
LDU #.COMAR+10 
ECC SYMEQa1 

EXG D,X% 

EXG Y』U 

PSHS 。UY,X4D 


COORDINATES PTR OF WIDTH AXIS 
COOFDINATES PTF OF HEIGHT AXIS 

ORIGINAL COOEDINATES PT OF WIDTH AXIS 
ORIGINAL COOFDINATES PTR OF HEIGHT AXIS 





LDU #.COMAR+5 
CLRA 


LDE 1.U NMUL OF MIDTH 










E3S3 
OoD 
EZ7 
D1 
F1F8 
B4 
Q1 
DoCo 
AA 





Fzo 


SYHES50 EQU ま 





JSE GPDSP +DISPLAY* ネ キキ 

LDX 。S 

LDD sX 

ADDD MSV 

STD 人 

JSR GAXC 

ECC SYE55 OVER 

DEC LM 

BNE SYMB5Q 
SYhB55 EQU 3 

LDD [8] 

STD [,S] 

LDX 2.S 

LDD ュ X 

ADDD  HSV 

STD > 

JSR GAXC 

BCC SYWE7o 

DEC  LH 

BNE SYME4o 
SYMBESO EQU ネ 

LDX FPTR 

LEAX 1.X PTR NEXT FONT DOT 


CIPX #SYMFNT+CFH END ? 
ENE SYHE3O NO 
SYMB70 EQU ネ 


LDX 4.S 

LDD ュ え 

ADDD WMCSV 

STD ュ X 

STD [,S] 

LSR FIRK SHIFT RIGHT MARK 
ENE SYME2Q 

DEC ・COMAR+12 ONE CHR END 
LDX CPTR PTR NEXT CHR 
LEAX 1.X 

STX CPTR 


JIP SYME1Q 





EEQ SYIEIQH 
STD UCSV 
LDE 





IMUL OF HEIGHT 





LEEQ ERFEES ヨ PARNM EREOE 
STD HCSV 

LDE U ANGLE CODE 
ANDE た 9 

CHPE #2 

ELO 中 

EOEE # 旬 O1 

PSHS ] 

CLEB 

LSE 1S 

ECC SYMEiQ5 

SUBD WCSV 

STD WCSV 

LDE せま FE 

INCB 

STD USv 

CLFA 

CLEE 

LSE +S+ 

ECC SYMEQ5 

SUED HCSV 

STD HCSV 

LDE #FE 

INCE 

STD HSV 

LDX #.COUMAR+18 

STX CPTR VHAR_PTR 
EQU ま START_ DISPLAY 
LDA ・COMAR+12 CHAR END 


ENE SYIE13 _ NO, GO DO IOEE・ 
RTSPUL (U,Y,XD 

PULS 。U,Y,X。D,PC 

LDA ECPTR] CHR LOAD 

JSKR CFADE FONT OFIGINAL 
LDY #SYMFNT FONT STORE ADDFE 






ヤセ ャ セア ニー ちち や や 





E ま あま まま まあ 洒 洒 光 洗 水 え ホホ ネ キキ ホホ ルル さ 】 


CHANGE COMMAND 


・COAR+3  X1 

rCOMAR+5 Y1 

・COIAR+7 。 X 

・COMAR+ ヨ ー Y2 

・COIAR+11 NUMEEFR OF COLOE 
,COMAR+12 COLOF 





に そ ・・ を キテ を ・ 3 


に 


CHGCL EQU ・MOEK 
CHGI EQU CHGCL+8 
CHGJ EQU CHGI+1 
CHGR EQU CHGJ+1 


キ 
CHANGE EQU ネ 
JSE' EOXINV 


STE CHGK 
LDX #CHGCL 
LDA #7 
CHANGO STA AX 
DECA 
EPL CHANGQ CHANGE TAELE INIT VALUE 
LDE ・COMAE+11 
EEQ CHANGX 
CMPE に 


BEHI CHANGX 
LDY #.COMAR+12 


STE CHGI 
CHANG1 LDD 0iY++ 
ANDA  #7 
ANDE #7 
STE AX 
DEC CHGI 


ENE CHANG1 CHANGE TAELE MADE 




















1 # F FONT BYTE 
L96 0 2 1 A CLR .GF FUNCTION IS “SET" 
TsT NOTF A CHANG4 EQU 3 
BEQ ボ +3 A LDX ・EOXX1 
CO NOT FUNCTION A LDY .EOXY1 | 
STA 0Y+ STORE A LDA CHGK 
DECE INCA 
BNE SYIE15 REMAIN A STA CHGJ 
LDD ・COMAR+8 A JSR GADDR 
STD ・GX A LDX #CHGCL 
LDD ・COMAR+10 A CHANG5 EQU ネ 
STD .GY A JSR GPGETR 
JSR GAXC CHECK AXIS A LDA ArX 
BCS SYMB17 A STA .GCL 
RTSPUL (U,Y,X,D) A PSHS  X,UiB 
PULS UiY,X,D,PC A JSR GPDSPI 
LDA # ま 0 A PULS  X,U.B 
STA FNRK TEST MARK INIT : 人 PSHS  X,UiB 
EQU * ネ 03402A F2B7 ED  E437 Aa JSR GPDSPR 
LDX 5,S] 03403A F2BA 35 54 A PULS  X,U,B 
STX 2,S] 03404A F2SC 33 CB850 A LEAU 。GXBSZ。U 
LDX #SYMFNT FONT ADDE INIT 93405A F2BF QA  A3 ヨ A DEC CHG6J 
EQU * 03406A F271 26  E4  F257 BNE CHANG5 
STX FPTR SET FONT PTR 93407 ネ 
JSE GAXC 03408A F273 SE 63 A LDX ・BOXX1 
BCC SYM 03403A F275 3C GBD A CMPX  .BOXX2 
LDA = 03410A F277 27 0B  F27F BEQ CHANGS 
EITA  〔FPTE〕 DOT ON 03411A F278 30  Q1 A LEAX 1.X 
ENE SYME35 ON 03412A F27E 3F GE ヨ A STX .EOXX1 
EoU ネ 03413A F27D 20 CB  F247 BRA CHANG4 
LDD HCSV CLEAR 03414 ネ 
LDX の 4S 03415A F27F 38 CHANG3 RTS 
ADODD  ,X 03415A F2BO 7E  EOE4 A CHANGX JHP ERRE7 
STD 了 y4 | 03417 3 
BEA SYMESQ | 03418 いく 

03418 まま まま CHANGE COMMAND END 

EQU * | 03421 * ネ GET BLOCK1 COMIMAND 
LDA .COMAR+7 | 03422 * ま 
STA LH HEIGHT DOT | 03423 * .COMAR+3  X1 
EQU キ 03424 ネ ・COMAR+5 Y1 
LDA ・COMAR+E MIDTH DOT 03425 ネ .COMAR+7 X2 
STA LM 03426 ネ ・COMAR+ ヨ 。 Y2 
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テー ニ ・ ハ メー ベ ご 
に Jo YK く AN EC- 


















































































03427 * 。 .CONAR+11 NUMEER OF COLOR A STX GBDIX 
03428 ネ 。 CONAR+12 COLOR CODES 還 人 DEE 。 GBNY 
03423 ま 2BF ENE GBLE1 
| A TST  GBIX 
Q3430 * 前 1 ) 
03431A F283 SORG LINKLN 2CA EEG GBLK1 
DOAF 4 .$ORG SET LINEKLN LDA GBDAT 
03432A F283 DS PANECL,1 NUMEER OF PICKUP COLOR 1 ESE GEPUT 
DoAF APANECL EQU 、$ORG GELR17 RTS 
DoEo 。 A .$ORG SET .*$DEG+1 | * 
03433A F283 DS PAECLE,2 EXTENDED COLOR TABLE ADDE + ーー 
DoBO APAECLEEQU  .$OEG # GEINT 
DOE2  。 A .$ORG SET . ま ORG+2 # こよ 
03434A F283 DS PARL』1 LEFT/RIGHT FLAG (FOLLOMED EY PASCND) ま INITIALIZE “GE 
DoB< APARL EQU  .$ORG ` の COWWAND 
DoE3  。 A .$ORG SET * ま DEG+1 
DS PASCND,1 PICKUP CONDITION A GEINT EQU  * 
A PASCND EQU -$*ORG ^ JSF BOXIN 
A .$ORG SET - ま DEG+1 人 LEAX 1X 
ps PASIMG,1 BIT IMAGE A STX GENX 
| A PASIMG EQU ・$ORG INCE 
A .$ORG SET .$ORG+1 A STE GENY 
DS PATEMP,1 MOEKING Aa LOp ・BOXX 
A PATEMP EQU . ま ORG A JSE  BGXOFF 
A .$ORG SET . ま ORG+ 1 A STX GEADX 
DS PAVE』1 MOREKING A STE GEDPX 
A PAVE EQU  .$OEG 人 LDD  .BOXX 
A ・$DRG SET .$ORG+1 | ^A JSR GXOFF 
DS PAVE、1 WORKING | 人 A TFE X,D 
A PAVE EQU ・$ORG ^ SUED GEADX 
A .$ORG SET -$ORG+1 INCE 
| 03440A F2B3 DS PAVG,1 WORKING STE GENEX 
| A PAVG EQU ・$OEG ^ CLR GEIX 
A .$DRG SET - ま DRG+1 ト FTS 
41A F283 DS PALINK。O LINK ADDEESS FOR PAINT VARIAELE *# 
A PALINK EQU ・$ORG | 
A .$OEG SET ・ ま ORG+Q A CLEXT EQU キネ 
A STE PANEC 
DS GEADX 2 OFFSET LEFT POSITION 人 STU PAECL 
A GEADX EQU ・$ORG 人 A PSHS BB 
A .$ORG SET .$DRG+2 3Q1 CLEXT5 BSE GBSCL 
DS GEDPX,1 OFFSET BIT NO. | QA Fso1 BSR GBSCL 
DoEE AGEDPX EQU ・$ORG | Q8  FS301 BSE GBSCL 
DoEC 。 A .$OEG SET . ま DRG+1 | 01 A LEAX 1.X 
DS GBNEX。1 NUMBEE OF BYTE F2FB E4 A DEC 1S 
DoEC AGENEX EQU . ま OFG | : FzFD 26 F4 FZ2F3 ENE 。CLEXT 
DoED 。 。 .*ORG SET ・ ま DEG+1 03540A F2FF RTSPUL 日 
Q34EA DS GBNX。2 NUMEEF OF DOTS X AF2FF 35 84 A PULS BrPC 
DoED AGENX EQU -$*OEG o3541 * 
DoEF 。 A .$ORG SET . ま DEG+2 03542 * 。 PICKUP COLOR E 
C3447A DS GENY,1 NUMEER OF DOT Y # EXTEND COLOR 
DaEF AGENY EQU ・$OEG * AND SET EXTEND 
DoCo 。 A .$ORG SET -*$OEG+1 ネ 
| 03448A F283 DS GEBI,1 TEMP A GESCL EQU キ */ 
Daco 。 ABGEI EaU .* ま ORG A LSER QiX 
| Doc1 A .$ORG SET  .$ORG+1 EORE 
| 63449A F283 DS GBJ。1 TEMP | SEX 
| Doc1 AGEJ EQU ・$ORG | A STA U+ 
DoC2  。 A .$ORG SET .* ま ORG+1 RTS 
| 03450A F283 DS GBPIX,2 PUT BUFFER INDEX | + 
DoC2 AGEPIX EQU  .$ORG | 
DoC4 。 A .$ORG SET . ま DRG+2 + SET ONE EYTE T( 
03451A F2B3 DS GBIX、1 CONCATENATED BIT POS. キ IF AREA IS FULI 
Doc4 。 AGBIX EQU -$*$DRG * BEFORE SETTING 
DoC5 。 A .$ORG SET . ま DRG+1 1 
03452A F283 DS GBTMIX,2 VRAM ADDRESS (SAVE) * 
DoC5 AGETMIX EQU -$DRG A GEPUT EQU 
DoC7 。 A .$ORG SET . ま DRG+ っ A PSHS BuX 
DS GBDIX、2 VRAM ADDRESS A LDE 
DoC7 AGBDIX EQU . ま DEG A LDX 
DoCd Aa .$OEG SET ・* ま ORG+2 A CMPE 
03454A F283 DS GBK。1 TENP 31A ELO 
| DoC ヨ AGEK EQU .$ORG A JSF 
| DoCA A .*%ORG SET .* ま ORG+1 | CLEB 
| C3455A DS GBSV。1 SHIFT VALUE A LDX #.COM/ 
| DoCA AGESV EQU ・$OEG A GEPUT1 EQU キ 
| DoCE A .$OEG SET .* ま DRG+1 A STA QiX+ 
| 03456A F283 DS GEBCL,3*B EXTENDED COLORS INCE 
DaCE AGECL EQU ・$DEG A STE .COMAI 
DoE3 Aa .$ORG SET .*$DRG+3* Q3572A A STX GEPIX 
03573A A PULS Bi.X 
| 03457A DS GBDATA,83 AREA FOR PLASTIC 03574A FS24 3 RTS 
GEDATA EQU -$OEG * ま 
.$OEG SET ・.$ ま DRG+E3 03575 3 
* 03577 ま 
GELK13 JMP ERRB7 Q3578 キ “BEPLA" 
* 0357 ヨ キキ 
GELE1 EQU  * Q3580 キ 。 PLASTIC OPERAT 
JSR GEINT | 03581 * 。 AND SET DATAT 
LOE .COMAE+11 NO. OF COLOE 03582 を 
EEO GELE1 ヨ CHECK 03583 F325 AGBPLA EQU キ * 
CHPE  #S Q3584 キ GESV=GETX-GEDPXi [ 
EHI GELK1 ヨ 03585A C4 A LDA  GBIX 
LDX #.COMAR+12 PTE。COLOR CODE 358EA EE A SUEA GEDPX 
LDU #GECL COLOR TAELE Q3587A CA A STA GBSV 
ESR 。 CLEXT EXTEND COLORS GS35EB キキ IF GESV>4 THEN DO 
CLF 。 PASCND PICKUP CONDITION IS NORMAL。 | 03583A Q A CHPA 
ネ Q3530A F32D 2F "OR FSS5 ELE GBPLA 
* ー DUTPUT DATA - | 03531A F32F BO 08 A SUEA  #8 
| ・COMAR+3 NUMBER OF EYTE | 03532A F331 ヨ 7 CA A STA GESV 
| * ・COMAFR+4 PATTERN DATA WHEN AFTER THE FIEST | 03533A F3S3 2Q 08  F3SD BRA GEPLA: 
| 35 ヨ 4 キ IF GESV<-』 THEN 
| A JSR GBOINT 03535A F335 81 FC A GBPLA1 CMPA  #-4 
A GELK12 EQU  #* 03536A F337 2C 04 BEGE GEPLA: 
A LDA GENEX 03537A F333 BE OS A ADDA  #B 
A STA GE LOOP COUNTER 03538A F33E 37 CA A STA GBSV 
A LDY #GBDATA+= 035 ヨ g キ ま NEXT: 
A LDU GEDIX LOAD VRAM ADDEESS 03BOO A GEPLA2 EQU ネ 
A GELK13 EQU 036o1 * IF GESVO THEN GO1 
A JSE GELRDT 03602A F33D OD CA A TST GBSV 
A STE ュ Y キ 03603A F33F 2B 17  F358 EMI GEPLAS 
A LEAU 1.U INCREMENT VRAM ADDEESS 03604 キネ DO GEI=1 TO GBSVI 
A DEC GEI | OS3Eo5A F341 R CA A LDA GESV 
F2Aa ENE GELR13 O36QBA F343 ヨ 7 CO A STA  GBI 
* C3EO7A F345 27 2B  F3BF GBPLA3 BEQ GBPL1 
ま DOT PICEUP END | 03608 * DO GEJ=1 TO GBNB+1 
# Q3B0 ヨ A F347 3E BC A LDA GEBNBX 
JSR GEPLA SHIFT AND PUT | 03810A F348 87  C1 A STA  GBJ 
キ 03SB11A F34E SE DoE5 1 LDX #GEDA1 
| LDX GEDIX | 03612 3 
LEAX 。GXESz。X INC Y CO-OEDINATE | Q3613 F34E AGBPLA4 EQU キ 

















DEC Y LOOP 





03614 














SUESTR (GEDATA (GEJ+2) 。。1) 








* = 
03515 キネ GEDATA (GEJ+2) =C\\SUESTF (GEDATA (GEJ+2) ,1。7) 1 
03616 * C=Ti 
FEMAIN IS zEFO 03517A F34E BR SEO A ROF QiX+ 
03518A F35O 0A C1 A DEC GEJ 
51 ヨ A F352 2A  FA  F34E BPL GEPLA4 
* END 
* END # GOTO OUTPUTi 
A DEC GEI 
Fs45 EEA GEPLAS 
* MSHIFT : 
OR “GELK2" A GEPLA5 EQU 
* DO GE1=-1 TO GSV STEP -1 
に LDA GESV 
A STA GEI 
# 
A GEPLAE LDX SGEDATA+ ズ 
A LDA GENEX 
A LEAX AX 
* DO GEJ=1 TO GENEX+?i 
* 
ADDRESS,BEIT NO. ら STA GEJ 
X、ADDFESS A GEPLA7 EQU # 
XiEIT NO. * T=SUESTE (GEDATA (GENEX+2-GEJ) , 1 1) 
3 806TA SBNEXX+2-GBJ)=SUBSTR (BB0ATA (8NB+2-BJD >237) Mt 
=Ti 
82 A FOL ローX 
* ENDi 
C1 A DEC GEJ 
NUMEEF OF BYTE X FA  F355 EPL GEPLA7 
+ ENDi 
Cu A INC GEI | 
ED  F35C ENE GEPLA5 
* ま DUTPUT 
EXTEND COLOR EIT TO A EYTE. F36F ^A GEPL1G EQU # 
SET NUMEER OF COLORS FOF PICKUP PREOC. + P=ADDR (GEDATA (3) ) * 
SET ADDEESS OF EXTEND COLORS FOR PICKUP PEOC. 4 LDX 8GEDATA+ っ 
SET LOOP COUNTER TO STACK. 4 IF GESV+GEDPX : 7 THEN P=P+1 
BLUE な LDA GESV 
Aa ADDA GEDPX 
RED ^a CMPA  #7 
GREEN F37C ELE GEPL11 
INCRENENT ADDRESS OF ORIGINAL COLOR TAELE a LEAX 1.X | 
MORE COLOR ? A GEPL11 EQU # | 
YES. + IF GESV+GBDPX : Q THEN P=P-11 
CLEAN UP THE STACK AND RETUFN TSTA 
F381 BPL GBPL12 
A LEAX 。 -1.X 
A GEPL12 EQU 表 
TO A EYTE * MASK=BAS (GEBIX+1) 2ー11 
BYTE TO TAELE. A LDU #BAS 
A LDA GBIX 
A LDE AU 
PICKUP LSLE 
DECE | 
EXTEND * P->0=(P->D&MASK) \ (GBDATA(1) &MASK) 1 
SET A TFE BA 
A ANDA 0.X 
A STA OX 
CONE 
COMIM. AREA A ANDE GEDATA 
DO CONINUOUS SEND A OEE 0。X 
BYTE. A STB 9.X 
* N=GENX+GBIX5 
* ネ GEIX=MOD (NiS) # 
ま Ni 
GENX 
GEIX 
#O 
XY ASSIGN Y TOP 
GXOFF 
SEND GEIX 





Q8 F3E1 
AQ に 1 
F308  A 








TSTE 
GEPL14 EEQ 
* CALL GEPUT (- >D) 5P=P+11 


LDA 
JSE 
* ま ENDi 


XD ASSIGN E TO N 


GEPL15 


0Y+ 
GEPUT 





0F OUTPUT DATA 
COM。 AREA 


PLACE OF SHIFT 





GOTO NEXTiENDI 


GESV=GESV+8i 


MSHIFTi 










F5 F3A7 
F3E1 1 


AH 全 
ES A 


| 
は 
〇 
四 

の ちと 





円 
ちゃ や ちや ャ や アヤ アヤ ャ セア 


DECE 
EEA 
GEPL15 EQU 


GEPL14 
# 


* ネ GEDATA(1) =P-:Di 


LDA 
STA 
FTS 


OxY 
GEDATA 


GET BLOCK<Z COPNMAND 





ネ 

ネ 

* 

ま 

* R 3 

ま ・CONAR+5 

* ・COIAR+7 

ま ・COMAR+ ヨ 

ネ 

# 

* 

GELK2 EQU 
JSE 
BSF' 
LDX 
LEAX 
ESE 
LDX 
LEAX 
ESE 
LDX 
LEAX 


キ 

GELK2S EQU 
LDA 
STA 

GELK25 EQU 
STX 
LDY 
LDE 
VACON 


Y1 
X< 
Y2 


C0-OEDINATE DATA 
OUTPUT PROCESS 





キ 

GENY 

GEF LOOP COUNTEE SET 
* 

GETMIX SAVE VRAM ADDE 
#GEDATA+ ニ 

GENEX 





263 


ーー い ト ドー し に 4 
Ii 中 < 選出 AN 生 




















































































Do ヨ A EITA VACC F4SE 人 LDX 
E44A  A JSER MOVE VRAMNREAD E4BE  A JSR 
VACOFF * 
D4oa 。 Aa STA VACC A3 A LDA 
INCA 
A JSR GEPLA 1 LINE OUT ED 8 STA 
A LDX GETMIX F45D APE1o5o EQU 
A LEAX 。BXBSZ。X NEXT LINE F5OQD  ^A JSR 
A DEC GEK DEC LOOP C AS A LDA 
ENE GELK25 EE A ANDA 
3A EE A STA 
TST GEIX REMAIN 038B4 AE A LDU 
03744A EEQ GBLK27 038B5A A3 A LDA 
03745A LDA GBDATA 038BEA C8 DoEE A ANDA 
0374BA JSE GEPUT 038E7A CB DoBE A STA 
03747A CLR GEIX REMAINISO 03BS8A F472 DE  A4 A LDU 
03748A RTS 03869A F474 30  C4 A LEAX 
03743 Q3570A F476 ヨ D 83 A JSR 
0375Q A GEOINT EQU  * 03871A F478'30 CB 4000A LEAX 
Q3751A F3FC 7F A CLR 。 .COMAR+3 03872A F47C BD SB A JSR 
3752A F3FF SE A LDX #.COMAR+4 03873A F47E 30  C3 BOO0A LEAX 
F402 SF A STX GEPIX 03874A F482 D Ba A JSR 
F404 BB A LDA  .BOXY1+1 Y CO-ORDINATE 03875A F484 3S CB50 A LEAU 
03755A F4OE CB A LDE #GXESZ NUMEEROFEYTEX 0387EA F487 DF  a4 A STU 
03756A F408 3D MUL 03877A F48 ヨ 0A  BD A DEC 
Q3S757A F40 ヨ BE BB A LDX GEADX 03878A F48E 28 DO  F45D ENE 
03758A F40B 30 SB A LEAX DX TOP OF DATA ADDRESS 03873A F48D 33 RTS 
Q375A F40D F  C7 A STX GBDIX 03880 * 
037B0A F4OF OF  C4 A CLR 。GBIX REMAIN, ZERO 03881A F4SE A PE1FNC FDE 
03781A F411 3 ヨコ RTS F40 A 
3 * F432 A FDE 
ま F434 A 
ネ POINT COMMAND FR A FDE 
* F438 A 
キネ 。  .CONAR+S NUMEER OF POINT F43A A FDE 
* 。 .CONAR+4 POINT DATA F4BC 人 
* F43E A FDE 
* ま STRUCTURE OF POINT DATA F4AQ A 
* F4A2 A FDE 
* 。 oO  X1 F4A4 Fs41  A 
* 。 2  Y1 * 
* ま 。 4 COLORCODE + 
* ま 5 FUNCTION CODE ま "PEINT" 
ま キネ 
* 。 TOTAL E BYTES * CO-OREDINATE OF 
キ AND INITALIZE 
1 * 
A POINT EQU  * ネ 
A LDA .COMAR+3 * 
43F BEQ POINso A PEINT EQU 
A CMPA  #20 A JSR 
440 EHI POINao A STX 
A LDU  #.COMAR+4 A STD 
A PDIN50 EQU  * A LDX 
A PULU XY A LDY 
A JSR GAXCHK A JSR 
A PULU D A STU 
A CMPE  #5 A LDE 
F443 EHS POIN ヨ 2 A ANDE 
A STD  .GCL A STE 
A PSHS  U A LDU 
A STX  .GX A LDA 
A STY  .Gey DECA 
A JSR GPDSPI A ADDA 
A JSR BGPDSP A STA 
A PULS U A LDE 
A DEC .COMAR+3 A ANDE 
E ENE POIN5o A STE 
POINEO RTS A LDA 
A POIN ヨ O JMP ERRG5 DECA 
A PDIN32 JMP ERRG4 COA 
* A STA 
ネ POINT COMMAND END A LDE 
* INCE 
* A ANDE 
* A STE 
* A LDD 
* PUT ELOCK1 COhAND A JSR 
A PSHS 
キネ 
ま 。  .COMAR+1 PATTERN RENAINED が RE 
* 。 .CONAR+3 X1 A JSE 
* 。 .COMAE+5 Y1 Aa TFR 
* -COMAR+7  X2 A SUED 
ネ .COMAR+ ヨ 。Y2 ^ STD 
ネ 。 .COMAR+11 COLOR CODE の 
* ま 。 、COMAR+12 FUNCTION CODE の は 
ネ 。  .CONAR+13 NUMEER OF BYTE OF PATTERN 上 CLR 
ネ .COMAR+14 PATTERN 4 CLR 
ま に 1 LDA 
A CMPA 
DoAd APENX EQU  .MORK F4FD ENE 
DqAz A PENY EQU PENX+3 0 Aa _。 CON 
DoA+ A PEVEAPM EQU PENY+2 03  F5QZ PEINTS ELS 
DOAE APESP EQU PEVEANt2 Es 
DOA7 APBEP EQU PESP+1 A PEINT4 EQU 
DoAS8 APELM EQU PEEP+1 ^ LDA 
DA ヨ A ム PEFEN EQU PELM+1 合 STA 
A PEOV EQU PERM+1 人 SD 
APEIE "EQU PBEOV+1 し STX 
4 PRDH EQU PEIB+2 放 08 
PEREEX EQU PBEDH+1 PERE EXTEND MSEQ 6 
A PERE EQU PBRBEX+1 PEBSET 
A PBNOT EQU PERE+1 1 
A PBEAD EQU PBNOT+1 GATTERNG8BN 
38 人 PBRD EQU PBBAD+> 6 
3 SA U PERD+1 表 
HQ A PE1BL EQU PESAVE+1 ER AEBSNEDERU 
41・ A PE1RE EQU PE1EL+2 人 ET 
2 A PB1GR EQU PE1RE+2 5 和 還 和 
3 A PE2ENT EQU PE1GR+32 AE A SUED 
4 APEI EQU PB2ENT+2 15  F52C EMI 
5 A PEDATA EQU PEI+1 DATA,81 BYTE ESFBE  A JSE 
SFE 3 
8 A PBLK1 EQU -* ま EE BA 
BA F44G BD A JSR PBINT INITIALIzE DS EPS は 
QSB4 ヨ A F44 ヨ FC A LDD .COMAR+11 A=COLOR。B=FUNCTION 0 が LEAX 
Q3850A F44C C1 05 A CMPE  #5 8 | 
QSB51A F44E 10z2 EC8 ヨ EODB LEHIT ERRG4 RA 
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#PB1FNC MAKE FUNCTION ENTRY 
FENTEY 


PENY+1 
PEI LOOP COUNTER SET 


* 
PESHFT DATA GET & SHIFT 
PELIY 

PEDATA 

PEDATA LEFT MASK 

PEIE 

PBEEI 

PEDATA+U 

PBDATA。U RIGHT MASK 
PBVRAN 

・・VBjU 

ELUDSP 

・・VR。U 

REDDSP 

・・VGiU 

GREDSP 

GXESZ 。U 

PEVRAN 

PBI 

PE1050 





F534 SE  DQBE 
03377A F537 D5  AC 
03878 F533 
03373A F533 55 80 
03380A F53B 5A 


F527 5A 

F528 2 F ヨ  F523 

F52A 37  B4 1 
F52C に 1 

F52C 3E AB 仙 

F52E 3q AD A 


F53Q0 27 1F  F551 
F532 2E OF  F543 


03381A F53C 2A  FB  F533 


03382A F53E 4A 


03383A F53F 25  F3  F534 
03384A F541 20  QOE  F551 


03385A F543 SE DOBE 
03385A F545 DB  AC 
033887A F548 5C 

03388 F543 
03383A F543 5 ヨコ 85 

G ヨ 30A F54B 5A 





033 ヨ 1A F54C 2A FE  F543 


03332A F54E 4C 


03333A F54F 25  F5  F545 





DECE 
BPL PBSH1Q 
STA PBESAVE GET END,SAVE 


ネ 
PESH2o EQU キネ 
LDA PBESP SET POS. 


SUEA PEDH N PLACE FOR SHIFT 


EEQ PESH5Q 
EMI PESH40 


ま 
PESH3O LDX #PEDATA LEFT SHIFT N PLACE 


LDE PBIB+1 
PESH325 EQU キネ 


ROR ュ + 
DECE 

BPL PBSH35 
DECA 


BNE PBSH3Q 
BRA PESH5O 


PBSH40 LDX #PBDATA EIGHT SHIFT N PLACE 
PESH31 LDE PEIB+1 

INCB 
PBESH45 EQU ネ 

ROL BrX 

DECE 

BPL PBSH45 

INCA 


BNE PBSH41 
キネ 
PESH5Q EQU キ 


























PE1BR,PE1AND PSET F551 に 1 
F551 3 AD Ci】 LDA PEDH 
PE10R,PE1AND PRESET F553 AA に 】 ADDA PEDOV 
F555 8 07 人 A ANDA # ま 07 
PE10R。PE1NOP OR F557 AD A STA PEDH 
04000A F55 ヨ 3 NEGA 
PE1NOP,PB1AND AND 04001A F55A 07 し 1 ANDA 07 
04002A F55C AF 全 STA PERE 
PE1EOR,PE1NOP EOE 04003A F55E RTS 
0400 は キ 
PE10R,PE1AND NOT 04005 キネ 
0400E キネ 
04007 * *PBEGET 
0400 】 
キネ GET PATTERN FRON CONN.AREA 
ネ # IF PATTERN IS NOTHING。 RETURNS “Qo" 
WINDOM CHECK AND SORT 04011 ま 
SHIFT PROCESS 04012 キネ 
04013 FSSF A PBGETQ EQU ま 
Qu4014A F55F ED E121 1 JSR CONTI NEXT PATTERN 
04015A F5B2 SE 1 LDX #.COUNAR+ す 
キ 0401EA 1 STX PEEAD 
EOXINV は] LDA ・CONAR+3 
PENX 1 STA PBEFRD 
PENY SKIP2 
・EOXX1 1 FCE SC CHPX # 
・BOXY1 A PEGET EQU ま ENTRY 
GADDR O21A F5BD 34 10 A PSHS X 
PBVRAM VRAM _ADDRESS E3 全 LDA PERD 
・EOXX1+1 07  F57A ENE PEGET2 
# ま 07 01 仙 LDA CONT 
PESP BIT NO,START ES FSS5F ENI PEGETO 
#EAS 0402BA F577 4F CLRA 
EiU 04027A S 2! ERA PEGET ォ 
PEGET2 EQU キ 
BE,U LDX 
PBLN LEFT NASK LDA 
・EOXX2+1 STX EE 
# ま 07 DEC PEFD 
REEP EIT NO,END PEGET4 TST PENOT 
BU EEGQ PEGET ヨ 






































COIA 
PEGETB FTSPUL X 
PERI RIGHT MASK PULS XPC 
PENX+1 
せま 07 ネ 
PEOV OVER BYTE * 
・EOXX1 *# 
GXOFF * PUT ELOCK< CONHAND 
X キ 
。EOXX2 04048 ま ・COFHAR+1 PATTEEN REIMAIND 
GXOFF 04045 # ・COAR+3 X1 
X。D 04045 * .COMAR+5 Y1 
。S++ .COMAR+7 X< 
PEIE INTERVAL _EYTE * ・EOMAR+ ヨ ーー Y2 
PEDH DATA HEAD 0 キネ ・COMAR+11 DUMMY 
PEREEX Q4Qo50 日 ・CONAR+12 FUNCTION CODE 
PERE REIAINDER BIT Q O4051 ネ ・COMAR+13 NUMBER OF EYTE 
PENOT NOT FLAG CLEAR 04052 まま ・COMAR+14 PATTERN 
・COMAR+18 04053 * 
#5 0405+ * 
PEINTS 04055 A PELKS EQU 
PENOT NOT FLAG SET 0405SA に 1 JSR PEINT 
PEINT4 Qd057A 1 LDA ・COMAR+12 
ERRE は FUNCTION CODE ERROR 04058A A CMPA #3 
ま Q405 ヨ A 7 ENE PE2010 
・COMAR+13 040BOA に 1 CON 
PBERD INPUT DATA,DEC COUNT 040B1A 合 CON PERN 
#、COMAR+ 1 は 040B2 A PBE2Q10 EQU # 
PEEAD INPUT DATA ADDFESS 040B3A 全 LDX #PE2FNC 
040B4A LSLA 
040B5A 1 LDX AX 
040BEA に 1 STX PE2ENT 
り 4QB7A に 1 LDU PEVEAN 
AND SHIFT 04Q0BSA CE F5E1 ESE PE2SUE 
Qu4O0E ヨ A に 3 人 LDU PEVEAN 
Q4070A C ヨ 4000 A LEAU 
キ 94071A に 3 FSE1 ESE 
PESAVE 04072A に 3 1 LDU 
PEDATA Q4Qn73A C ヨ _ Soon A LEAU ・・VGiU 
PENX 04078 キ 
PEREEX 04075 F5E1 A PE2SUE EQU キ 
PESH2Q 04Q7BA F5BE1 CQF AD 合 CLR PEDH 
LSED3 Q4077A F5E3 OF AF 合 CLR PERE 
#PEDATA 04078A F5E5 ヨ B に コ 1 LDA PENY+1 
PERE Q407 ヨ A F5E7 4C INCA 
PESH1Q 0408BQA F5BS ヨ 7 ED A STA PEI 
1X 04081 キ 
PEGET PATTERN GET 04082 F5BA A PE2050 EQU キ 
ュ X+ 04083A F5EA ED F5oD に 1 JSR PESHFT 
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0o4084A F5BD DS AaC Aa LDE PBEIE+1 04136 * ま 
odQ85A F5EF SE DOEE  A LDX #PBDATA 041 ヨ 7 キ 0 
0408BA F5C2 VACON G4138 * ま PUT ELOCK1, 
AF5C2 BE5  D4O ヨ 3  A BEITA VACC 04183 ネ 
coB7A F5C5 AD 3 ヨ F DOEEA JSF [PB2ENT] 04200 ネ 
0408BA F5C ヨ VACOFF 04202 キ 
AF5C ヨ E7  D4Q ヨ  A STA VACC 1 ネ 
oo8 ヨ A F5CC 33 CB5o A LEAU  GXESZ,U に 
nod0A F5CF 0A  BD A DEC PEI * GCURS ij GRAPHIC 
F5D1 26  E7 FS5EA BNE PBzo5o * 
| F5D3 33 RTS 
ネ 
F5D4 A PE2LEI EQU # DoAn AGCIX EQU 
| F5D4 ヨ 5 AS A LDA PELN D0A2 AGCIY EQU 
| F5DS 34 EE A ANDA PBEDATA DoA4 A GCX EQU 
] F5D8 87 BE A STA PBDATA DQAs 4 GCY EQU 
F5DA 5 AB A LDA PERN DoA8 A GCCODE EQU 
F5DC A4 8 A ANDA BiX DoAa A GCCL EQU 
F5DE AZ7 85 A STA B,X DQAA A GCSCON EQU 
F5EO 3 ヨ RTS DoAE A GCCONT EQU 
F5E1 A PE2SET EQU キネ DoAD A GCECON EQU 
F5E1 8D F1  F5D4 BSR PB2LRN DoAE A GCNCON EQU 
Qd104A F5E3 5 AS A LDA PBELM DoAF A GCCON EQU 
04105A F5E5 43 CONA DoEo A GCCUES EQU 
0d105A F5E5 A ANDA  .U DoE3 AGCHADo EQU 
04107A F5ES A ORA 5 DoE5 A GCHAD1 EQU 
4108A F5EA A STA ない 入 DoB7 A GCELUE EQU 
410 ヨ A F5EC A LDA PBRN DoBE AGCRED EQU 
Q4110A F5EE COIA DoB ヨ A 3 
4111A F5EF A ANDA BU DoEA 。 A 
Q4112A F5F1 A ORA EnX DoBE A 
04113A F5F3 A STA B,X DoEC  A 
nd114A FBF5 A PE2SE5 LDA EX DoEE A 
04115A F5F7 A STA BU DoEF A 
411EA F5F ヨ 5A DECE A 
| 04117A F5FA 2^A F ヨ  F5F5 EPL PB2SE5 Aa 
| Q4118A F5FC FTS DoEA A GCSARE EQU 
04118 * * ネ 
412Q F5FD Aa PE2AND EQU # EoDE A GCERE1 JP 
04121A F5FD 5 AS A LDA PELM * 
Aa OFA PBDATA 
A STA CUE 
の 1 GCUES Eo0 
A OFA 540A BEQ 
AS STA 042414 CHPA 
A PE2AN5 LDA B。X 04242A EHI 
A ANDA EuU 1 # 
2 5 A STA BU 
04130A FBQF 5A DECE 4 81 
04131A F5 FEQ ヨ BPL PB2AN5 # 
M FTS A LDX 
PE2OFE EQU 2 18R 
BS 』 
PE20R5 LDA 4 
OFA A GCnnnn EQU 
6 | 6 昭 
140A BPL | 内 0 
1414 FTS A STY 
ロ 414< # ム LDA 
04143 PEzEOF EQU A STA 
94 14 ESF PE2LEH Aa STA 
nd145A PE2E05 LDA BE,X A LDA 
| 1988 EOEA BuU A STA 
| 041474 STA Ei.U A LDD 
の 19 DECE A STD 
4143 EPL PE2E05 * 
4150A FTS | # 
Gt151 * 9 
K 了 SET FLAG 
90415 PE10F EQU 3 和 * 
04154A LDE PBIBE1 2 ら 
4155A LDY #PEDATA A LDX 
nd155A LNXOF VACON A STX 
Aa EITA VACC A CLR 
04157 ム PE10R5 LDA E,Y + 
0 1 SSA OFA B,X + 
加 STA BE,X 3 
04180A EDB D | te EXTEND COLOF 
u411A F7  FB34 BPL PE10R5 LDA 
nd4152A VACOFF ANDA 
A STA VACC | STA 
PE1NOP RTS LDX 
* Qoo] LSE 
A PB1AND EQU + 89 RB 
A LDE PEIBE+1 SEX 
1 LDY #PBDATA STA 
LNXAND VACON CMPX 
人 EITA VACC ENE 
04163A A PE1AN5 LDA BE.Y # 
04170A COMA * 
041714 Aa ANDA BE.X ま 
94172A Aa STA EX キネ 
04173A DECE LDX 
04174A BEPL PE1AN5 JSR 
04175A VACOFF od233A FBD4 ED JSE 
に A STA VACC | 042 # 
0417BA LNXNOP FTS | 042B5 * 
G4177 + | 0d2B5 * 
04178 PE1EOF EQU * 04287 ** ま SHIFT CUESOR 
Q4173A LDE PEIE+1 * 
04180A LDY PEDATA A4 A LDX 
04181A LNXEOFE VACON 1Q A TFR 
BITA VACC Q7 A ANDE 
PE1E05 LDA BsY Q5 FBE4 BEQ 
EORA  B.X AA A STE 
STA BExX F81A Aa JSF 
_- DECE FEE4 AGCao EQU 
F7 FSS1 BEPL PE1EO5 AC A LDE 
VACOFF AA A STB 
D4oa 。 A STA VACC ネ 
RTS | 8 DoC3 A LDX 
キネ 0431Q9A FSEE ED  F ヨ 4D A JSR 
F5E 1 A PE2FNC FDE PE2SET | 04311A FBEE DC Bo A LDD 
418 EoDBE Aa FDE ERE54 Co Aa STD 
04132A FB7< FS13  A FDE PE2OR B2 A LDA 
041 ヨ 3A FE73 F5FD Aa FDE PBZAND C2 A STA 
041 ヨ 4A F575 FB1F Aa FDE PB2EOE キネ 
04185A F578 F5E1 A FDE PE2SET | FSFB A GCOoo2 EQU * ま 
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BLOCK2 END | 04317A FDGE A JSR KEYGET 
- | 0d4318A ao A LDE -.AEET AEORTS 
K 43  F74Q BNE GCIEQ YES. 
| AB A STA GCCODE SAVE EEY CODE 
3 CMPA 
F718 BEQ FETUEN REY 
CURSOR A CHPA 
F75E BLO 
A SUEA 
F71o EEQ 
Aa CNPA 
INITIAL CO0-ORDINATE Y SAVE AREA FEFE EHI 
X CO0-0RDINATE SAVE AREA SKIP2 
Y CO-ORDINATE SAVE AEEA SC A FCE * ま EC CHPX # 
KEY CODE SAVE AREA 0A A s LDA #10 
GCCODE+1 COLOR CODE SAVE AREA | AC A STA GCCONT+1 
GCCL+1 SHIFT COUNT SET AREA AA Aa STA GCSCON 
GCSCON+1 SHIFT DOT NUMEEE DE  FGFE BEA GCono2 
GCCONT+2 BEYTE COUNT SET AREA 
GCECON+1 NEEDS CO0-OEDINATE NUIfEEE SET AREA | キネ 
GCNCON+1 NEEDS CO-OFDINATE NUMEER SET AREA まま RETUEN KEY 
GCMCON+1 CUESOE SET AEEA 
GCCURS+3 GCAREA HEAD ADDRESS SET AREA F718 
GCHADo+2 CENTEE CO0-OFDINATE SET AEEA HEAD ADDEESS 
GCHAD1+2 BLUE COLOR AREA * 
GCELUE+1 RED COLOR AREA *# EMFEIZE CENTEF CO-OFEDINATE 
GCRED+1 GREEN COLOR AEEA * 
BCGREE+1 BIT MAEE SAVE AREA A4 A LDX GCX LOAD X CO-ORDINATE 
GCEITM+1 WORK AREA AB A LDY GCY LOAD Y CO-OEDINATE 
GCUOR+1 OR AEEA | BE5 A LDU GCHAD1 
GCWOR ド E+2 RETUEN FLAG C1 A STX 、U++ 
GCFLG3+1 TNITIAL POSITION SHIFT FLAG | 1oAF C1 A STY ュ U++ 
GCFLG5+1 INITIAL CURSOR SAVE F7z4 DF  B5 A STU GCHAD1 SET CENTEF C0-0RDINATE SAVE AFEA 
GCCRSI+3 SAVE AREA Q * 
GCAREA+33 04350 3 
Q4351 ** ま VEAN SAVE 
EREG5 04352 ネ 
04353A F72R SE DOC3 A LDX #GCAREA LOAD HEAD ADDRESS OF SAVE DATA 
04354A F729 10 ヨ E B3 A LDY GCHADO LOAD HEAD ADDRESS OF SAVE AREA 
04355 F72C A GCoon ヨ EQU 3 
| 
0435BA F72C AB SQ A LDA 3 
04357A F72E A7 AO A STA ュ Y+ SAVE 1-EYTE DATA 
.COMAR+4 TEST NEEDS CO- ORDINATE NUNEER 04358A F730 BC DOEA A CMPX 。#GCAREAT+3S 
GCERR1 04353A F733 26  F7  F72C ENE GCO0Q ヨ 
#1 043B0A F735 10 ヨ F B3 A STY GCHADO SET END ADDDRESS OF SAVE AREA 
GCERR1 04361 *# 
04362A F738 OC BE INC GCFLG3 RETURN FLAG OFF 
CNCON STOEE NEEDS CO0-ORDINATE NUMEER | 04363A F73A 0A AE A DEC GCNCON 
GCHCON 04364A F73C 2B BS  FBFS BNE GCoo02 
04365 3 
.COMAR+5 TEST INITIAL CO-0RDINATE 043BG * 
.COMAR+7 04367 ** END GRAPHIC CUESOR COMMAND 
GAXCHI | 04368 ま 
0435B F73E A GCoooA EQU * 
04370A F73E 2O OB  F745 BRA GCRTS 
ま n4371 * ネ 
GCX SAVE X CO-ORDINATE 04372 F740 A GCIRQ EQU ネ 
GCIX SAVE INITIAL CO-ORDINATE X 04373A F740 BE DOC3 A LDX #GCAREA 
GCY SAVE Y CO-0EDINATE 04374A F743 BD  FA2S A JSR GCRSAV CURRENT CURSOR CLEAR 
GCIY SAVE INITIAL CO-0EDINATE Y 04375A F745 3E  B3 A GCRTS LDX GCHADO STACKED CURSOR CLEAR 
# あ FF SET CURSOR' 04376A F748 BC DOEA A GCIRQ5 CMPX 。#GCSARE 
GCCUES 04377A F74B 23 08 F755 BLS GCIRQ3 NO DATA 
GCCUFS+1 04378A F74D 30 88D ヨ 3 A LEAX  -33.X 
きま EO 04373A F750 ED  FA2S A JSR GCRSAV 
GCCUFES+2 043B0A F753 20 F3  F748 BRA GCIRQ5 
#1 | 04381A F755 33 GCIRQ ヨ RTS 
GCCONT INITIAL DOT NUMEER | 04382 まま 本 。 END GCURS 
| 04383 * ネ 
04384 * ま 
04385 2 
043BG キネ 
NGCSAEE 04387 ** CURSOR MOVE KEY 
GCHADQ 04388 ネ 
#、COIAR+3 0438 ヨ F756 A GCoooE EQU 3 
04330A F75S OD EE A TST GCFLG63 
RETURN FLAG ON 04331A F758 2B 0A  F764 ENE GCoooF 
043 ヨ 2A F75A 34 02 A PSHS  A 
04333A F75C SE DOC3 A LDX #GCAREA 
CODE | 043 ヨ 4A F75F BD  FA2S A JSR GCRSAV 
| 04385A F7B2 35 02 A PULS Aa 
LOAD COLOF CODE 04335 F764 A GCoonF EQU 3 
| 04387A BE A CLR GCFLG3 
| 0433SA 02 A CMPA  #$02 GCL20 
04333A 05  F7SF BNE GCoo1Q 
04400A FS3F A JSR GCL20 
04401A 1C  F78B BRA GCoo13 
04402A Q6 A GCOO10 CMPA  #$*OE GCR2O 
Sd 04403A 05  F778 BNE GCoo12 
#GCBLUE+3 04404A F7FC A JSR GCRzo 
GCooo1 04405A 13  F78B BRA GCoo13 
nd440EA OB A GCoo12 CMPA  #$OB GCHONE 
O+407A Q5  F78 ENE GCOQ14 
04408A F7CF A JSE GCHOIE 
0d40A 0A  F78E EEA GCoQ13 
#GCAREA LOAD HEAD ADDEESS OF SAVE AREA 4410A 13 A GCoo14 SUEA  # ま 1 ヨ 
GCEDRY SET EOUNDRY COUNDITION | 94411A 906  F78B EMI GCO0013 
GCSAVE VRAM SAVE 044124 LSLA 
4413A F73A A LDX RGCTABL 
04414A に に 3 A JSR [A,X] 
ud415 
TO INITIAL POSITION 0441BA DoC3 A LDX SGCAREA 
od417A F880 A JSR GCEDRY SET BOUNDARY CONDITION 
GCX LOAD X CO-OEDINATE 4418 キネ 
X,D nd413A F7 ヨ 1 ED  FSEC A JSF GCSAVE  VEAM SAVE 
本 ロ 7 04420 浴 
GCoo ud421A F7 ヨ 4 ED  F ヨ 4D A JSR GCDISP DISPLAY GEAPHIC CURSOR 
BCSCON SET SHIFT COUNT 2 3 
BCSFT2 F737 7E  FGF5 A JMP GCooo2 JUMP EEY GET 
キキ 夫 
GCCONT+1 * 
GCSCON SET SHIFT COUNT = 1 ま 
F7 ヨ A A GCTAEL EQU * 
#GCAREA LOAD HEAD ADDRESS OF GCAREA 9 F7 ヨ A F7A8 人 A FDE GCUP2Q  *18 
GCDISP DISPLY GRAPHIC CUKSOR 0442 ヨ A F7 ヨ C F7B5 Aa FDE GCDM2Q 。 $1A 
GCCURS SAVE INITIAL CURSOE 4 は 30A F7 ヨ E F7B4 A FDE GCNOP  $1B 
GCCRSI nd4431A F7AQ Aa FDE GCSFTR *1C 
GCCURS+2 0d4432A F7A2 FE4A A FDE GCSFTL $*1D 
GCCRSI+2 04433A F7A4 F7EQ Aa FDB GCUP $1E 
Q4434A F7AB F7EC A FDB GCDu *1F 
04435 * 
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04436 F7AS A _GCUP20 EQU ネ | 04556 FS4A ^A GCSFTL EQU 
04437A F7A8 DC ABS A LDD GCY | 04557A F84A DC AH Aa LDD 
0443BA F7AA BS3" 0014 A SUBD  #20 04558A FS4C 3 AE 4 SUED 
0443 ヨ A F7AD 2A 03  F7B2 BPL GCUP23 | 0455 ヨ A F84E DD  aA4 A GCLDO STD 
04440A F7AF CC OOC7  A LDD  #GYD-1 | 045SOA FB5O 2A 0 ヨ  FB5B BPL 
04441A F7B2 DD AG5 A GCUP23 STD GCY 04581A F852 CC 027F Aa LDD 
Q4442A F7E4 3 ヨ GCNOP RTS 45B2A F855 DD Ad A STD 
04443 ネ Co45B3A F857 CB  Q1 A LDE 
KRERI * ま 045E4A FB5 ヨ 20 。 13  FSGEE BRA 
0d445 まま TREAT 20-DOT DOMN CURSOR KEY 04555 Aa GCSFT7 EQU 
04445 ネ 0455GA A LDE 
04447 F7B5 Aa GCDM20 EQU ネ 04557A Aa LDX 
0444BA F7E5 CC  Q0C7 A LDD  #GYD-1 04558A A GCSFT5 LDA 
0444 ヨ A F7BB ヨ 3 AB Aa SUBD  GCY 0455 ヨ A _ Aa CNPA 
Q4450A F7EA 1083 0014 A CMPD  #20 04570A F8BE BEQ 
nd451A F7BE 25 0 ヨ F7C3 BCS  GCood1 | 045714 A ASL 
04452A F7CO DC AG A LDD  GCY | 04572A Aa ROL 
Cd4453A F7C2 C3  QQ14 A ADDD  #2Q | 04573A A ROL 
od454A F7C5 DD AG5 Aa STD  GCY ADD 20-DOT TO Y CO-0RDINATE 04574A F878 ERA 
04455A F7C7 20 0Q5  F7CE BRA GCO0042 04575 A GCSFT8 EQU 
0d455 F7C3 AGCoo41 EQU * | 04575A A LDA 
4457A F7C ヨ CC 0 A LDD #$*0000 | 045774 A STA 
no4458A F7CC DD AG5 A STD  GCY SET Y CO-ORDINATE = 0 | 04578A Aa LDA 
04453 F7CE Aa GCoo42 EQU * 045784 Aa STA 
0445QA F7CE 3 RTS Q45SOA Aa STA 
Q4451 ま 04581 A GCSFT3 EQU 
キネ 04582 DECE 
まま TREAT HONE KEY 04583 FSSO BNE 
Q * | 04584A A LDB 
OHE5 F7CF A GCHONE EQU 3 | 045B5A Aa STE 
HEEA AO A LDX GCIX LOAD INITIAL CO-0ORDINATE X | 045BEA RTS 
Cd4B7A 人 4 Aa STX GCX SET INITIAL CO-ORDINATE X C4587 * 
OHHBBA A2 A LDX GCIY LOAD INITIAL CO-ORDINATE Y 0458B キ 
OddEBA AB A STX GCY SET INITIAL CO-ORDINATE Y 04589 * ネ 
094470A Co A LDD GCCRSI 0458Q キネ 
044714 Bo A STD GCCUES 04531 # 
044724 2 A LDA GCCRSI+2 045 ヨ 2 * GCEDEY ! 
04473A B2 A STA GCCURS+2 04593 H 
044748 ETS 045 ヨ 4 FSSQ A GCBDRY EQU 
4475 ま Qu4535A FSSO 3 は 10 1 PSHS 
Cd475 * 0455A A LDA 
ネ 04537A A STA 
H 0458A F Aa LDX 
** ま BCUP i TEEAT UP CURSOR KEY 0453 ヨ A Aa LDY 
# 04BQ0A A JSE 
A GCUP EQU * ndGn1 # 
人 LDD GCY LOAD Y CO-ORDINATE 04Q2A 人 STE 
A SUED GCCONT 04503A A LDX 
F7E ヨ BEPL GCUP> 04BO04A A STU 
QOC7 A LDD #GYD-1 Cd4505A A LDX 
F7EB AGCUP2 EQU * 04BOEA A TFR 
AB A STD  GCY SET Y CO-ORDINATE = 13 ヨ 04SQ7a a JSR 
RTS | CdBO8A Aa TFR 
* 045O ヨ A A LDX 
G4B10A A CNPU 
* QB11A FBAB BNE 
まま BCDM ? TREAT DOMN CUESOR KEY 046124 内 LDA 
キ 04B13A Aa STA 
AGCDM EQU # | 045144 F8AF BRA 
Aa LDD  GCY LOAD Y CO-ORDINATE 04515 A GCBDR1 EQU 
A ADDD GCCONT | 04516A Aa CLE 
A CHPD 。#GYD-1 04517A A INC 
F7F ヨ BLE GCDM2 04618 A GCEDR2 EQU 
A LDD #O 04513A A CPU 
045QQ A GCDM2 EQU * 04520A OE  F8EE ENE 
Cd501A Aa STD  GCY SET Y CO-0RDINATE = o FF a LDA 
4502A RTS 03 ム STA 
nd5 H 04 。 FBEF BRA 
045Cd4 ネ FSEE a GCEDR3 EQU 
od505 # 03 Aa CLE 
0450EA A GCF20 LDD #20 AD A INC 
Cd507A Aa STE GCSCON FEEF Aa GCEDR4 EQU 
Q45 A ADDD  GCX Qond A CNPY 
04503A ERA GCRDO SC3 25 06 F8CB BCS 
04510 * | 04630A F8C5 BB 0Qd が LDA 
0d511 ** GCSFTE 1 TREAT SHIFT RIGHT CURSOE KEY 04531A FC7 A7  Qd A STA 
04512 * 04G324 FSC3 20 04  FBCF BRA 
04513 FEQ5 AGCSFTE EQU 04533 FECE A GCBDR5 EQU 
04514a 人 4 Aa LDD  GCX | 04534A FECB 1F 20 A TFR 
04515A AE A ADDD GCCONT | 04635A F8CD E7 Cod A STE 
内 ム | | 
04518A A GCEDO STD GCX | FSCF A GCEDRS EQU 
04517A に CHPD 。、#GXD-1 04 A LDA 
1 81A BLE GCSFT2 | AD A ADDA 
Aa LDD #O AD a STA 
A STD  GCX SET X CO-ORDINATE = Q | GoC7 AaA LDD 
A LDBE #1 04541A AE a SUED 
D BRA GCSFT4 045424 o5 A STE 
A BCSFT2 EQU キネ 04E43A 0 A CMPB 
A LDE GCSCON LOAD SHIFT COUNT 04543 04 。 FSE4 ECS 
1 LDX #GCCURS 04545A ロ 4 合 LDE 
A GCSFT3 LDA 2.X 94545 ム o5 A STB 
A CHPA  #$FF G4547 FEE4 A GCEDR7 EQU 
0d528A BzD EEQ GCSFT4 04548A o5 A LDE 
452 コ A A LSE GCCURS SHIFT RIGHT 1 BIT 0454 ヨ 4 AD ^ ADDB 
04530A A ROR GCCURS+1 04550A AD A STE 
3 A ROR GCCURS+2 045514 RTSPUL 
7 ERA GCSFT5 に コ 0 A PULS 
A GCSFT4 EQU キネ 04552 キネ 
04534A A LDA #FF 04553 * 
04535A A STA GCCURS Q4854 ネ 
Cd4536A A STA GCCURS+1 04555 ネ 
04537A A LDA # ま SO 0455 ネ 
04538A A STA GCCURS+2 04557 ** GCSAVE 1 
Qd453 ヨ A GCSFT5 EQU キ 04G5B ネ 
Cd540A DECE DECREMENT SHIFT COUNT 0455 ヨ FSEC A GCSAVE EQU 
Q4541A F ENE GCSFT3 04BBDA FSEC 34 10 1 PSHS 
04542A A LDE GCCONT+1 Qu4BS1A FEE EE 84 A LDU 
Q4543A A STB GCSCON 04BB2A FSFO 30 05 人 LEAX 
04544A RTS 04B53A 1C  F81o BSR 
od545 3 048B は ネ 
04546 キネ 45B5A E+ Aa LDX 
04547A FB3F CR 14 A GCL20 LDBE  #20 04B5BA 84 A LDU 
Q4548A F841 D7 AA A STB GCSCON | 04B57A SB 11 Aa LEAX 
04543A F843 DC  A4 Aa LDD  GCX 04BBBA Cg 40o0 A LEAU 
04550A F845 83 0014  A SUBD  #20 04BE ヨ A OF  F3 ヨ 10 ESR 
04551A F848 20 04  F84E BRA  GCLDO 04B70 ネ 
4552 3 04B71A E4 A LDX 
04553 ネ 04572A 84 A LDU 
04554 ネネ GCSFTL ! TREAT SHIFT LEFT CURSOR KEY ロ 4573A BB 1C Aa LEAX 
04555 ネ 04B74A C ヨ Booo A LEAU 
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* ま 04B75A F3OC SD  Q2  F ヨ 1o ESE GCSAV1 
GCX LOAD X CO-0RDINATE 04575 キネ 
GCCONT 04677A FSQOE RTSPUL X 
GCX FaoE 35 30 A PULS 。 X』PC 
GCSFT7 ま 
#GXD- 1 ネ 
GCX SET X CO-ORDINATE = E3 ヨ * 
#1 * 
GCSFTS まま GCSAV1 ? VRAM SAVE 
キ キ 
GCSCON LOAD SHIFT COUNT Fa10 A GCSAV1 EQU 3 
NGCCURS VACON 
2。X A BITA VACC 
#BQ A STU GCMORK STORE VEAN ADDFEESS 
GCSFT8 A LDY 
GCCURS+2 SHIFT LEFT 1 BIT A LDA LOAD UPER BYTE COUNT 
GCCURS+ 1 A LDE 
GCCURS MUL 
GCSFTS A PSHS 
3 A LDD GCMORI 
# ま 01 A SUED 。、S++ 
GCCUES A TFE DU 
# 生 FF # 
GCCURS+1 A LDA auY LOAD UPER BYTE COUNT 
GCCURS+2 A ADDA 5.Y ADD UPER EYTE AND DOMN 
# CE! A GCSA1 EQU キネ 
0d5 ヨ ヨ A A LDE ouU LOAD VRAM 
GCSFTS 04700A F ヨ 2 A STB ュ X+ SAVE TVRAM TO AREA 
GCCONT+1 04701A F ヨ 2D 33 CB850 A LEAU 8BOiU ADD EO TO VREAN ADDRESS 
GCSCON 04702A F ヨ 30 4A DECA 5 
04703A F331 2A F5  F323 BPL GCSA1 
04704 # 
04705A F ヨ 33 DE BC A LDU GCMORK LOAD VRAM ADDRESS 
04705A F ヨ 35 AR 22 A LDA 2。 LOAD LEFT CONDITION 
04707A F837 81  FF A CMPA 。 #$FF 
04708A F ヨ 3 ヨ 27 04 FSSF BEO GCSA2 
SET EOUNDEY CONDITION 04703A F ヨ 3E E5 5F A LDE  -1.U LOAD VEAM 
04710A F ヨ 3D E7 80 A STB ュ X+ SAVE VRAM 
キ 04711 F33F AGCSA2 EQU  * 
X 04712A F ヨ 3F A6 23 A LDA 3 LOAD RIGHT CONDITION 
#1 04713A F ヨ 41 81  FF A CMPA 。#$FF 
GCECON SET INITIAL BYTE NUNEEF 04714A F ヨ 43 27 04  F34S BEQ GCSA3 
GCX LOAD X CO-0RDINATE 04715A F ヨ 45 ES 41 A LDE 1.U LOAD VRAM 
GCY LOAD Y CO-ORDINATE 0471BA F347 E7 84 A STB OX SAVE VRAM 
GADDR 04717 F348 AGCSA3 EQU  * 
04718A F ヨ 43 VACOFF 
GCEIT SET BIT MARK AF ヨ 48 B7  D40 ヨ d  A STA VACC 
0、S 04719A F ヨ 4C 3 RTS 
Q、X 04720 * 
GCX LOAD X CO-ORDINATE 04721 * 
X:D 04722 3 
LSED3 04723 ネ 
DU 04724 # 
QS 04725 * GCDISP ! DISPLAY GRAPHIC CURSOR 
# ロ 04726 * 
GCEDR1 04727 F94D AGCDISP EQU ネ 
#$FF NO DISPLAY 04728A 1Q A PSHS  X 
2。X SET LEFT CONDITION 04729A E4 A LDY 0.S 
GCEDR2 04730A A4 A LDU oiY LOAD VRAM ADDRESS 
* 04731A B7 A TST 。 GCELUE TST BLUE COLOR 
23X SET LEFT CONDITION "04732A od  FS5C EEQ GCDIS1 
GCECON 04733A 2C  F386 BSR GCDOR 
キ 04734A 2  FS5E BRA GCDIS2 
#7 ヨ 04735 F35C AGCDIS1 EQU 3 
GCBDR3 04735A 74  FSD2 BSR GCDAND 
#$FF NO DISPLAY 04737 F35E A GCDIS2 EQU ネ 
3,X SET RIGHT CONDITION 04738A E4 A LDY 9o、S 
GCEDR4 04739A A4 A LDU 。 oy LOAD VRAM ADDRESS 
ま 04740A C ヨ 4oo0 A LEAU 。..VEiU SET RED ADDEESS 
3X% SET RIGHT CONDITION 04741A BB A TST  。 GCRED TEST RED ADDRESS 
GCECON 04742A 04  FSGEF BEQ GCDIS3 
04743A 18  F386 ESR GCDOR 
は 04744A 2  F371 BRA GCDIS4 
GCEDE5 04745 FEF 。 A GCDIS3EQU キネ 
きす 04745A B1  F3D2 BSR GCDAND 
4。X SET UPER BYTE COUNT 04747 Fg71 A GCDIS4 EQU # 
GCEDR5 04748A E4 A LDY 0.S 
キネ 04743A A4 A LDU 。 oxY LOAD VRAM ADDRESS 
Y,D 04750A C ヨ Boo0 A LEAU  ..VGiU SET GREEN ADDRESS 
4.X SET UPER BYTE COUNT 04751A に 1 A TST  。 GCGREE TEST GREEN COLOR 
94 04752A F ヨ 7C 27 04  F382 BEQ GCDIS5 
GCECON | 04753A FS7E SD 9B R599 BSR SOON 
G 04754A F ヨ BO 20 02  FB84 KA GE 
RE peHOUEMCDUNO o4755 F ヨ 82 AGCDIS5EQU  * 
GCY 94756A F382 8D F3D2 BSR GCDAND 
5。X 0475 84 A GCDIS5 * 
1 SEURDOMUABYAUETBOMNT 04758A F ヨ 84 RTSPUL X 
BCEDR7 | AFB84 35 30 A PULS XPC 
は は 
5 SET DOuN BYTE COUNT は 
5,X ネ 
GCECON *# GCDOR ! TREAT OR 
GCECON ト 
X SEUWAOTALBNIESCOONNTD o4755 F8g A GCDOR EQU  * 
XPC 04758A VACON 
全 D40 ヨ に 1 BEITA VaCC 
047B7A BC A STU GCMORK SAVE VRAM ADDRESS IN MORK AREA 
047BBA 24 A LDE 4.Y LOAD UPER BYTE COUNT 
04763 FED AGCDO1 EQU * 
Q4770A F3BD 6 BA A LDA GCEITM LOAD BIT MAEK 
SAVE VRAM AREA 04771A FEF 5D TSTB 
04772A F ヨ ヨ O0 27 0A  FSHC EE GCDOz TEST UPER BYTE COUNT 
3 | 94773A F ヨ 32 33 CBBO A LEAU  -Bo。U SUBTRACT SO FRON VRAM ADDRESS 
X 04774A F ヨ 35 AA  C4 A ORA oiU 
0,X LOAD VRAM ADDRESS | 04775A F ヨ 37 A7  C4 A STA OU SET VRAM 
B,X LOAD HRAD ADDRESS OF SAVE AREA | 0477BA F ヨ ヨ 3 5A DECE DECREMENT UPER BYTE COUNT 
GCSAV1 | 04777A F ヨ 3A 20  F1 FSSD BRA  GCDO1 
| 94778 * ネ 
Q、S 04778 FaC AGCDO2 EQU  * 
OX 04780A F33C DE BC A LDU GCMORK LOAD VRAM ADDRESS 
B+11.X 04781A FE ES 25 A LDE 5.Y LOAD DOMN BYTE COUNT 
..VE。U SET RED ADDRESS 04782 FBAO AGCDO3 EQU  * 
GCSAV1 04783A FBA0 ヨ E BA A LDA GCBITM 
04784A F ヨ A2 5D TSTB 
0.S 04785A FBA3 27 QA FBAF BEQ GCDO4 
0。X 0478SA FBA5 33 CB85o A LEAU SO,U ADD VRAM ADDDRESS AND 8o 
B+11* ネ 2。X 04787A FSAB AA  C4 A ORA OU 
..VG,U SET GREEN ADDEESS 04788A F9AA A7 Cd A STA 0.U SET VRAM 
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04783A F ヨ AC 5A DECE DECREMENT DOMN BYTE COUNT * GCRSA1 1 
04730A F3AD 20 F1  F3AQ BRA GCDO3 キ ま 
04781 F3AF AGCDO4 EQU キネ FA4C a GCRSA1 EQU 
04732A FBAF DE BC A LDU GCMORK LOAD VRAM ADDRESS | VACON 
47 ヨ 3A FE1 BE DOBO  A LDX #GCCUES LOAD HEAD ADDRESS OF CURSOR AREA Dod 。 AaA BITA 
Cd7 ヨ 4A FE4 BD 22 Aa SD、 3 LOAD LEFT CONDITION BC A STU 
| 4785A FER 2R QR FEE BNE GCDO5 2 A LDY 
047 ヨ BA F ヨ BB AS 8 A LDA 0.% | A LDA 
04787A FEA AA 5F A OFA -1.U | A LDE 
047 ヨ BA FEC A7 5F A STA -1.U SET VRAM MUL 
# A PSHS 
FEE A GCDO5 EQU * A LDD 
FEE AE  o1 A LDA ey。 SET CENTER CURSOR A SUED 
FCG AA  C4 A OFA 0.U A TFR 
| FC2 A7  C4 A STA QiU SET VEAM キ 
| R A LDA 
A TsT 3.Y LOAD RIGHT CONDTION A ADDA 
FCE ENE GCDOs INCA 
A LDA っ 。X A_GCESAS EQU 
A OFA 1.U A Aa LDE 
A STA 1.U SET VRAM A A STE 
A GCDOE EQU * A A LEAU 
VACOFF Aa DECA 
A STA VACC a BR ENE 
RTS * ま 
# A A LDU 
* A A LDA 
| # Aa A CHPA 
* A ( EEQ 
# A 内 LDE 
| * BCDAND ? TREAT AND A a STE 
# A GCRSA3 EQU 
F3Dz AGCDAND EQU + A Aa LDA 
VACON Aa A CHPA 
B5 Do ヨ a Aa BEITA VACC A EEQ 
DF EC A STU GCMOFK SAVE VRAN ADDRESS IN MORK AREA A A LDE 
6 BEA A LDA  GCEITM LOAD BIT MARH A A STE 
4824 43 COMA 1 A GCKSA4 EQU 
Qd825A F ヨ DA 7 BB A STA GCMOR STORE COMPLEMENT BIT MAEH 2A VACOFF 
Cd482BA FDC ES 24 A LDE 4.Y LOAD UPER BYTE COUNT A Daog 。 Aa STA 
Q4827 FBDE A GCDAN1 EQU キネ | 0d343A FABB 3 RTS 
1 TSTE 04 ヨ 4 は キ 
A QC  FSED BEQ  GCDANz Odd5 * 
A EE A LDA GCMOR LOAD CONPLEMENT BIT MARK ネ 
A CS Bo 4 LEAU SUETRACT SQ FROM VRAM ADDEESS * PAINT CONMAND 
| A C3 A ANDA * 
Aa C4 Aa STA QiU * .COMAR+3 
a DECE DECREMENT UPER BYTE COUNT + .COHAF+5 
| A F1  F3DE ERA GCDaN1 # 
| FED AGCDAN2 EQU  # | # 
| A BC Aa LDU GCMORK LOAD VREAN ADDRESS # 
Aa 25 A LDE 5.Y LOAD DOMN BYTE COUNT * 
F ヨ F1 A GCDAN3 EQU * # 
TSTB SORG 
QC FaAQQ BEQ GCDAN4 DoE ヨ A .$ORG SET 
EE A LDA GCMOR LOAD COHPLEMENT BIT MARK 358 1 DS 
C8 5o 4A LEAU 80U ADD SO AND VERAN ADDEESS | Do A PASAVE EQU 
C4 A ANDA QuU | DOEE A . ま OEG SET 
C+ A STA oiU SET VRAM | Cd35 ヨ A FABA DS 
DBEA DECE DoEE A PAERAN EQU 
04847A F1  FgF1 BRA GCDAN3 DoBC ム .*$ORG SET 
FAao Aa GCDAN4 EQU * 0436QA -FAEA DS 
FAou DE EC Aa LDU GCMORK LOAD VERAN ADRESS A PALINT EQU 
FA02 8 DoEo 。 4A LDX GCCUES LOAD HEAD ADDRESS OF CURSOF AFEA | A .*DEG SET 
04851A FA05 EE 22 A LDE 2Y LOAD LEFT CONDITION 0451A FABA Ds 
04852A FAQ7 5D TSTE DoED A PAJOHO EQU 
nd853A FAOS 25 07  FA11 ENE GCDAN5 | DoC+ A .*$ORG SET 
04854A FAOA AR 4 A LDA QuX 3 DS 
04855A FAQC 43 CONA 4 PADIRY EQU 
0485EA FAQD A4 5F A ANDA  -1U A .$ORG SET 
0d8B57A FAQOF A7 5F A STA  -1.U SET VRAM 04353A FABA Ds 
04858 FA11 A GCDAN5 EQU * A PAYADD EQU 
Oo485 ヨ A FA11 AE 01 A LDA 1.X 4 .$ORG SET 
Q4BEOA FA13 43 COMA 048E4A FABA DS 
udSS1A FA14 A4 CH A ANDA QiU | A PANXTY EQU 
B2A FA1G A7  C4 A STA 。 QiU SET VRAM | 4 ・ ま OKG SET 
* | Cd4355A FABA DS 
23 A LDE 3.Y | A PACURY EQU 
TSTB A .*$ORG SET 
048BEA 07  FA2 BNE GCDANG 043BEA FABA DS 
04857A FA1D AE 02 A LDA 2X DoCC A PAXOFF EQU 
Q4BEBA FATF 43 CONA = = DoCD A ・ ま ORG SET 
0485A FA2O A4 41 A ANDA 。 1.U ヨ 67A FASA DS 
Q4870A FA22 A7 41 A STA 1U SET VEAH DoCD A PASTKP EQU 
04871 FA24 A GCDAN5 EQU 3 に DoCF A ・$DRG SET 
04872A FA24 VACOFF 043ESA_FASA DS 
| AFA24 BE7  D4o ヨ A STA VACC DoCF A PASTAK EQU 
Q4873A FA27 3 ヨ RTS D2BF A ・$ORG SET 
04874 キネ | 0435 ヨ A FASA DS 
nd4875 * ネ | D2EF A PADMHY EQU 
G4875 * ま DzBEF A .*$DRG SET 
0d4B77 ネ 『 
04878 3 Q437 1 キ 
Q487 ヨ 3 04 ヨ 7< ま 
048BO * GCRSAV # RETURN THE CONTENS OF SAVE AREA TO VRAM ロ 4873 FASA A PAINT EQU 
Q4881 + 04374A FABA BB 。D387 A LDA 
04882 FA2S A GCRSAV EQU 3 G4875A FASD 5F 4 CLRE 
88 ES9 9 4 PP 5 58 85 史 Ss 4 記 
04884A FA2A EE 84 A LDU OX LOAD VRAM ADDRESS 3 1 
04885A FA2C 30 06 A LEAX 5.X 0 EE に 3 De 内 
538 FA2E 8D 1C  FA4C の BSR GCRSA1 | BONEAGSLGE ば DSB0 > 0 
048B8A FA30 AE  E4 A LDX 0.S | 94381A FA3B EC 07 A LODD 
0488 ヨ A FA32 EE 84 A LDU 0。X LOAD VRAM ADDRESS | 04aS2A FABD C1 08 A CMPE 
04830A FA34 30 8811 A LEAX B+11。X Q4383A FABF 1022 EE47 EQEA LBHI 
048 ヨ 1A FA37・33 CS ヨ 4000 A LEAU  ..VRiU SET RED ADDRESS | 04884A FAA3 5C INCE 
04832A FA3B 8BD OF  FA4C BSR GCRSA1 Oo4 ヨ 85A FAAT A7 08 人 STA 
048 ヨ 3 * 043EBA FAAB 30 OB A LEAX 
04894A FA3D AE E4 A LDX O。S Qu4d87A FAAB CE D3 ヨ 4 A LDU 
QdBS5A FA3F EE BE4 A LDU OnX OB8SA FAAE ED  F2ED  A JSER 
048 ヨ 5A FA41 30 SS 1C A LEAX B+11 ネ 2。X 04380 ま SEARCH THE 
04887A FA44 33 CB Soo0 A LEAU  ..VG,U SET GREEN ADDRESS 04 ヨ ヨ 2A FAAE A LDX 
no4838A FA4S SD 02 Fa4C BSR GCRSA1 FAE1 Aa LDY 
0483 ヨ A FA4A RTSPUL X FAE5 A JSR 
AFA4A 35 30 A PULS  X.PC o FAEB 3 A STX 
0d30Q ネ ロ 43 ヨ EA FABA A STY 
o4301 ネ od ヨコ 7A FABD A LDE 
04302 * 04BBEBA FAEF 8 A LDA 
04303 ネ nt3 コ 3A FAC1 MUL 
04304 ネ Q50QnA FAC2 A STD 
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FETURN THE CONTENS OF SAVE AREA TO VRAM 





JSE PASTP1 SEAECH FIGHT SIDE 











に 1 
A STX PAJOHO+1 SET RIGHT END POS. PZ7a 
* A LDX PAJOHO+5 6 
A JSR PASTP2 SEAECHLEFT SIDE. | フ 
| A CNPX PAJOHO+1 IS THE INIT POS JUST ON BOUNDARY COLOE. レ さ の 
STORE VEA ADDRESS IN UORK AREA n FADS ENE PAooz0 NO. RA 
RTS YES. リ らく 
LOAD UPER BYTE COUNT A PaAnoso STX PAJOHO+5 レル 
A LDA #*FF スズ /、 
A STA PAJOHO IS 
p A LDA  #4 モ 
GCWORK A JSR PASTKI RERUN IS RIGHT SEARCH. 四 
、5++ A COM PAJOHO SET UP-DIEECTION- = 
DU 。 SET TOP ADDRESS OF CURSOR 1 の 
* PAINT 
4Y LOAD UPER BYTE COUNT | 1 
5,Y ADD UPEE BYTE AND DOMN BYTE A PAPAIN EQU 
| A LDE OHO+4 
ま A LOA 
NT WUL 
A STD PAYADD CRRENTY 
OiU 。 ADD 8O TO VRAM ADDRESS A LDX PAJOHO+5 LOAD LEFT X COORDINATE 
A LEAX 1.X 
GCRSAz ^ LDD PAJOHOr1 
| A JSE PASTP3 SEARCHNOT EOUND TO RIGHT 
GCuOE: LOaAD VEAP ADDRESS A ClIPX PAJOHO+1 PASS THE RIGH て END POS. 
2iY LOADLEFT CONDITION EC LEGE PASTRO PASS 
*$FF A LEAU・ -1.X 
GCFSAS ^ STU PAJOHO+5 
、X+ A JSE PALINL PAINT 


ー-1 ュ U SET VFAM CMPX PAJOHO+1 FINISH? 


EGE PAPA5O YES。 





3Y LOAD RIGHT CONDITION 内 STX PASAVE NO. 
まま FF Aa LEAX 1.X 
GCRSA+ A LDD PAJOH0+1 
ュ X キ に JSF PASTPS SEAFCH NDT EOUND TO FIGHT. 
1.U SET VRA A CHPX PAJOHO+1 OVER THE EIGHT END POS* 
* FE1E EGE PAPA4 ヨ YES. 
内 LDD PAJOHO+5 
VACC A PSHS D 








LEAX -1X NO0・ 

STX PAJOH0+5 

CLFA 

JSR PASTKI FERUN IS PAINT 
PULS X 


STX PAJOHO+5 
PAPA4 ヨ LDX PASAVE 
STX PAJOHO+1 
PA5Q EQU # 


X CO-ORDINATE 
Y CO-0FEDINATE 
PAINT COLOR CODE 
NO0. OF COLOE' 


ャ ちゃ ャ アヤ ャ ヤニ エセ 


Pa 
# 
も 
ま 
# 































EOUNDARY COLORS "PASEAF" 
SEAFCH RIGHT END POINT 
PALINI # 
PALINK A PASEAF EQU 
PASAVE、2 SAVE AREA FE a JSR PASEA INITIALIZE 
.*OEG * NEXT Y 
. ま ORG+2 A LDX PAJOHO+1 
PAEEAN,1 BRANCH CONDITION A LEAX  -1.X LEFT DOT 
. ま ORG A STX PASAVE 
. ま ORG+1 A JSR PASTP1 SEAFCH BEOUND TO FIGHT 
PALINT 1 | A CNPX PASAVE IS THE LEFT DOT EOUNDARY COLOR? 
- ま ORG FE43 ENE PASE3Q NO. 
.$OEG+1 A LEAX  -1.X YES. 
PAJOH0,7 CUREENT PAINT DATA A LDD PAJOHO+5 
.$ ま ORG A JSR PASTP4 SEAECH NOT EOUND TO LEFT 
.$DRG+7 A CIPX PAJOHO+5 
PADIRY、2 NEXT Y FEEC LELT PASTkO 
.*$OEG A LEAX 1.X SET RIGHT END POS. 
. ま ORG+2 FES ォ BRA PASE45 
PAYADD,2 A PASE3Q STX PASAVE SAVE IT 
・$*OEG A LDD PACUEY 
. ま ORG+2 A STD PAYADD CURRENTY 
PANXTY,2 A LDX PAJOHO0+1 
・$ORG A LEAX 1.X% 
. ま DRG+S A LDD PASAVE 
PACURY,2 A JSR PASTP3 SEARCH NOT EOUND TO RIGHT. 
・$OEG A CNPX PASAVE CONTINUANS 
.$ORG+2 FEB2 EGE PASE4Q YES。FIND THE RIGHT END POS. 
PAXOFF,1 STX PASAVE 
・30RSH1 FESC  A JSR PALINL NO,PAINT 
PASTKP,2 STACK PTR.。 EE A STX PAJOH0+1 SET RIGHT END POS. 
.*DEG Q4 A LDA # す RERUN IS RIGHT 
. ま ORG+2 FC3 A JSR PASTK1 
PASTAK ,((.PFTEL-PASTAK) /4*3) 89 A LDX PASAVE 
.*DRG 1F A LEAX  -1。X 
・*DEG+(.PFTEL-PASTAR) /4*4 C2 A STX PAJOHO+5 SET LEFT END POS. 
PADMNY | Q50 ヨ 1A FESB 03  BD A COM PAJOHO 
. ま ORG | 05032A FBBA 20 BB  FB22 BRA PASEAR 
・ ま ORG+Q Q50 ヨ 4A FEGi 71 A PALINL STX .LX1 
050 ヨ 5A Co A LDD PAJOH0+3 
50 ヨ EA 73 A STD 中 Y4 
Q50 ヨ 7A 77 A STD ・LY2 
3 50BA FCC2  A JSE PASTP1 
・COMAR+7 nu50dA 1Q A PSHS  X 
Q51noA 1F A LEAX  -1.X 
。GCL 05101A 75 A STX 。LX2 
INITLN Q5102A EF1A A JSR LINES 
#PADMNY Q5103A RTSPUL X 
PASTKP A BQ A PULS XPC 
き 。COMAR | 05105A B3 A PASE4Q LDX PASAVE 
7,X A=PAINT COLOR,B=NUMBER OF BOUND COLORS. Q510EA EE A PASE45 STX PAJOHO0+1 
は IS COLORS GE 8? 95108 ま 
ERRS ヨ YES,。 GO EREOR. Q51o ヨ は 
INELUDE PAINT COLOR 905119 キ “PASEAL“ 
8。X n5111 3 
8X ADDRESS OF ORIGINAL COLORS. 95113 ま SEARCH LEFT END POINT 
#.COMAR+2O EXTEND EOUNDARY COLORS BIT. 95113 キ 
CLEXT EXTEND Q5114 A PASEAL EQU ま 
INITIAL BEOUNDARY POSITION. 951154 FC57 人 JSE PASEA 
.COMAR+3 Q5118A 2 A LDX PAJOHO+5 
.COMAR+5 Q5117A Q1 A LEAX 1.X RIGHT DOT 
GAXCHKR 1 E ヨ A STX PASAVE 
PAJOHO0+5 FCC7 A JSR PASTP< SEARCH EDOUND TO LEFT 
PAJOH0+3 BE ヨ A CHPX PASAVE IS THE RIGHT DOT BOUNDARY COLOE 
PAJOH0+4 LOAD THE Y COORDINATE. GF FBA5 ENE PAS120 NO. 
SQ p1 A LEAX 1.X 
LEFT SIDE ADDR OF CURRENT Y. 1 EE 人 LDD PAJOHO+1 
PAYADD 5 FCCC  A JSE PASTP3 YES 、 SEARCH NOT BEOUND TO RIGHT 
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FM- プ サブ プシ 





と と アバ ュー と くだ と 3 に 

































































































n5125A A CHfPX PAJOHO+1 C5248A FC5 ヨ 3 は 3 41 人 
0512A FEEC BGT PASTKO 05243A FC5B DS  C1 A 
Q51274 A LEAX  -1』X SET EIGHT END POS 525oA FC5D BE BED ^ 
FBEQ BREA PAS145 05251A FC5F 2R 04 FC55 
A PAS12Q STX PASAVE Q5252A FCE1 5A 
A LDD PACURY CUEEENTY 05253A FCE2 3 SE ^ 
A STD PAYADD Q5254A FCE4 
A LDX PAJOHO+5 | A FCG4 31 A 
^ LEAX  -1.X | Q5255A FC55 5C PASE10 
A LDD PASAVE 05256A CE _ 
A JSE PASTP4 SEARCH NOT EOUND TO LEFT 95 FCEF 
A CHPX PASAVE CONTINUANS7 Be れい 
FEDE BLE PAS14n YES。 FIND THE LEFT END POS. FEEC 凡 Ss 
A STX PASAVE 59 A PASE2QO 
Q5140A A STX .LX2 も 
51414 A LDD PAJOH0+3 Cg A 
05142 Aa STD .LY1 CE A 
05143 A STD .LY2 C4 人 
C5144A A JSFR PASTPz 5 ^ 
Q5145A A STX PAJOHO+5 CI A 
0514EA A LEAX 1.X 
G5147A A STX .LX1 CA A 
u514BA A JSE LINES PAINT 
Q514A A LDA EERUN IS LEFT 
Q5150A A JSFE PASTKI SAVE TO STACK 
Q51514 A LDX PASAVE 
Q5152A A LEAX 1.X 
G515: A STX PAJOHO+1 SET RISHT END POINT 
n51544 A CON PAJOHO 
C5155A A JMP PASEAE 
u51574 A PAS14Q LDX PASAVE 
Q5155 A PAS145 STX PAJOHO+5 SET LEFT END POS. 
951 に 1 LDE PADIREY+1 
Q51 A STE PAJOHO+4 
Q51 * | 
G51 + 
Q51F4 キネ END JUDGNENT 
5185 キ | 
C51EEA BE A CNPX PAJOHO+1 
051874 FEF4 FAEQ LEBLT PAPAIN 
nu51 * FCBO APABGET 
C51 * TAKE OUT INFOEMATION FROM STACK CE A 
Q517Q * CC Aa 
C5171 FEEC APASTKOEQU キキ Cs A 
05172A A LDU PASTRP LOAD STACK POINTER GBLKDT 
Q5173A A CHPU  #PADMY D403  A 
Q5174A 1 ENE PASo1o 
n5175A 3 RTS END “PAINT" CONIMAND Ca 8oo0 A 
0517BA FEF5 QF BED A PASO1O CLE PAJOHO BB A 
1 Co LDA ュ U+ 2 : CB 4000 A 
2 BEPL PASQozo Q5237A FC ヨ 4 AE  C4 A 
BD COM PAaJOHO 05238A FCSE 
ED EOEA PAJOHO ] D4oa 。 A 
Q2 PSHS  A BS a 
CF ANDA  #$CF B4 A 
CLEB AF A 
LSRA に BO A 
ROLB | 05303A FCA1 DE BE A PAEG5Q 
LSEA | 05304A FCA3 ES 8O A 
ROLB 05305A FCA5 D7  B5' Aa 
03 A CNPB  #$*03 LEFT X IS -19? 05305A FCA7 DS  B7 A 
Q2 。 FCOE ELO PASQ3n NO. 05307A FCA ヨ EE 8 A 
FF A LDE #$FF YES。 Q53Q8A FCAB DA  E5 A 
2 A PASO3Q STE PAJOHO+5 X2 HIGH 05303A FCAD D7  B5 A 
Co A LDE 。U+ X1 LOM 05310A FCAF DB BB Aa 
EE A STD PAJOHO+1 X1 05311A FCB1 E8 8O A 
G5134A FC14 AS Co A LDA ュ U+ 05312A FCB3 DA  B5 A 
Q51 ヨ 5A FC1B 7 CS A STA PAJOHO+E X2 LOU 05313A FCB5 53 
Q513BA FC18 AE CO A LDA ュ U+ 05314A FCBR DA  B4 A 
Q51 ヨ 7A FC1A 7  C1 A STA PAJOHO+4 Y 05315A ECBS D7 BE4 A 
Q5138A FC1C DF CD A STU PASTKP SAVE STACK POINTER 05318A FCBA 4A 
051 ヨ 3A FC1TE 35 0Q2 A PULS A | 05317A FCEBB 25 E4 FCA1 
5200A FC20 84 3 A ANDA まま SQ | 05318A FCBD DE  B3 A 
Q5201A FC2 LSEA | 05313A FCEF D7 BE4 A 
Q520 LSRA 05320A FCC1 3 ヨ 
LSRA 05322A FCC2 CE 0100 APASTP1 
A LDX  #PATAEL 05323A FCC5 20 12 FCD ヨ 
Q52054 A JMP [A,X] 05324A FCC7 CE  FFOO APASTP2 
Q5205 Q5325A FCCA 20 1E FCEA 
Q5207 A PATAEL EQU キ 05326A FCCC CE 01FF APASTP3 
G52OEA A FDE PAPAIN CHECK EOUNDEY COLOE 95327A FCCF C3 OO008  A 
0520BA A FDE PASEAF SEAEH RIGHT END POINT 05328A FCD2 BD  E3FB A 
Q5210A Aa FDE PASEAL SEARCH LEFT END POINT Op5323A FCD5 C1 50 人 
05211 キ 05330A FCD7 2F 13 FCEC 
05212 キ CE A PASTRM 
* ま "PASTRIT FCEC 
キ 3 A PASTP4 
ネ SAVE INFOENATION IN STACK 05334A 人 
ま | 05335A A 
A PASTKI EQU ネ | 9 人 
A STA PAERAN | FCEC 
A LDU PASTKP LOAD STACK POINTER | A PASTLM 
に 1 CMPU  #PASTAK A PA.SEA 
FC5S EEQ PASTER 人 
* 
A PAST1Q LDA PAJOHO+4 Y FD34 
A STA ューU _ 人 
A LDA PAJOHO+5 FDSE 
Aa STA ューU 人 
A LDA PAJOHO+2 ^ 
A STA ューU A 
A LDA PAJOHO+1 A 
A ORA PAERAN 人 
A LDE PAJOHO0+5 A 
LSRB 人 
ROLA 人 
LSRE 人 
05235A FC4F 4 ヨ ROLA ^ 
05236A FC50 BE  BD A EORA PAJOHO 人 き 
05237A FC52 A7  C2 A STA ューU FD18 
05238A FC54 DF CD A STU PASTKP 
05233A FC55 33 PASTKR RTS 
Q5240 キネ 
Q5241 ^A 1 
05242 * "PASEA" 053B PA・S20 
Q5243 謙 Qu5351A 
05244 * SEARCH CONTINUOUS END POINT 
05zd5 ネ 95 E4 A 
Q5245 FC57 A PASEA EQU キネ B+ 人 
05247A FC57 DE Co A LDU PAJOH0+3 1F FDSF 
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に キネ そ キネ テテ を デキ 


LEAU 
LDE 
LDA 
ENE 
DECE 
LEAU 
SKIP1 
FCE 
INCE 
CHPE 
ELO 
LEAS 
JMP 
LDA 
MUL 
STD 
STD 
STU 
LDA 
LDE 
PUL 
STD 
FRTS 


PAEGET* 


1.U 
PAJOH0+# 
PAJOHO 
PASE1Q 


ー-2U 
21 


#GYD 
PASE2u 
2.S 
PASTKRO 


EQ 


PANXTY 
PAYADD 
PADIRY 
#8Q 
PAJOH0+4 


PACURY 


INPUT AND REFERENCE 
PAYADD,PAXOFF ,。PANECL 
PAECLE ,PASCND 


*GELKDT 


IS USED EY GETELOCK1. 


U REG IS ADDEESS OF VRAM。 AND THAT IS 
NOT DESTFOFYED EY THIS PROGRAN。 


OUTPUT 


PASING SEARCHING COLORS IMG. 
ACCE IS SAME IT. 


WORK 


PATEIMP ,PAVB。PAVR 。PAVG 






















FD5C 


セ 











PA.S25 LDA PAXOFF 
LDE PAFL 
ENI PA.S3 
INCA 
CIPA PALIKMT 
ELT PA.S4Q 
PA.FEIMX LDX #GXD 
FTS 
PA.S3Q DECA 
CMPA PALIINT 
3 EGT PA.S4Q 
PA.LMX LDX #ー1 
RTS 
PA.S40 STA PAXOFF 
JSE PAEGET 
EEG PA.Sz5 
PA.SSQ LDA # 
LDE PAXOFF 
PUL 
TFE D,X 
LDE PASIIG 
LDA PAEL 
EMI PA.S35 
LSLE 
ECS PA.S3n 
LEAX 
EFA 
PA.SS5 LEAX 
LSEE 
ECC 
LEAX 
PA.S ヨ 0 RTS 


PA.FRTS RTS 
内 ・ 
ま INKREY COMIAND 
# 

INKEY EQU H 


# 
* CNHDPEM INCLUDE SONE FLAGS。 
* THE BEITO DIFECT TO MAIT FOE KEY INPUT 


















































































EQU 3 * THE BIT1 DIRECT TO ERASE KEY EUFFER. 
LDU PAYADD * ま THE EBIT2 IS SAME AS THE EIT1. 
LDA PAXOFF * MHEN MAIT IS REQUESTED, KEY IS UNLOCKED. 
LEAU AuU # 
VACON に 1 LDA CHDPRM LOAD THE CONTROL FLAGS. 
BTS、。 1VACE A BITA  **OR ERASE BUFFER 
NOP | FD55 EEQ INKE2 NO. 
LOE ・・VG,U FDSE ESF KEFEEA YES。 EERASE KEY EUFFEF. 
STE PAVG A INKE2 LSE CHDPEIH SET THE MAIT TO C FLAG. 
LODE VERU D7o ESF ド KEYIN GET THE KEY DATA. 
LDA ・VEuU A STD CHDPEN SET THE FETUENS DATA. 
VACOFF RTS FETURN TO MAIN. 
STA VACC | 
STD PAVE | n1 ド KEYGET SEC ENTEY MAIT KEY DATA. 
CLR PASIMG | FD7Q A KEYIN EQU ENTRY GET KEY DATA 
LDA PANBCL Q4  FD75 BCC KEYINO WAIT 
LDX PABCLE | Qo A LDA # ま OO YES, KEY IS UNLOCKED. 
LDE PAVB 02 A STA ド LOC 
EORE  ,X+ 
STE PATEMP ま INPUT 
LDE PAVR # C FLAG : WAIT FOF KEY DATA IF C 1S SET. 
EORE  ,X+ | 
ORE PATEMP * OUTPUT 
お EE | # ACCA  : KEY CODE 
+ ACCE  : ONEANS NO DATA 
EORB  ,X+ CCE 
ORE PATEMP KEYINo SEF # SET KEY IRQ MASI 
CONB ORCC 。#$*40 
ORE PASIIG | LDE KCOUNT 
STBE PASIMG | ENE KEYIN1 SOHE DATA EXIST. 
DECA ECC KEYIN3 RETURN IF NOT WAIT 
BNE PAEG5Q LDE .・AEET AEORTY 
EORE PASCND FD3z BNE KEYIN3 YES. 
人 PASIMG CLF # CLEAR KEY IRQ MASK. 
Aa ANDCC  #$BF 
LDU #1OO TO RIGHT,BOUND 5440A RB | K Q 3 
BR AT Q5440A FD75 ERA KEYINQ WAIT 
0 人 TO LEFT,EOUNOD 05442 A KEYIN1 DEC KCOUNT DECREMENT COUNTER OF KEY BUFFER. 
05443 K ENT BUFFER HEAD. 
PDD 01FF TO:RISHT。NDT BUNO 05443A A LDX KHEAD LOAD THE CURRENT EUFFEE HEAD 
ADDD  #B 05444A A LDA ュ X+ GET KEY DATA AND INCREMENT THE CURRENT HEAD 
JSR LSED3 POINT 
CMPE  #BQ Q5445A FDa5 BSR INCKBX 
BLE PA.SEA 05445A A KEYIN2 STX KHEAD 
LDE #BO Q5447A A LDE #1 
BRA PA.SEA 05448A KEYIN ヨ CLF * ネ CLEAF KEY IRQ MASK 
LDU # ま FFFF TO LEFT。 NOT BOUND 罰 ^ ANDCC  #$EF 
SUED 8 Q5443A FTS 
JSR LSERD3 
CMPE  #-1 054514 INCKEX CHPX 人 BEFEND 
BEGE PA.SEA 05452A BNE INCKE3 
LDE #ー1 05453A LDX KEYBUF 
STU PARL SET SEARCH CONDITION 054544 INCREB ETS 
STE PALINT 05455A KEFERA SEF * SET KEY IRQ NAS 
CMPX  #-1 A A ORCC 。#*4Q 
BLE PA.LMX 054574 A CLR KCOUNT 
CHPX  #GXD 5458A A LDX #KEYEUF 
BGE PA.RMX 3 Aa STX ド HEAD 
TFR X。D A STX KTAIL 
ANDE #$07 CLF * ま CLEAR KEY IRQ MASK. 
PSHS BE A ANDCC  #$EF 
TFR X.D RTS 
JSE LSRD3 KEYIFG EQU * KEY IRQ (FIRG) . 
STE PAXOFF PSHS DXuU SAVE REGISTERS. 
JSR PAEGET LDD KCOD1 LOAD THE KEY DATA 
PULS B BI KEYIR1 THIS IS THE PF. 
LDX り LDA KEFFLG NODN EUFFEI 
LDE BNE KEYIRO NO,EUFFEE. 
LDA ESF ド EFERA YES。 ERASE KEY EUFFEFR. 
BMI BSE KSTEUF SET DATA TO BUFFER 
LSLB 3 EEA KEYIR ヨ B FINISH. 
DECE EEYIE1 PSHS SAVE PF NO. 
SKIP2 Qu54754 A JSE FUNADE 
FCE *BC CMPX # 05475A A PULS RELOAD THE PF NO. 
DECB 054774 A LDa ri LOAD PF STRING LENGTH. 
CO FDE1 BI ド EYI THIS PF IS INTERRUPT。 
FDE3 EEG KEYI NULL STRING. 
ANDE PASIMG Aa PSHS Aa MOVE STEING. 
STE PASIMG A LDA KEFFLG NON EUFFEI 
ENE PA.SBQ FDD5 ENE KEYIR3 NO。 BUFFER 
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キ 


テー ニー・ ハ メー マ 


ッ ンク 
4 
5 
P ペ パ 
モ 
4 











選 
Dr 


リリ よい ま 当り まり 


EEYIR ミ 


ロ 
己 
選 本 


KEYIRI 
EEYIR ヨ 


KSTEUF 





ul 
ャ ャ ーー セア 


FEo 


ゃ ゃ ちゃ や ー 





ら 
コロ 
= 
に 1 
せ 


ロ 7 A ド STEU5 
FEQ1 A_ KSTEU ヨ 


Oo20 A_ ド EIMAX 





Q5515 FEo2 AFUNKEY 


Qu5515Aa 


PSHS X SAVE STEING PTF 





ESE KEFEFRA YES。 EEASE ド KEY EUFFEF EEFORE SET COE 
PULS X RELOAD STEING PTE 
LDE *X+ 

ESR ド KSTEUF 

DEC xS 

ENE KEYIR3 

PULS 4A CLEAN UP THE STACEK. 
SKIP ゥ 

FCE CI 人 PX # 

STE SET PF NO. 

PULS FELOAD REGISTERS. 
RTI 

LDA KLOCK IS REY LOCKED 

ENE KSTEU ヨ 3 YES. 


LDA KCOUNT 
CMPA #KEIAX 


IS THE EUFFER FULL 


EHS ド STBU3 YES. 

INC KCOUNT INCRENENT COUNTER. 

LDU KTAIL LOAD THE CUREENT STORE ADDRESS・. 
STE U+ STORE DATA TO EUFFER. 


CMPU  #KEFEND INCREMENT PTE. 

ENE KSTEU5 (KEY EUFFER IS CIRCLAE.) 
LDU #KEYBEUF 

STU KTAIL 

EQU # 

RTS 

EQU KEFEND-KEYEUF 


ま FUNCTION ド EY COIAND 
ま 








EQU # 

SEF PAS 

OFCC せま せい 

LDEI ・COMAR+3 IS THE KEY NUNEEE .GT. ZERO 
EEQ FUNKEB NO。 GIVE EFFOR. 

CMPE #1 ロ 

EHI FUNKE3 YES,。 IS THE KEY NUMEER .LE. 1Q07 
LDA ・COYAR++ 

CHIPA  #15 


EHI FUNKE ヨ 












02 FESC 
AA は に 1 
21 A SETTM1 
Q5B07A Q4 A 
05EOSA SETT3 
3A FESBE 
Q5E10A A 
| 95811A 内 
| Aa 
全 
4 SETTN5 
A 








# 
キ KREAD 
# 
A REDTIH 
1 
に 1 
1o8E DS に 1 
5 11 人 
E434 全 
キ 
FEE2 A TNCT 
0A4 全 
08 。 FEEE 
せ Q ム 
OE FECS 
EF 人 
QA 全 
TMCT ヨ 3 
# 
| キネ 2uS 


FEEF AA TIMNII 













































Q5SO0A FE7E SE  D383 
05B01A FEB1 108E DOQE 








LDX #CHDPRN 
LDY #。 ま TC 















中 


Q5718a 


ESR FUNADE A 
TER AE FEC5 
1 FEC5 
SL A TIHRTI 
STE ュ X+ + 
LDE #PFS2-1 * ま TINER 
ESE CLRARA H 
TSTA A TIER 
EEQ PFINDC Q5550A 1C A 
LDU  #.COIAR+5 05S51A FECA 27 1E FEE7 
FUNKE5 EQU  # 05653A FECC 2E 18 FEE7 
LDE  ,U+ 05653A FECE 0A 1D A 
STE  ,X%+ | 05854A FEDO 25 15 FEE7 
本 05S55A FED2 AB ヨ F DO5AA 
Q5540A FE2F 2Q 45 FE77 1 PFINDC 9868578 FEDA 63 E Co 1 
98541A FE31 7E 、EOE7 AFUNKES JP ERR5g FEEo 
Q5542 A 
Q5543 FE34 。 ACLRARAEGU * 
n55444 9 3 10 A PSHS X M CURTIN5 
C55454 SQ A CLEAR5 CELR  ,X+ ^A 
Q5545A DECE TMS 
| 05547A FE FE3S ENE CLEAR5 生生 
Q5548A FETSPUL X A 
| R El A PULS  X,PC 05BBBA A 
0554 ョ H 05557A FEF1 C5 A 
| 3 6 
05559A FUNADR LSLE Q5EBBA FEF3 BC A TNozo 
055514 LSLE 05SGaA FEF5 AE A 
055524 LSE 95870A FEF7 A1 A 
3 1 8 
05554A A LDX  #.PFTBL-PFSZ 05672A FEFB 8 0 AR 
Q5555A ABX Q58734 
05558A R RTS 05674A F3 FEF3 
Q5575A 0E A 
* GET STRING OF FUNCTION-KEY COMMAND Qg A 
M は 
・ A GSTRPF EQU  # A8 40 A 
FE4E CE A LDU #.COMAF+3 * LOAD CONNON ADDRESS # 
FE43 ES に 1 LDE U+ TN1nn 
FE4E 27  E4 FE31 EEQ GSTEPg 
FE4D C1 QA A CHPE  #1o 
FE4F FE31 EHI GSTRP 
FE51 FE3D ES FUNADE 
FE53 A LDE  ,X+ 
3A FE55 A ANDE  #*7F 
70a FE57 A LDA  #PFSz 
G5571A FE5S A GSTRP5 STE  ,U+ 
Q5572A FE5E A LOE  , 
5573A FE5D DECA * DECREMENT | 
n55744 FE5 ヨ ENE GSTRP5 を 
Q55754 RTS | Tzao 
G5575 FE31 8a GSTEPEQU FUNEE3 
+ 
+ INTEFEUPT CONTROL FOR PEOGRAMAELE FUNCTION KEY 
キ 
PFINT EQU # 
SEF 
ORCC  *sdo 2 
LDD CNDPRN FLAGS 2 
LDX  #.PFTEL PF TAELE PTE TO X 
PFINT5 LSL  ,X ENAELE EIT TO C-FLAG 
ッ 
R SET TO MSE OF COUNTEF EYTE 
LEAX PFSZuX NEXT PF | 208 
CMPX  #、PFTEL+PFSZ*1 ロ | 。G57o7A 
ELO PFINT5 | Ga57 
PFINDC CLF  +# ENAELE THE KEY INTEREUPT、 82 
ANDCC  #s$BF は 
d JHP INDICT DISPLAY PF STRINGS. 1 
TTL TIMER - 3 回 8 
Q5533 は IMER - TIMER CODE 95712A ム 
05585 キネ SET TINER COMMAND 05713A 人 
BB7 Q5714 人 
05538 FE7C SETTIM EQU  * 0Q5715 JUNB9O 
0558 ヨ A FE7C C3 0A COM  .TMAC NNMIMASK は に 
ロ 0 





に 1 
に 1 
合 
全 
合 


Q5SQ2A FES5 EC 81 


LDD ュ メ キキ 





ココ 


C571 ヨ A 
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LSEA A CLER -PFIRQ 
BCC SETTM1 | a TN31o PSHS Y 
STE Y | A OFE 1S OR TIMER FLAGS. 
LEAY 1.Y | に ] EEQ TMS3o NO SYSEEQ EXIST. 
LDE # A PSHS  a 
LSKA A ORE 8+ 
BCC SETTM5 A STE STATUS SET INTERRUPT FLAGS 
LDU 店 SYSEEQ * ま SYSTEN REQUEST 
STU 作 ) A BEITA ATTENT 
LDU 2。% RTSPUL Y 
STU 3Y A PULS  Y,PC 
LEAX 4。X | * 
LEAY diY A TMDAT FCE 50.SQ,S0。34 
DECE A 
ENE SETTM3 A 
BRA TNCT A 
# 
TIMER COMMAND A THTCT EQaU 
A TMTCI EQU 
EQU  * 05734 A TMTCO EQU 
CON .TMAC | Q5735 A NEMDAT EQU 
LDX きま TC | K ネ 
LDY #CMDPRN+1 * TEST COMMAND 
LDE #1+ ま は | キネ 
JSR MOVE * THIS COMMAND IS AELE TO REFER TO THE 
* SUB-SYSTEI'S AREA IS ADDRESSED BY AESOLUTE 
EQU  * CONMAND TERIMINATION キネ ADDRESSING・ 
CON .TMAC SET & TEST * ま 
BEQ TNCT33 NO NNI * TEST SUE COMMAND 
SEF ネ 
ORCC  #*dO * ま ま ヨ O RETUEN TO SYSTEM 
ESR TINER NMI | * $ ヨ 1 MOVE DATA 
CLF | * $ ヨ 2 BEANCH TO SUB CONMAND 
ANDCC  #$EF | キネ $ ヨ 3 BRANCH TO MACHINE LANGUAGE SUEROUTINE 
CLR .TMAC * 
RTS | * ま OTHER CODE GIVE “1NVALID CONMAND" ERROR. 
ネ 
TINEE FFSF ATEST EQU キ 
FFSF SE  D3BE  A LDX #CMDPRI+8 
EQU  *# Qoo1 A IFEQ 1 
LDA .TMAC 05755 ENDC 
ENE TIMRTI Q5757A FF72 AE 8O A TSTCMD LDA ュ X+ YES。 WHAT IS SUECMD." 
BS TIMER 05758A FF74 BO 380 A SUEA  #$3Q 
CLR .TMAC Q575 ヨ A FF7S 2E  OE  FFSS EMI TSTERRE 
RTI 057SQA FF7B 27  QC  FFSG BEQ TSTRTS RETURN 
05781A FF7A 4 DECA 
PACKAGE 057S2A FF7B 27 18  FF35 BEQ TSTIMOV MOVE 
Q5763A FF7D 4A DECA 
EQU * Q5754A FF7E 27 。 Q7  FF87 BEQ TSTBRA ERANCH 
LDA .CURSR 1S HERE CURSOR DISPLAY STATE 05765A FFSO 4A DECA 
BEQ CURTM ヨ NO. 057SBA FFB1 27 08  FFSE BEQ TSTBSR CALL MACHINE 
BNI CURTN3 05767A FFSS 7E "EOED ATSTERR JMP ERRZO INVALID CONMIMAND 
DEC 、CURTM DECREMENT CURSOR INTERVAL . 0575BA FFSS 33 TSTRTS RTS RETURN TO SYSTEN 
ENE CURTM ヨ NO CHANGE STATE Q57E3 1 
LDA [.CBAD] Q5770A FFB7 AE 84 A TSTBRA LDX ュ X BRANCH ADDRESS LOAD. 
LOE [.CAAD] | Q5771A FFS ヨ 20  E7  FF72 BRA TSTCMD 
COM ・CURST IS THE BEFORE STATE REVERSES | Q5772 # 
BEQ CURTM5 YES。NOM IS THE NORMAL. | 05773A FFSB EE 8 A TSTBSR LDU 4X++ MACHINE ADDRESS LOADED、 
EORE  #AMRV 05774A FFBD 34 10 A PSHS  X SAVE SUBCMD. PTF・. 
JSR CDSPC Q5775A FFSF AD C+ A JSR 。U SUEROUTINE CALL 
LDA  #20 05775A FF ヨ 1 35 1Q A PULS X RESTORE SUECMD. PTR. 
STA 。CURTIM Q5777A FF ヨ 3 : FF72 BRA TSTCMD 
EQU キ # 05778A A TSTMOV LDY 。X++ LOAD SOURCE ADDFESS. 
LDY #Q A LDU ュ X++ LOAD DESTINATION ADDR.. 
LDX #。 生 1+ は A LDD 。X++ LOAD BYTE COUNT. 
LDU  #TMDAT FF72 EEQ TSTCMD NO MOVED DATA. 
LDE  #4 10 A PSHS  X SAVE 
INC 1 o1 A TFR DX 
LDA 役 AQ A TSTMLP LDA ュ Y+ 
CMPA  iU+ Co A STA ュ U+ 
ELO TM1on 1F A LEAX 。 -1X 。 FINISH 
CLR ュ X F8  FFA2 ENE TSTMLP NO。 GO DO MORE. 
DECB 10 A PULS X RESTOFE 
BNE Tozo C4 。 FF72 BRA TSTCMD 
LDA . ま TC aaa1 IFEQ 1 
BITA 。#NEMDAT ENDC 
EEQ TM1QQ ORG $FFFO 
LEAY NMDI,Y 0574 ま 
Q575A FFFO Eooo 。 A FDE RESTAR RESERVED。 
LDA ・* ま TC 05735A FFF2 Eooo。 A FDE RESTAR SMI3 
EITA 。#TMTCT ENAELES | Eoo0 。 A FDE RESTAR SMI2 
EEQ TM2oQ NO. DISAELE | FDAC Aa FDE ド EYIRQ FIRQ 
LDX .*T1 YES. | EoOSE Aa FDE IEQAE IRQ ABEND 
CMPX  .*T1I SANE TINE | Eoo0 。 A FDE RESTAR SuI * 
ENE TMzoo NO. | FEBF  A FDE TIMNYI NMI 20MS TIMER 
LDX 。 ま T1+ る 3 Eoon 。 A FDE RESTAR RESET 
CMPX  .* ま T11+2 05803 * ネ 
BNE TI2oo 。 NO. Q5B04 END 
LEAY TNI、Y YES. SET FLAG | 
LDD ・ ま T2+2 DECREMENT COUNTER 
ADDD #$FFFF 
STD まま T2+2 
BCS  TM2zo 
LDX ・$*T2 
LEAX  -1.X 
STX ・ ま T2 
BRA TM ヨ oo 
ENE TM3oO NOT ZERO 
LDD . ま T2 
ENE TM ヨ oO NOTZERO 
LDD ・$T2D ZERO 
STD ・$T2 RESTORE 
LDD ・$ ま T2D+2 
STD ・ ま T2+2 
LDA ・$*TC 
BITA 。#TMTCI INTERVAL ENAELES 
EEQ TM3oo DISAELE 
LEAY INI。Y YES. SET FLAG 
BITA 。 #TMTCO ONE SHOTS 
BEQ  TM3oo NO. 
EOEA  #TMTCI YES. 
STA ・ ま TC INTERVAL OFF 
EQU  * 
LDA STATUS 
LDE -PFIEQ DID PF PUSHS 
BEQ TN ヨ 1O NO. 
ANDA 。#PFI* ま YES。 CLEAR PF FIELD. 
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か へ ドーC に 4 
ITLE っ | ゆく AS KC- 














A AEORTF EQU 









NaAN FEIOS 
OPT CAT,LLE= 





ま 

PSCT FEASIC PEOGEAN SECTION 
# 

XEEF AETCHE 





XDEF 
+ 


A FEASIC SET u ASSEMELE FEASIC BIOS 


人 ム FN_CPNM SET <55 
キ # 
WI EIOS FOF FEASIC 


キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キ 





キキ キキ キキ キキ キキ キキ 


FUJITSU PEESONAL CONHPUTEE 
EASIC INPUT/OUTPUT SYSTEN 
FOF FEASIC 


DESIGNED EY ド . ド 
CODED EY ト 
DATE AUGUST * 





# 
ま 
キ 
# 
キ 
ま 
# 
ま 
# 
キ 
ま 
# 
キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キネ キキ キキ キキ も キキ 

# 

EOOT SET 0 NO=u EOOTSTEAP LOADEF. 
# 

キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ 

ii STEUCTUEE 


EIOS EQU # EI0S ENTEY POINT 


JSE 。 QuY EACHDEIVER 





レン テオス ネオ テオ スネオ ネス オス う 


や アセ エセ 


* EQ DISRK SIDE 
6 

*B7- 1 

キ 

ネ 

キネ ii ECEUNT 
3 

*B1 - 0 

* B7 - 2 

キ 

キ 

キ RCEMTE 


キ 
キキ キキ キキ キキ キキ 


* ま VECTOE ADDFEESS 
# 


PEESET EQU 
PNMI EQU 
PSMI EQU 
PIRQ EQU 
PFIEQ EQU 
PSMIS EQU 
PSMI3B EQU 
PVCTQ1 EQU 
SINMAX EQU 
DSTDRV EQU 
DOTOF_EQU 
CURTRK EQU 
CFDFEIV EQU 
ま 


ま SHAFRED MEIHOEY E 
* 


SHAEED EQU 
SISTA EQU 
SNCFG EQU 
SMCHD EQU 
SNIDAT EQU 





エセ や セー と ーー アセアセ アア 


p ち ちと ニー セア セー セア 








PEOCESSING 


RTS FEETUEN 





キキ キキ キキ キキ キキ キキ キキ キキ 
キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ 本 キキ キキ キキ キキ 本 キキ 


ii EIOS FEOUTINE CALLING SEQUENCE 


SET FCE_CONTENTS 
LDX #ECE ADDFESS 
JSE _〔EIO0S] 

す .C (CAFEY) CHEC 





# 
# 
# 
# 
# 
ま 
# 






キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ 1 キキ 計 ま 








ちち アテ アー と 


SIfEND EQU 
キ 
FF EQU 
LF EQU 
ESC EQU 
INEEY EQU 
PUT EQU 
GET EQU 
GETC EQU 
GETE1 EQU 












E5 
E4-2 
E1 
EQ 


* *FDO1 
E7 











まま まま) キキ 
# 
* ま ii ECE STEUCTUEE 
# 
キ LAEEL OFFSET CONTENTS 
# 
FQNO EQU り REQUEST CODE 
FRCESTA EQU 1 STATUS 
FCEDEA EQU 2 EUFFEF ADDEESS 
FCECNL EQU る ANALOG POFRT CHANNEL NUMEER。 
NOTORF EQU CASSETTE NOTOF ON,OFF FLAG. 
CREMDAT EQU CASSETTE READ/WRITE DATA. 
# 
FCERNG EQU 3 ANALOG POFT VOLTAGE RANGE 。 
# 
RCECDT EQU 4 HARD COPY COLOR DATA. 
FCELNH EQU 中 NUMEEF OF EYTES 〈(H) 
FCETREK EQU に 2 TEACE NUMEEER 
FCEPAH EQU に 3 PAGE ADDEESS (H) 
FCEAPD EQU に 2 ANALOG PORT INPUT DATA. 
FCEJCD EQU す KANJI JIS CODE. 

EQU 5 NUMEEE OF EYTES (L) 
FCESCT EQU 5 SECTOE NUMEER 
FCEPAL EQU 5 PAGE ADDEESS (L) 
+ の 
FCESID EQU に DISRK SIDE 

EQU PAGE COUNTS (Hi 

EQU に MAX EUFFEFR LENGTH (H) 

EQU DEIVE UNIT 

EQU 7 PAGE COUNTS (L 
く L EQU 7 HAX_EUFFEER LENGTH (L) 
FCEIMTE EQU 7 SUEIN MAX TRANSFEFE BEYTES. 


FCECNL : ANALOG POFT CHANNEL NO ロー ミ 





NOTOFEF : FF=ON,Qn=OFF 


FCEFENG : “HHIGH RANGE “"L" LOM RANGE 
ii FCETE ド STEUCTUFE 


EZ - Q TRAC に IMUIEER ま QO 一 まじ ビ 


EZ - u SECTOF_NUIEEE ま Q1 一 ま 1 全 


:: FCEPAH STEUCTUFE 


E ァ 
ER 


(MSE EUEELE CASSETTE NUMEER 
0 PAGE ADDEESS  〈H) 






# 

# 

# 

# 

# 

2 

# 

# 

ま 

# 

ま 

ま 

ま 。 ii RCESCT STRUCTUFE 
# 

# 

* 

# 

ま 

# 

# 

ま 

ま 

*# 。 ii ECESID STEUCTUEE 
* 














* 
キキ 
ま 
キ 
キネ 
キ E1 
キ ま 
キ 
ま 
キ 














Q SIDE Q 
1 SIDE 1 
DON'T CAEE 


DRIVE UNIT NO. 
DON'T CARE 
SUEIN TEANSFEE _EYTES Q - 128。 


キキ キキ キキ キキ キキ キキ キキ キキ キキ 
EQU DEFINITION 





EE IFEQEEQ (SUB: CANCEL) 
E5-1 NON CONNECTION 
EQ !) FLAG・ 









*FDOB ES< 





*FDQ7 
READ>ーー 








ATUS FEGISTEE 


DSE 

SYNDET 

FFAME EFFOF 
OVER_FUN ERFEOE 









ae 


キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ まま キキ キ 


C INTEFFACE INPUT/OUTPUT 
SEFIAL INPUT/OUTPUT DATA. 


EC INTEEFACE STATUS/COMMAND. 














*FFFE EESET VECTOE PARITY EFEOE 
*$FFFC NMI VECTOE TEANSFER HISSING EFFOFE 
*FFFA SMI VECTOE FECEIVE FEADY 
* ま FFFB IRQ VECTOR TRANSFER DATA BUFFEF EMPTY 
* ま FFFR FIREQ VECTOE 
ま FFF は SUIE VECTOE SMUEITE: -- MODE COMMAND DATA 
ま FFF2 SMI3B VECTOE 
$FFFO NOT IN USE E7 SCS 
* ま FFER SUE MORK.NAX EUFFEF CHECF ド . ES ESD 
ま FFES E5 2 
* ま FFE5 MOTOE FLAG AFEA. を 
$FFE1 CURRENT TRACK ADDFEESS. BE に AHDE TREE 
ま FFEQ REENT DEIVE. 2B1 Bi “ATE・ 
UN WEITE:> -- COMMAND DATA. 
DEFINITION 
B7 EH 
BE IF 
E5 RTS 
BE4 EF 
SERI 
FXE 
BE1 DTE 
Eo TXEN 
FORM FEED 
LINEFEED キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ キキ 
ESCAPE * ま FDOC A/D CONVERTEE 
INREY FEAD 
PUT B7-1 NOT IN USE. 
GET Eo ANALOG SERIAL DATA INPUT. 
GETC 
GET ELOCR 1 MEITE 





CASSETTE,LP OUTPUT/ ド KEY DATA,CLOCE INDICATOFE 
DATA REY DATA 

NOT IN USE 

CLOCK INDICATOF' 





SLCTIN (LP) 

STFE (LP) 

FESEFEVED 

NON CONNECTION 

AUDIO CASSETTE FEIOTE CONTEOL 
NIC (CASSETTE) 


LP DATA OUTPUT,REY DATA INPUT 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 2 
DATA 1 
DATA Q 


よ と の の 








CASSETTE ,LP INPUT/IEQ ENABLE REGISTER 





FEAD_DATA (CASSETTE) 
NOT IN USE 
DETS (LP) 
DET1 (LP) 
PE (LP) 
ACENG (LP) 
ERROE (LP) 
EUSY (LP) 
SYNDET 

FRXED 

TXEDY 

NOT IN USE 
TIIEE 

LP 

KEY 


EELL OUTPUT 

EELL ON/OFF 

EELL (SHOET SOUND) 
NON CONNECTION 
SPEAREF_SMITCH 


ドキ 





SUESYSTEI INPUT 
EUSY 
NOT IN USE 
PARITY EEEOE 
STOP KEY INDICATOR 
ATTENTION 


SUESYSTEI OUTPUT 
HALT / SUE _EUSY 





57 ANALOG CLOC ト 

5R-4 NOT IN USE. 
CHIP SELECT 
FEGISTER _ SELECT 
CHANNEL SELECT 





E1 
: ま FDOD ー $FDOF NOT IN 、US SE 
キキ キキ キキ キキ キキ キキ まま キキ キキ 





芝生 を ・・ そ を ・ を キキ ・ ま を "を を を ・ を そそ キテ テー を キー ネー テー テー キー テー テテ ーー 











きま FD10 EUEELE DATA FEGISTEFE 
$FD1 1 OBBSB CONMMAND REGISTEE 
ま FD12 STATUS FREGISTER 
ま FD13 ERROR STATUS REGISTEF 
ま FD14 PAGE FEGISTEE (H) 
$FD15 PAGE _ REGISTER (L) 
ま FD1E PAGE COUNT REGISTEF'(〈H) 
*$FD17 PAGE COUNT REGISTEF_(L) 
本 
ま FD1E DISE STATUS REGISTEFE' (READ) 
CONMMAND FEGISTEFR (WEITE) 
ま FD13 DISK TEACK REGISTEFE' 
ま FD1A DISK SECTOR_ REGISTER 
ま FD1E DISK DATA REGISTER 
*FD1C DISI、SIDE FEGISTER (E7) 
* ま ま FD1D DISK DFEIVE FREGISTEE 
* E7 MOTOR OFF : 9 
* MOTOF ON : 1 
内 E1-n DFIVE NUMEEE (0 - 3 
+ ま FD1E NOT IN USE 
業 ま FD1F DFQ DATA_ REQUEST (E7) 。IRQ REQUEST (EGRi 


KANJI FOM ADDRESS (H 
(L) 
ド ANJI DATA (し) 








SF PALETTE EE 
も あま まえ えま ええ まき 】 





1 I/0 ADDRESS EQUATION 


合 MTLPOT EQU 和 ま ロ On 
A URITE EQU MTLPOT 
A_ REMOTE EQU まま OOOQ 


A LPDTOT EQU まま On01 





A MTLPIN EQU 生 QO0 
Q033 キ AFEEAD EQU MTLPIN 
00335 A BELL EQU まま OO0S 
2: キネ 
0004 は AA STOPF EQU 
Qoon5 人 SESIN EQU 





Con5 A SESOUT EQU 
く 





キキ キキ キキ キキ キキ キキ キキ キキ キキ 


トキ まま まま まま キキ 
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コウ 食 :【e に 


ピル と 







































































































































Qo341 Qoo A RS232D EQU Eielai:1 no455P no04D P FDBE 
00342 Qoo7 A RS232S EQU *QQ07 Q045SP 004F P FDE 
Qn0343 Q007 A RS232C EQU OOQ7 Qo457P n051 P FDE 
00S44 ト 3 nn45BP 0Q53 Q47B P FDE 
Qu345 QooC A ADCONV EQU ま QO0C nnd45 コ P ロ 47E P FDE 
00346 キネ 94DF  P FDE- 
Q0347 Qn10 A BDATA EQU *Qn1n 053D P FDE 
Q0348 A BCMD EQU *no1 1 05E7 P FDBE 
Q034 ヨ A BSTAT EQU *Q012 | 0s1 ヨ P FDE 
Qoo35Q A BERRST EQU ま O013 | OO0A ヨ P FDE 
no351 A BPGADH EQU * ロ 014 | nd51 P FDE 
Q0353 A BPGADL EQU * ま nn15 | P FDE 
A BPGCTH EQU まま O1F P FDE 
A BPGCTL EQU *0017 P FDE 
円 nodGP P ETEND FDE 
キ oo471 本 
A DSTAT EQU 0047 る * 
A DCMD EQU Q0473 OOGB P ANALGP EQU 
A DTRACK EQU Q0474P OOBE AE 02 A LDA 
A DSECTE EQU on475P OOED 84 03 A ANDA 
A DDATA EQU Q047BP OOSF 34 02 A PSHS 
A DSIDE EQU 00477P 0071 EB  Q3 A LDE 
A DDRIVE EQU | 0047BP 0073 4F CLRA 
A DITREQ EQU INTERRUPT REQUEST . Qo47 ヨ P_QO74 C1 48 A CMPE 
A DDRQ EQU DATA REQUEST . COdBOP 0O07B 2R OZ  QQ7A ENE 
3 Ood81P OO78 SB 04 人 A LDA 
A KANROA EQU KANJI ROM ADDEESS 004B2P 007A AA  E4 A RSSET ORA 
人 ム ド ANEOD EQU KANJI ROM DATA 00483P 007C A7  E4 A STA 
A SKIP1 EQU ERN 1 EYTE SKIP | 00484P 1 QB A ORA 
Oo A SKIP2 EQU BC CMPX # 2 BYTES SKIP. Q0dS5P QC Aa STA 
Q0371 A SKIP2Z EQU *E LDX # 2-EYTE SKIP OOdBEP Q7 A ANDA 
Q A MSKFIQ EQU ま 1A50 。 : OECC #$5Q Ond87P QC A STA 
Q A FDEEAD EQU 10 FLOPPY SECTOR READ. 004BBP 3 02 A PSHS 
Q QB A FDREST EQU 8 FLOPPY RESTOEE,SEEK TRACK 0. OO48P OQSS BE QB A LDA 
QQFF A IFEQ FM_CPN | 00430P OO0SA BF E4 Aa CLR 
ENDC | Qod ヨ 1P on8C BB  E4 A SDREAD ASL 
* | 00432P OOBE CE 8BO A LDE 
Qoon A IFEQ FEASIC 0Qd ヨ 3P 81 A ORE 
TTL BI0S FOR FBASIC OndBdP QC A STE 
Qod35P 4 。 07 A ANDE 
# まる OddBEP OO ヨ E D7  QC A STB 
# Qo4 ヨ 7P OB DE  QC A LDE 
+ ETOS MAIN PROGRAM キキ Qood3BP OO ヨ A C4  Q1 A ANDE 
# Q04 ヨ GBP OO ヨ C EE  E4 A ADDE 
*# FUNCTION Oo5QQP OO ヨ E E7  E4 A STB 
* 1. JUMP TO EACH BIOS ROUTINE Oo5q1P QQAQ 4A DECA 
# ACCORDING TO REQUEST CODE | Oo502P OOQA1 2B  EB  QQ8C BNE 
# 3。 SET STATUS | Qo503P OOA3 35  QGE A PULS 
# 00504P QOA5 A7 ロ 4 A STA 
キ IF EREOR C=1 RCESTA=ERKOR NO. QQ505P QOA7 3F CLRA 
* ELSE  C=Q RCESTA=0 On50EP QAB 33 RTS 
まま INTEFFACE 御料 
* | QQ510 K 1 
* ENTRY - 〈X)=FCE ADDRESS BN 00AS ET 
# EXIT - (UiY,X。DP。D。CC(EF。1 ONLY) ) =EETAINED no512P Q 内 LDY 
H C=QO NON EREOR 1 9 人 dB 
4 ミ = * ド : て nn ] ・ 
* C=1 ERROR DETECTED | 68 ie pg 
O04Q1 # Qn515P GoE1 ENE 
UNUNK INK ま まま CO517P LDE 
1 * | 。QQ518P PSHS 
O0404 N | 00518P LDD 
nnd05 * REVISON (MEMORY STAPP) | ESE 
QO0d4QG キ | BCS 
QodQ7P oonn 5g A FCC /V/ | QoC1 LDU 
QBP Oon1 Q1 A FCE * ロ 1 | OoC3 KANEXD STD 
OOdC ヨ P 0O003 4C A FCC 7L/ | C 0 LDY 
Q041QP QQ03 Q1 A FCB *Q1 00| CMPY 
0 * QQCC EEQ 
Qnd412P Qond A FCE まっ YEAF | QoCE ム STY 
no413P 0Qo5 A FCE ま ロ ヨ IMONTH CaD1 nnn1 A ADDD 
Qnd14P OOQE Q1 A FCB * ロ 1 DAY OoD4 E4 枯 DEC 
00415 * QoDG EB 0Q0C3 ENE 
Q0417 P CEIOS EQU MAIN PROGRAN | ド KANRTS CLEA 
QQ418P QO07 : A PSHS 。 U,Y,X。DP、D、CC REGISTER SAVE | 84 A PULS 
COd1P OO A LDA #$FD | * 
OO420P OOOBE A TFR ADP DIRECT PAGE=*$FD. . | *# "CNVJTE' 
QoonD に 1 LDE RQNO,X | ま CONVERT 
Q0QF CLEA * ま INPUT 
on10 ASLB REQUEST NO.*2 
nn11 ROLA | * ま OUTPUT 
Q01 テ P LDY #EIOSTE Q053 ヨ ネネ 
QO1E P LEAY DiY Qo5Q * OTHER 
0018 A LDA # フ ASSUNE RCE ERROR Qoo54 1 * 
on1A P CMPY 。#ETEND REQUEST NO. CHECK Qo54< + 
Qo1E 2: Oo26 BHI EI0S1 。 REQUEST NO. ERROR Qo543 ま 
に 合 PSHS X nn54 は + 
A JSR Eo,Y] EACH PROCESS Qn545 キ 
A PULS X X,CC COME EACK nn53 + 
8 A BIOS1 PULS CC CC COME BACK、 QQ547 * 
UE1 A STA RCESTA,X ACCA=Q NORMAL。NOT Q : ERROR nn548 * 
QQ2A F ENE B10S2 | Oo5』4 ヨ ま 
CLC CLEAR CARRY | uo55n キ 2 
A FCB SKIP2Z ”LDX #: SKIP NEXT 2 BYTE ao551 * ELSE IF 
BIOS2 SEC SET CARRY Qo553 キ T< 
A BI0S25 PULS 。U,Y,X』DP、D。PC REGISTER COME EACK Co553 キネ 
P EIOSTE EQU ・ uo554 】 
P ANALGP Q ANALOG PORT INPUT . oo555 ネ 
P MOTOE 1 CASSETTE MOTOR CONTEOL . oo55GP noDE BE4 7F A CNVJTK ANDA 
P CTEMET 2 CASSETTE EYTE WRITE. Qoo557P OoDD 81 21 A CMPA 
P CTEEED 3 CASSETTE BYTE READ. un558P uoDF 25 10 ooF1 ELO 
P INTEEL 4 INITIALIZE EUEELE Co55 ヨ P 0 28 A CMPA 
P SCREEN 5 SCREEN COPY TO PRINTER. oo5EoP QB QoED ELO 
P METBEL 5 BUEELE N PAGE URITE Oo561P 81 30 A CMPA 
044 ヨ P Qt1 P REDEEL 7 BUBELE N PAGE READ Q05E2P 25 qB ooF1 BLO 
Qnd5QP COO43 A RESTOR 8 5" SEER TRAC ド 0. Qoo5E3P 81 5o A CMPA 
Qo451P onod5 A DuEITE 3 ヨ 5" 1 SECTOR WRITE. QiQ5B4P 24 。 Q4  QOF1 EHS 
nd Qnd7 A DEEAD 10 5" 1 SECTOR READ. Co5E5P C5 Bo A SCDCR BITB 
QQ4 ヨ P EEEP5Q 11 RESERVED nn5BBP nnEF SB Q3 QQF+ ENE 
QOdE'" P EEEPON 12 EELL ON Qn5s7P QoF1 1A  Q1 NOROM SEC 
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EEEPOF 13 BELL OFF || oosssp ooFs ss FTS | 
LPOUT 14 PEINTEE' OUTPUT # 
HDCOPY 15 CET HAFD COPY 0s Aa ONEOM PSHS D SAVE THE JIS. 
SUEOUT 1 SUESYSTEM OUTPUT QF A ANDA #$QF PICK UP JIS1 
SUEIN SUESYSTEM INPUT 1F Aa ANDE #$1F PICKUP JIS 3: 
INPUT CONSOLE INPUT nn573P LSLE SET IT TO A( 
INPUTC CONSOLE INPUT CONTINUE no574P 1 LSLE AND OTHEF FELEDS IS SET 0. 
0UTPUT CONSOLE OUTPUT LSLE | 
REYIN KEY INPUT LSLE | 
ド ANJIER FANJI FEOM DATA READ. FOLA | 
LPCHK 3 LP READY CHECI PSHS SAVE THE ADDEESS. 
BEIINIT EI0S INITIAL SET LDA PICKUP JIS(14:13) 
EEEP5Q RESEEVED ANDA AND SUETRUCT = FEOM IT. 
EEEP5Q FESERVED SUEA  。#2 ま 15 
EEEP50 27 RESERVED PSHS  A MULTIPLY IT BY 3. 
は ま よ キル ホネ ネネ ネネ キキ もそ ネネ キキ ネネ ネネ ネネ ネコ LSLA | 
ADDA  ,S | 
3 ANALOG PORT INPUT EROUTINE . LSLA SET IT TO THE HIGHEST | 
FCECNL,X GET CHANNEL NUMBEER.- STA = EITS AND SAVE・. 
まい 3 EXTEACT C1.CQ LDA PICKUP JIS(E:5) AND 
A ANDA SUETRUCT 1. 
RCERNG,X GET VOLTAGE RANGE . SUEA 
ADDA MAKE THE T. 
#! 日 HIGH VOLTAGE RANGE? ECS と 
FSSET NO CMPA 2 1S THE T LT、 タ タ ? 
きま ロ は ES=1 SET | ELO CNVJLO YES. | 
。S | EHI CNVJHI NO、IT 1S .GT. ミ 
S Aa LDA N0,IT IS 2. SET A(12) BIT 
中 OB A FCE SKIP NEXT =-EYTES (CMPX お 
ADCONV A CNVJHI SUEA SUETRUCT 1 FEOM THE T. 
# 呈 07 A CNVJLO OFA SET THE T TO A(15:13) 、 
ADCONV A LDE LOAD THE ADDEESS TO D-REG. 
A A LEAS 5,S 
# COUNTER= ヨ SET. | CLC 
・S WORK AREA=Q CLEAR FTS _- 
3S RESULT SHIFT LEFT 1 BIT. A MOTFON EQU ます 2 
# 和 En A NOTEOF EQU まま 0 | 
1.S * FE 光 洒 洒 ポキ ポキ キキ キキ ドキ KR 
ADCONV + 
# ロ 7 IOTOF EQU CASSETTE MOTOF_ CONTFOL. 
ADCONV | Al LDA MOTOEF ,X GET MOTOF FLAG. 
ADCONV READ SERIAL DATA(LSE) CI LDE #HOTEON ASSUME MOTOE ON. 
# ま 1 EXTRACT SERIAL 1 EIT DATA. ha] 4 COMA MOTOE ON 
Q。S THIS TIME DATA ADD. Q EEQ MOTECN YES、MOTOR ON. 
4S RESULT STOFE・. 0134 CE 40 A LDE #OTEOF NO,MOTOR OFF・. 
COUNT DOMN・. ロ D7  Qo A NOTFCN STE FEMOTE MOTOE CONTFOL SET. | 
SDFEAD 回 4F CLFA NOFNAL RETURN. 
D GET RESULT ONE EYTE. Q 33 FTS 
RCEAPD,X RESULT STORE + 
NOEMAL RETUEN キキ キキ キキ キキ キキ キネ キキ キキ キキ キキ キネ キキ キキ | 
キ | 
を 洒 洗 ま キ 洒 涼 ま ネ キキ トキ キネ ネネ ポルト ネネ ホネ ャ 1 913A P CTEMET EQU + | 
5 。 QQ A LDA MTLPOT 
キ EANJI FOM FEEAD REOUTINE QOS23P 013C 44 LSFRA 四 2 MHZ 
FCEDEA」X GET EUFFER ADDEESS OO0B24P 013D 1025 Q10D 024E LECS ZzMHZU YES 2 MHZ 
# ロ OoB25P 0141 AS A LDA CEMDAT。X GET MEITE DATA. | 
#15 SET COUNTEE Q1AS BS Da0UT | 
Q。U++ A LDX # TIMER SET. 
32 BYTE Q CLEAR Q1E2 ESE TIMEFE 
EFCLF p1AD ESF D10UT 
#1R A LDX #1 昌 TIMEF SET. 
B LOOP COUNTEFE SET. ESER TIIER 
FCEJCD,X GET THE KANJI JIS CODE. ESR Do0UT 
CNVJTK CONVEFRT JIS CODE TO ROM ADDEESS LDX 18 TIHER SET。 
KANETS NOT ON THE FOM. 人 ESR TIMER 
RCEDEA、X GET KANJI EUFFEE ADDEESS. Oo00 LDY SG COUNTER CLEAE・ 
ド KANEOA ADDRESS SET TO FOI1 ADDRESS FEGISTEF.. 4F 01AD M4O ESE D10UT 
EANEOD GET EANJI DATA LSFA 1S MEITING DATA OOF 1? 
#1 NULL DATA ? QOE  Q1EF ECS MEITE1 IF IT IS 1。GO TO MEITE1。 
EANETS NON DATA. nn1 1 A_ MEITEQ LDX #17 TIMER SET. 
ロ 。U++ 4C ESE TIMER 
#1 ADDEESS COUNT UP 40 M5n BS DGOUT 
S DECFEMENT COUNTEFE EY 1. 9o11 人 A LDX #17 TIMER SET・ 
EANEXD 45 0Q1E2 ES TINER 
NORIAL RETUFN OE ERA NEXT 
B,PC MEITE1 LDX #36 TINEF SET. 
BSF TIMER 
WEn BSF DoOUT 
THE JIS- ド RANJI CODE TO THE ROM ADDRESS. LDX #35 TINEE SET. 
ー- ド RANJI CODE. ESR TIMER 
| EFA NEXT | 
ー-KO ADDRESS . NEXT LEAY 1.Y EIT COUNTS. | 
CMPY 1 EYTE END | 
GISTER ARE FESEFVED. ENE U40 IF NOT,GOTO NEXT BIT. 
LDY # COUNTER CLEAE. 
M7Q ESF D10UT 
LDX #3 は TINEF_ SET. 
BESF TIMEF | 
| 16 no 1 ESF Do0UT 
oo1o A LDX #15 TINER SET. 
JIS (4:O)i 1E  Q1B2 ESF TIMEFE' | 
21 A LEAY 1.Y COUNTER INC. 
00 テ A CMPY  #2 IS 2 STOP EITS WRITTEN ? 
2 Q7 0O1AE BEQ EYTEND IF YES,GO TO 1 EYTE END. 
T=2 THEN DOi Qn15 A LDX #22 TIMEE SET. | 
QE no ESF TIIER 
E3 EEA M7n GO TO 2ND STOP EIT. 
EYTEND CLRA 
ETS NOFIAL EETURN 
# ま 7F IS THE CODE ON THE EANJI RON ? # 
# ま 21 2 A DoOUT LDE 9 OUTPUT LOM-LEVEL . 
NOEOM NO. nn が STE MEITE DATA OUT. 
# ま 2 RTS 
SCDCK * 
きま 3 ロ 43 A D10UT LDE # ま 3 OUTPUT HIGH-LEVEL . 
NOEOM NO. On A STE MEITE DATA OUT. 
# ま 5Q ETS 
NOROM NO. | ま 
まま 5O 1F A TIMER LEAX  -1。X 
ONEOM YES. 00E7 ヨ P Q Onon A CMPX  #o 
QOSSOP 0 F ヨ 0Q1E2 ENE TIMER 
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LE OzEF SE 
PSHS X RCB ADDR SAVE. に ES 
LSRA っ MHZ ? dF SE 
LECS YES = MHz の 
sTN ロ INTER 。 QOE Qu27C ECS 
CEINo LDY COUNTER CLEAR | RTGERDS 
aoFF  A IFEQ ASSEMELE MHEN FM_CPI=0. _ BSR 
ENDC zzM5n 
H 
A IFEQ FEASIC ASSEMELE HEN FEASIC=Q. 
AR10 TST AEOFTF STOPKEYON? 
1925 ooon LENE AETCHK 
ENDC 
] 
ESF DIN | 
ENE KR1Q IF NOTREAD AGAIN. 
705P ESE  ” EDGE EDGE CATCH. 
| no7QgP LDX  #3n TIMER SET. い 
Q0707 ESE TIMER L 
Q07Q8P ESR DIN 
Go7oP Q ENE KR1Q IF IT IS NOT CAUGHT,START EIT AGAIN. 
00710P Q1DD 4F CLFA 
Q0711P Q1DE R40 ESE EDGE EDGE CATCH. | 
| no712P Q1EQ LDX  #27 TINER SET. | 
00713P 01E3 ESE TIMER 
Q1E5 R5Q ESE DIN 5 
1E7 LSLE EER 
Q1ES ROFA SET DATA IN A-FEG. CHEy 
o1E ヨ 3 LEAY 1.Y COUNTER INC. 1 
no718P Q1EE 108C Oo CHPY ARE DATA 8 BIT? 2 
0Q71 ヨ P 01EF 27  QF 92oo EEQ STOP IF OK,GO TO STOP EIT CATCH. 
キ 
OoFF Au。 !FEO FNLCPWM ASEYBLE VHEN FN-CPMeO. 2BVTENO GDB 
RTS 
| oooo 。 Aa IFEQ FEASIC ASSEMELE HEN FEASIC=Q。 A 20o0UT LpE 
| o1F1 7D 0313 ARBQO TST AEORTF STOPKEYON? AA 8TB 
01F4 1025 FEOS QOOQ LENE AETCHK IS 
ENDC H 
キ | 3 
o1F8 D6 0z A LODE READ DATA IN. Ps Ce GE 
Q1FA C4 8BQ A ANDE  #$BO 4 
on733P 01FC 28  F3  Q1F1 ENE RB5o IF NOT,READ AGAIN。 し RIS 
co734P_o1FE 20 DE Co1DE ERA  R4Q G0 TO NEXT BIT READ. NR CTMERDDE2 
ozao 1ogE oooo 。 ASTOP LDY  #o COUNTER CLEAR. Bs NE 
RTS 
oz2C7  P zzMHZR EQU 
| ooo0 AZCEINQO LDY 
| 」 回 ooFF  A IFEQ 
| QOFF pc TFPEO  FHLCPM ASSEWELE VHEN FN-CPNcO。 0885 EN 
* Q0858 6 * 
ooon 。 A IFEQ FEASIC ASSEMELE UHEN FEASIC=0. 00BBS 9900 全 。  。 JEEO 
Qo743P Q204 7D 0313 ARZO TST AEORTF STOPKEYON? | OO860P 02CB ZR190 TST 
no744P 0207 102R FDF5 Qoo LENE AETCHK O08G1P 02CE LENE 
0 ENG 00852 ENDC 
Q0745 E oz0 ESR 
nn748P Q20E DE A LDB READ DATA LIN. o2D4 ENE 
0743P C4 Aa ANDE 。#$SO 02DG < ZR2O ESE 
GG750P Oz ENE KR7o IF NOT,READ ABAIN。 02D8 8 LDX 
no751P 023G RBO BSR EDGE EDGE CATCH. 02DE : ESR 
QQ752P LDX に C! Oz2DD ESR 
an753P ESE TIMER ENE 
Q0754P BSR DIN | CLREA 
Qo755P EEQ CEINo | ZF40 ESR 
0075GEP LEAY 1 COUNTER INC. LDX 
Q0757P CMPY  #2 ARE 2 STOP EIT CAUGHT ? 。 BSR 
ao758P ENE KR7Q G0 TO 2ND STOP BIT. | zR5C ESR 
還る | 
| 1o A PULS x RCE COME BACK. | LSLE 
2 A STA CRMDAT,X REORA 
CLFA NOMAL READ. | LEAY 
RTS 1 EYTE DATA HAVE BEEN CAUGHT. | CMPY 
ADIN LOE READ DATAIN. IFEQ 
ANDE  #*SO 
Q07B8P O RTS NE 
00757 H IFEGQ 
A ERROR PULS X 3 TST 
合 CLER CEMDAT。X QQnn LENE 
^ LDA #52 AENORMAL READ ENDC 
9o771P RTS A LDE 
QC77 キ | 1 
Q0773 キ 2 8 
ao775 ooFF Aa IFEO FM_CPIN ASSEMELE MHEN FH_CPM=0. EFA 
GQ775 ENDC 
QQ777 ま LDY 
IFEQO FEASIC ASSEMELE UHEN FEASIC=Q. IFEG 
EDGE TST AaEOETF STOPKEYON? 
LENE AETCHK 
ENDC 
LDE FREAD DATA IN. 
ANDB  #s*Bo 
CMPE RAISING EDGE OK * 
ENE TF NOT,READ AGAIN。 
LDE DATA IN. 
ANDE 
| CMPE FAISING EDGE OK ? 
| ENE IF NOT,READ AGAIN。 
RTS RB0 
zzrHZM EQU ま 
LDA CRMDATX GET MEITE DATA 
LDX 。 *E+5 TINER SET 
ESE zTINER | 
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zD10UT A STA CRMDAT 、X 
#1E+14 TINER SET CLFA NOFNAL READ 
ZTIMEE FTS 1 EYTE DATA HAVE EEEN COUGHT 
< キ 
TIMEF SET A ZDIN LUDE READ DATA IN 
Aa ANDE #*BQ 
COUNTEF CLEAR FTS 
キ ま 
5 IS WRITING DATA Q ム ZEREOE PULS  X 
zzuET1 A CLE CRMDAT,X 
#17+13 TIMER SET A LDA #5 っ AENORMAL READ 
ZTIMER RTS 
ZDQOUT Aa IFEQ FM_CPM ASSEMELE WHEN FM_CPM=Q 
#17+14 TIMER SET ENDC 
ZTIMER 
2 A FEASIC ASSEMBLE WHEN FBASIC=Q 
E+2R TIMEE・SET ム ZEDGE AEORTF STOP EEY ON? 
ZTINER Qooo AETCHI 
2DQOUT 
#35+2R TIMER SET Aa DATA IN 
ZTIMER A 
ZNEXT A RAISING EDGE OK ? 
1Y EIT COUNTS 033A IF NOT,FEEAD AGAIN 
品 1 BEYTE END 『 A DATA IN 
IF NOT,GOTO NEXT EIT A FEAISING EDGE OF 
COUNTER CLEAR ム 
033A IF NOT,READ AGAIN 
TIMEE SET 
は えま も 3 よう も 3 る 3 も 333 も 1342 も 13 も る よせ 3 せ せ 3%312 せ 33131313 
キ 
TIMER SET on5Q 0352 P INTEEL EQU キネ BUEELE INITIALIZE 
2TINER Qoo ヨ 51P 0352 1A50 A FDE MSKFIQ 
1 COUNTER INC. 2P 0354 8D 3C 03 ヨ 2 ESER EUERDY 
せら IS 2 STOP BITS MEITTEN 3P 0356 BE 04 Aa LDA 0 は INITIALIZE BUEELE COMMAND SET 
ZEYTEN IF YES,GOTO 1 BYTE END noa54P 0358 7 11 A INTE05 STA ECMD 
#22+15 TIMER SET on ヨ 55P 035A ヨ 6 12 A INTB1Q LDA BSTAT CNE? 
ZTIMER od5GP 035C 32A FC QOS35A BPL INTE10 NOLOOP 
Z2M70 GOTO 2ND STOP EIT 1 A LDA ESTAT CHE? 
FE  Q35A EPL INTE10 NO,LOOP 
NORMAL RETURN 02 A BITA  # 叶 02 
Q2 OS3G8 ENE BEFRROFE EREOR ANALYSYS 
0 OUTPUT LOM LEVEL CLFA 
MEITE DATA OUT 5 RTS 
P BEEREOR EQU EFROR ANALYSYS 
ます 3 OUTPUT HIGH-LEVEL 13 に 1 LDE LOAD ERROR STATUS REGISTER。 
URITE DATA OUT 04 し 1 BEITA WRITE PROTECT ? 
21 38F BNE YES WRITE PROTECT. 
1 A BITA DEVICE NOT READY ? 
-1.X 19 9038B BNE YES BUEELE NOT READY. 
#Q 1E A LDA 3Q 
ZTINER LSRB UNDEFINED ? 
1A ECS BERFE5Q 
キ INCA 31 
#O COUNTER CLEAR B LSRE NO MARRER 
FM_CPM ASSEMBLE MHEN FM_CPN=O 15  Q331 BCS BERR5O 
LSRE MANY BAD LOOP ? 
FBASIC ASSEMELE UHEN FEASIC=Q 12 拉 EEFR5o 
W っ 33 
ME SOP2NBCON LSRE TRANSFER NISSING ? 
OE BCS BERR5Q 
2DTN LSRB CRC ERROR ? 
ZR10 IF NOT,READ AGAIN に 3 eo 8 
ZEDGE EDGE CATCH 0A 0QSa1 じゃ BERE50 
ESEN LSEE PAGE ADDRESS EREOR ? 
2DIN OB 03 ヨ 1 BCS EERR5o 
ZR10 IF IT IS NOT CAUGHT,START EIT AGAIN ンー EUBBLE DEVICE NOT READY・ 
キ 
1 生 24 A METPER LODA 。 #3R WRITE PROTECT ERROR 
に 4 EERR5Q RTS 
ZTIMER 
っ # 
ZDIN 
03 ヨ 2 P EUERDY EQU * 
SET DATA IN A-REG キ BUEELE REGISTEF CHECK 
1Y COUNTER INC 55 が LDA #$55 *55 PATARN WRITE. 
# ARE DATA SB BIT 『 10 1 STA EDATA 
ZSTOP IF OR,GOTO STOP EIT CATCH 10 A CMPA  BDATA EQUAL ? 
FM_CPI1 ASSEMBLE WHEN FM_CPM=Q 15 QSAF ENE EUEERR BUEELE INVALID. 
COPA *AA PATARN URITE. 
10 A STA EDATA 
FEASIC ASSEMELE WHEN FEASIC=n 10 ^ CHPA  BDATA EQUAL ? 
AEORTF STOP REY ON QE  Q3AF BNE EUEERK  EUEELE INVALID. 
AETCHKR キ ま BUEELE REGISTEF IS VALID. 
Q1nn5P 03A1 108E FFFF A LDY #$FFFF 
3 DATA IN Q1QOEP 03A5 31 3F A BUELOP LEAY  -1.Y 
kB 01007P 03A7 27 OB QOS3AF BEQ BUBERR 
ZFBQ IF NOT,READ AGAIN Q1008P 03A ヨ BE 12 A LDA BSTAT 
ZR4Q GOTO NEXT EIT READ 0100 ヨ P 03AB 44 LSRA 
Oo1010P 03AC 25 F7 QOS3A5 BCS BUBLOP 
#Q COUNTER CLEAR 01011P 03AE 33 RTS 
FM_CPNt ASSEMELE WHEN FM_CPM=Q Q1012 
01013P 03AF 32 62 LEAS 2。S STACK ADJUSTMENT. 
・03B1 20  D8 ERA NONEUE 
FEASIC ASSENELE WHEN FEASIC=Q Oon7 7 
AEORTF STOP KEY ON ? 5 よそ コネ キャ エキ ャ キャ 3 は 3 
AETCHK 
03B3 P REDEEL EQU 
READ DATA IN A METEEL FDE NHSEFIQ IFQ MASK SET. 
32 ESE HUEEDY 
IF NOT,READ AGAIN A LDD FCEPCH,X 
EDGE CATCH A STD BEPGCTH 
A LDD FCEPAH,X 
03EE BSF REALAD FREAL ADDRESS SET. ADDEESS CHECK.。 
A STD EPGADH 
A LDY FRCEDBA,X BUFFEF ADDEESS 
COUNTEFE INC A LDA RQN0,X 
AEE 2 STOP EIT CAUGHT ? A CMPA  #REDE REDEEL 
GOTO 2-ND STOP BIT 0413 EEQ REDEEX EEANCH BUBELE FREAD.。 
RCE COME BACE A LDA # ま 0 っ COMMAND SET 
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合 STA 01143P AA LPCHHQ LDA 
A_ METE1Q LDA Qu115aP 1 EITE 
Q3DC EII COMHAND END Q1151P 047A ENE 
全 EITA 01152P A LDA 
Q3CE EEQ TDRA Qu1153P LPCH5Q RTS 
人 LDA Q1155 キキ キキ キキ キキ ま まま: 
合 STA 91 15E # 
Q3CE ERA BRTB10 ロ 47E P SUEOUT EQU 
C47E P SUEIN EQU 
| に 1 LDA ESTAT Ga1 1 LDA 
03CE EPL METE1Q NE A TST 
BITA 2 ERROR ? 5D ndDE ENE 
Q1044P ENE | LDE 
Qu1n45P CLERA | EEGQ 
Q1Q04BP RTS CHPE 
01047 玉 EHI 
P_REALAD EQU キ ADDRESS ,COUNTS CHECK. | PSHS 
キキ UNIT OFFSET ADD, LDY 
Q105oP 全 PSHS D D-SAVE LDX 
nu1n51P' 全 ANDA 7F B15 -: Qn DiCASSETE ADDEESS. JSFE: 
Qn1052P A CNPD 。#$3FF ADDE <= ま 3FF LDA 
nu1Q53P Cu4OE EHI ADRERER NO,PAGE ADDRESS ERROR. ANDA 
Q1054 * STA 
Q1055P A LDU RCBPCH,X 3 LDA 
Q105GP A CPU #$ ま 4OO COUNTS <= * ま 4OO | 01174P 7F ANDA 
01057P CE EHI ADRERR NO,PAGE COUNTS ERROFE. 01175P OFA 
Q1058 キ ま STA 
01Q5dP 03 3 40 人 A PSHS U SUEEO  LDA 
Q1QEuP OSFA E3  E1 A ADDD  ,S++ ++i STACK ADJUST。 7 SUE25 STA 
Q10B1P Q3FC 1083 Q4QO 1 ChMPD た 六 151 ADDR+COUNTS K ま 400 7 Q4AR 5A DECE 
ロ 1Q Mm 6 QC DO4QE EHI ADRERE NO,PAGE ADDEESS ERROR・. 043A7 SR F ヨ ndA2 ENE 
01n CB 1 PULS D D-COME EACK・. Cd4A ヨ ED 3 JSEi 
Q10B4P 9d04 B5 Bo A BITA  #$BO UNITO G4AC 3 PULS 
Qu1nB5P 04QE : 05 Q40D BEQ RADRTS YESrUNIT 0. Q4AE 4F CLRA 
Q10BBP Q4OB 7F 人 A ANDA # ま 7F ACCAI MSE=Q Q4AF EE に LDE 
u1nB7P Q4Q0A C: 040Q 1 ADDD あす OO NO,UNIT1 。 ADD UNITQO OFFSET。 ndE 1 11 CHPE 
Q10BBP Q4QD 3 RADRTS RTS | ロ 4 23 QdD| ENE 
01Q0BS ヨ キネ | 
| dE 071 1 
| 01070P Q4QE SG A ADRERR LDA #35 PAGE ADDEESS ERROE. ME 5 SR 
| Q1071P 0410 35 に 1 PULS U。Y UiDUMMY FOR STACK ADJUST。 ロ 4EBE 1E Q4D8 ENE 
01072 * ま YiFOE ESR REALAD | gn1 G4BD 内 CLE 
Q1073P Q412 3 紀 RTS | ロ 1 Q4EF A LDE 
Q1Q75 キキ キネ まま キキ キキ まま まま | Q G4C1 合 STE 
Q1Q76 キ ndCS 4D7 EEQ 
01Q077 413 P_ REDEEX EQU ま EUBELE READ 1 LDY 
8 【 に 1 LDA せま ロ 1 COHMAND SET 合 LDX 
0 1 STA ECID A SUE4Q  LDA 
12 AREDE1Q LDA ESTAT UM 合 STA 
CA 0425 EMI FEDE2Q CONMMAND END DECE 
20 1 EITA # C5 04D7 EEQ 
8 417 EEGQ REDE1O ERDA FDQQ 全 CMPX 
19 1 LDA EDATA F4 QO4CE ENE 
人 ムロ 1 STA 0。Y+ SUE5Q 。 CLFA 
ERA FEDE1Q Q74 ヨ P SUESQ  JSE 
ネ ロ 73A P JSR 
REDE2O EQU キキ SUE7O S 
る LDA BESTAT ド ネ ホホ ネネ ホキ ホホ ルネ 
2 EE  Q417 EPL REDE10 | 和 
42 ヨ 20 E5 03EQ ERA URTE3Q | Q4DF P INPUT EQU 
* ま Q4DF EC OB Aa LDD 
キ OodE1 1027 OOE5 05 ヨ A LEEQ 
キキ キネ キキ キキ キキ キキ キネ キキ まま まま まま 本 O4E5 FD  FFEB 人 STD 
| # Q1213P 04ES 3 は 10 A PSHS 
P_ EEEPON EQU # EELL ON 01214P Q4EA ED 0723 P JSR 
全 LDA せま 1 01215P 04ED 108E FCSO し 1 LDY 
A FCE SKIP2 SKIP NEXT =-EYTE(CMPX #$) 0121BP 04F1 SE 4 A INZ10 LDA 
# 01217P 04F3 AZ7 22 1 STA 
P EEEPOF EQU ま EELL OFF 01218P Q4F5 5F CLRE 
合 LDA # ま ロ 1 01213P Q4FG EE 04 1 LDU 
は] STA BELL し OUTPUT 
Q11Q04P EEEP5Q CLEA NON EEEOR 18 no512 EEQ 
Q11Q5P RTS Led A LDX 
011Q7 あま キキ ネネ キキ ネネ ホ ホキ ポキ キキ トド ドド ホキ ド ドキ キキ キキ 2 A INZ2O LEAY 
Q ロ 11Qg 栄 CLRE 
Q11n3 P LPOUT EQU キ * PFEINTEE OUTPUT 1 人 TN2SD 0 
Q1110P 谷 LDY RCEDEA。X DATA BEUFFEER ADDRESS ウン INCE 
ロ 1111P 1 LDU RCELNH,X OUTPUT EYTES NO. 0122EP A LEAU 
Q1112P 044F EEG LPOUT2 IF BEYTES NO.=Q DO NOTHING 0122GP A CMPU 
91113 P LPOUT1 EQU ま | 4 っ: ・ | 
050A 2 EEQ 
o1114P A LDA 0xY+ Q5oC CPY 
Q1115P 隊 JSR LPPUTX n51Q BNE 
91117 1 IFEQ FEASIC ASSEMELE WHEN FEASIC=Q0。 0Q512 STB 
Q1118P Q44O 7D 3 れ 1 TST AEDRTF STOP KEY ON Q515 CLEA 
111P 443 1025 3 Qooo LENE AETCHK Q51E CPU 
ロ 1120 ENDC Q51A BEQ 
nu11 4 は 7 5F 合 LEAU ー1 ュ U ALL END Q51C 合 LDA 
112 C4 は ヨ GoQn 1 CPPU #Q Q51E A INZ45 ORA 
Q1124P 044D 2E EC 04SB BNE LPOUT1 ml 人 INZ5Q 
Q1125P Cd は F 4F LPOUT2 CLEA P 
Qu112EP Q45Q 3 ヨ RTS ml P 
KDE は 3362RSGEMRBE キキ キキ キキ キオ キキ キキ ネネ キキ まま キキ EE 人 思 P 
01243P Oi! 
u451 P PPcHk EQU ま PEINTER OUTPUT M 
Qu451 DE 2 全 LOE MTLPIN ERROR ? 
Q453 C5 1 BITE た IP 
Q455 27 1E C472 EEQ LPCH40 YES EEEOR 
キネ INZBQ 
0457 1 LDU が AEOUT 2.0 SECOUND n5SD 
045A A LPCH1Q LDY #$FuQQ nu1250 E 
Qu45E 1 SF A LPCHEO LEAY -1.Y Q5SF 35 1n AA INPQ 
04BQ 7 Q7 045 ヨ EEQ LPCH3Q Q541 34 10 A INP5Q 
udRS DB 02 1 LDE MTLPIN Q543 AE Q2 合 
114GP CdRH 54 LSEB BUSY | = キキ DATA IN 
Q1141P Q4E5 25 F7 O45E ECS LPCH2Q0 | u1255 3 P INPEu 
Qn1142P 04B7 4F CLRA | u125BP 0545 SO 1 
01143P 04BS 3 ヨ RTS =57P Q54 ヨ 8 ED 0752 EE JSER 
G1143 ネ り SP 054C SB 11 055F ENE 
Q1145P 04E ヨ LPCHSQO LEAU ー1。U ロ ま 
Q114EP CIHPU # ロ 0 054E AG A INP1QQ LDA 
01147P ENE LPCH10 り Qu550 ム 7 に 1 STA 
Qu114SP CLRB ロ Q552 CE 人 A LDU 
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#5Qu PAPER EMPTY Qu555 Q5SQ INP15O BSR SETEAN SHARED EUFFER TRANSFER 
EE 0557 nu55F ENE INP1SO ERROR 
LPCHSO YES PE Qo558 ES FC81 A LDA SHAEED+1 CHECK S* 
#51 NOT READY HARD ERROR | Qu55C 2E 0C Cu5BAa EMI INP2OQ0 NMSE SET CONTINUE 
nu55E 4F CLFA 
[まあ ホホ 半 光 林 洒 ホ 水 ホ 洒 小 ボ メ Q55F ED 074 ヨ INP1EQ JSE REDYRQ 
| JSR HEESET HALT EESET. 
ま SUE'SYSTEM OUTPUT PULS X ACCX COME BACK 
# SUESYSTEN INPUT STU FRCELNH、X EEAD EYTE LENGTH SET 
#1 RCE_EREORE SET RTS RETURN 
FCEILNH,X_RCELNH MUST EE * 
SUEZQ INP2Qo LDA #10n 
RCELNL,。X BYTES NO (1 - 128) STA SHAFED+2 CONT CONMHMAND SET 
SI Q IF _EYTES LENGTH=Q,EREOR JSE HEESET HALT FESET 
# TO0O LONG JSR EYHLMD  EUSY CHECR AND HALT SET 
S り YES RCE EREOE LDY #SHAFED 
X ACCX SAVE RCE ADDR JSF EEADST LOAD STATUS. 
#SHARED_ DESTINATION ENE INP1BQ 
FCEDBA,X SOURCE ERA INP15Q 
BEYHL EUSY CHECRK AND HALT SET # 
1.X SETRAN EQU キ SHAFEED _ MEMORY TO _EUFFEFE 
# ま BO LDE: SHARED+4 READ EYTES LENGTH (N) 
1X EEQ SETESQu 
1Y STATUS READ LDY #SHARED+5 DATA TOP ADDFESS 
# あ 7F STATUS RESEEVE キ 
1。X CONT FLAG SET SETR1Q LDA 04Y+ READ DATA 
1.X LEAU 1。U INCEEHENT U 
0 X+ OUT DATA READ CIPU SINHAX BUFFEFE OVER ERROR ? 
4Y+ DATA STOEE EHI SETR3Q YES 
STA 0。X+ STORE DATA 
SUEQ DECE 
HRESET HALT RESET COMMAND EXEC ENE SETR10 
X ACCX COME EACK (RCE ADDRESS〉 SETE2Q CLRA NOFIYAL 。 
ASSUME _ NORMAL FRETURN. RTS RETURN. 
OX READ_ REQUEST NO. 2 
#17 SUEIIN 豆 SETRSO LDA #7 ヨ EUFFER OVER ERROR 
SUE7Q NO0 (SUEOUT) ETS 
EYHLWD P INPUTC EQU キ INPUT CONTINUE 
FEADST LOAD STATUS. 01 P 全 LDD KCEEIMH,X EUFFEE MAX LENGTH 
SUEIRQ EREOE' P ヨ A EEQ SETE3Q 
FRCBLNH,X INPUT _EYTES HIGH=Q | 【 P 合 STD SINIAX 
RCEMTE,X NUMEER OF TRANSFER _EYTES. 【 Qu5P は JSR EYHL EUSY CHECEK AND HALT SET 
RCBLNL,X INPUT EYTES LOMER SET. P 人 LDY #SHARED 
SUEI5Q TRANSFEE=Q EYTES. だ A ム INZ ヨ QLDA #GETC GETC CONMMAND 
RCEDBA,X INPUT DATA TRANSFER_ DESTINATION P は 1 STA 2 ュ Y 
#SHARED SOURKCE P P JSE HRESET HALT RESET. 
0 X+ FEEAD DATA P JSR BEYHLMD BUSY CHECK,。HALT SET. 
り 。Y キ STORE DATA ON EUFFER 1 ERA INP5O 
# 
SUE5Q キネ ネネ キキ キキ ネネ ネネ キネ キキ ネネ ネネ ネネ キネ ネネ ネネ キキ キキ ネネ キキ キキ ネギ 本村 
#SHARED+ 1 ネ 
SUEQ Q1315 05E7 P OUTPUT EQU * ネ CONSOLE OUTPUT 
NORNMAL Q1317P Q5B7 4F CLRA 
REDYRQ 01318BP Q5ES EE LE 合 LDU RCELNH,X LENGTH 
HRESET | 0131 ヨ P 05EA 1183 Q0QQ し 1 CHPU # り DATA NOTHING 
01320P 05BE 27 58 QB18 EEQ 0UT5O 
キキ キキ ネ キ キキ キキ キキ キキ キキ ネネ キネ キネ キキ ネネ キキ キキ キキ キキ - Q5CO ED 0723 P JSR BEYHL EUSY CHECK AND HALT SET 
05C3 108E FCSO に 1 LDY #SHARED 
キキ CONSOLE LINE INPUT 05C7 SB 0Q3 A OUTZ10 LDA #PUT 
RCEEMH,X INPUT EUFFER LENGTH SET 05C ヨ A7 22 合 STA SMCMD,Y C=3 PUT CONNAND 
SETRSQ Q5CE AE 02 A LDX ECEDEA,X EUFFER ADDRESS 
SINMAX 05CD 31 24 A OUTQ5 LEAY 4Y STRING ADDRESS 
X INDEX SAVE Q5CF 5F CLEB COUNTEE CLEAR (N) 
EYHL BUSY CHECK AND HALT SET 05DO AB 80 A OUT10 LDA 0。X+ 
#SHARED 05D2 47 A0 A OUTZ20 STA 0.Y+ 
#GET GET COMMAND SET 05D4 5C INCE 
SMCMD、Y C=4 GET COMMAND Q5D5 33 5F に 1 LEAU 。 -1。U 
N=Q SET 05D7 CO0Q 人 A CMPU # ロ 
RCELNH,X LENGTH GET Q5DE 2 に 1 Q5E3 EEQ OUT2Q 
DATA IS NOTHING 『 05DD 108C FDQQ 合 CIPY #SHARED+ 128 
INZ4Q Q5E1 26 ED Q5DO ENE OUT10 
RCEDEA,X BUFFER ADDRESS キ 
4Y STRING ADDFEESS Q5ES F7 FCB3 A OUT2O STE SHARED+3 EYTES NUMBER 
COUNTER CLEAR (N) 05ER SB CO 1 LDA # ロ 
0。X+ X POST INCRENENT 95ES 11 人 CMPU  #QO 
Q』Y+ 05EC 27 05FQ EEQ 0UT25 
EYTE COUNT UP SB 人 LDA # ま SQ 
ー1 。U EA A OUTS5 ORA SHARED+ 1 
#Q E7 A OUTZ3o STA SHARED+1 S! SET 
INzdQ 5 BD P JSR HEESET HALT RESET 
#SHARED+ 1<8 ヨ 4F CLEA NON ERROK 
INZ25 1183 合 CMPU せい END 
SHARED+3 の 9 QR18 EEQ OUT5Q0 YES END 
| QBSQQ ED Q71E 記 JSR EYHLMWD  EUSY CHECK AND HALT SET 
QB03 ED 0752 し JSR FEADST LOAD STATUS. 
| u1350P CBOE SE QA QB12 ENE 0UT4Q EREOE 
| 01351P QBQS 1QBE FCSO に 1 LDY SHARED 
SHARED+ 1 | u1352P QBQC SB に 2 に 1 LDA #1GQ 
SHARED+1 S' SET | iP QBQE A7 22 AA OUTZ4Q STA SMCMD,Y C=1Qn SET 
HERESET HALT RESET ,COMMAND OUT | QB10 2O EE Q5CD ERA 0UTo5 
EYHLMD  EUSY CHECK AND HALT SET ま < 
READST | P OUT4Q  JSE FEDYEQ SUE READY FEQUEST . 
INP1SQ ERROR DETECTED P HRESET HALT RESET. 
# ロ END ? * 
INP4Q YES END。GO TO INPUT トキ キネ キキ キキ キキ トキ キネ キネ キ ネネ キ キネ キ ネネ キキ キ 
#SHARED CONTINUE ま 
#1Q0Q C=1QqQ SET P KEYIN EQU キキ 
SHCND 。Y 1 JSR EYHL EUSY CHECR AND HALT RESET 
INZ2O 合 LDY #SHARED 
合 LDA # き INKEY INKEY CONMMAND 
X ACCX CONE EACK 人 EEYZ10 STA SMCID,Y C=41 
X ACCX SAVE に 1 LDA #Q 
RCEDEA,X EUFFER TOP ADDRESS A EEYZzO STA SMDAT,Y WAITLESS 
P JSR HRESET HALT RESET 
キ 14 JSER EYHLMD BEUSY CHECK AND HALT SET 
#SHARED 全 LDU ご 
READST STATUS READ. に 1 STU ECELNH,X LENGTH SET 
INP1ESQ EREOE に 1 LDD SMDAT,Y 
合 LDX RCEDEA,X 
K : RETUEN CODE SET 合 STD OX 
| P JSR FEADST LOAD STATUS. 
READ DATA COUNT=1 INITIAL P JSR FEDYRQ SUE READY REQUEST . 
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P JWP HRESET HALT RESET,DOUELE RETURN. Q14 ヨ 1P 072F CB 905 A LDE 
P HDCOPY EGU * CRT HAED COPY o14 ヨ 2P 0731 5A _ HLTOVR DECE 
P JSE PCRLFX DUMMY OUTPUT 01433P 0732 27 04 0738 EEQ 
A LODE  #1 ELOCK NO=1 INITIAL 0144P 05 人 LDA 
A LDY RCEDEA,X GET BUFFER ADDRESS . Q1485P Fa 073 EPL 
P HDLOOP EQU キネ 0143EP 8 A HLTRTS PULS 
に 1 PSHS 。Y,X EUFFER AND RCE ADDRESS SAVE 01437 キ 
BA STE ELEN0,Y ELOCK NO. SAVE 0143E キ 
全 EITE せい 1 EVEN ? Q14 ヨ 8 073A P HRESET EQU 
半 BEQ YISETE YES EVEN 01500P 073A 34 2 A PSHS 
G INCE Q1501P 073C BE 'QQ Aa LDA 
hl A YISETO LDA #100 YU1=100 Q1502P 073E ヨ 7 05 人 STA 
ロ A STA PUIY+1。Y Q1503P 0740 1C  EF に 1 ANDCC 
Q 3 A CLE PUIY,Y UPPER BYTE =Q | Q1504P Q742 3 0z Aa PULS 
Q A LDA #1 ヨ ヨ YLI=13 ヨ 3 Q1505P 0744 BD 02 0748 HRE1O BSR 
癌 A STA PLIY+1.Y Q15QEP Q746 BD  QQO 0748 BSE 
加 A CLE PLIY,Y UPPER BYTE =o | Q1507P 0748 3 RTS 
軸 D BEA XISET Q1508 キ 
G 0150 ヨ P REDYRQ EQU 
0 3 A YISETE CLR PUIY,Y UPPER BYTE=Q Q ロ 1510P Q74 ヨ 8 FE A LDE 
n 財 CLR PUIY+1。Y YUI=Q 01511P 074C CA A ORE 
Q A CLE PLIY,Y UPPER BYTE=Q Q1512P 074E F7 FCBO A STE 
Q A LDA # 01513P 0751 3 ヨ RTS 
軸 Aa STA PLIY+1.Y YLI=B Q1514 ま 
Q A XISET LDA は 01515 Q752 PREADST EQU 
p MUL 1*4 Q1515P FCSQ A LDA 
Q A SUED  #8 1 ネー Q1517 7F Aa ANDA 
n コ A STD PUIX,Y FTS 
Q A ADDD  #7 PLIX * 
A STD PLIX。Y LFINCH EQU・ 
* ELOCK ADDRESS HAS EEEN COMPUTED ! LDA 
01410 # BS 
Q1411 * DATA INPUT LDA 
Q1412P A LEAU BLACK。Y BLACK,GRAY CONTINUOUS | ESR 
1413P A LDA #200 200 BYTE CLEAR | 。Q1525P LDA 
01414P P JSE CPEUFC Q1526P ESE 
Q1415P A LDA RCECDT,X SONE BLACK COLOR ? 01527P LDE 
Q141EP OE  QEAB EEQ GRAYCK NON BLACK COLOR 015 LDA 
01417 * BLACK INPUT | 015 ESR 
01418P 1Q A PSHS  X RCE ADDRESS SAVE. 15 DECE 
Q1413P AB Ooo0 A LEAX BLACK,Y Q15 ENE 
Q1420P 1 07CA P JSR DINPUT Q15 RTS 
Q1421P Q き 10 A PULS X X:COME BACK.。 Q15 
2P OBAS AE 05 A GRAYCK LDA RCECDT+1X SOME GRAY COLOE Q15 
OBAB 27 07 QBB1 BEQ DOUT NON GRAY COLOR Q15 EQU 
キネ GRAY INPUT n15 07BE 5 LDA 
CSAA 3 AB 0QEd A LEAX GEAY,Y 015: 
QsAE ED  Q7CA P JSR DINPUT | nu15 IFEQ 
3 Q1540 
* DATA OUTPUT TO PRINTER Q1541 
Q1423P QBB1 AE  A ヨ ooC8ADOUT LDA BLKNO,Y Q1542 IFEQ 
Q143Q0P QEB5 B5  Q1 A BITA  #$O1 Q77o 8D BSR 
01431P QBB7 2 03 0GEC BEQ DATA0T Q1544P 0772 7D TST 
01432P OBB ヨ 0758 P JSR LFINCH 0DD.LF PITCH SET,AND BLANK OUT 1545P Q775 27 BEQ 
01433P QEBC A ヨ 0QE4 A DATAOT LEAX BLACK+100。Y ELACK=1X | Q154B 0777 P AETRTN EQU 
01434P QBCQ A ヨ 0QC8 A LEAY GRAY+100.Y GRAY=IY | 01547P Q777 BED  Q710 P JSR 
0Q1435P QBC+ 1E A LDA #ESC BI-PRINT MODE SET Q1548P 077A 7E Qooo Aa JP 
0143BP QECE 07A3 P JSR LPPUT Q1549 ENDC 
01437P 0EC ヨ 4C 人 A LDA # り し n1551 n77D P PCRLFX EQU 
BP QBCE P JSR LPPUT | Q1552P 077D QA A LDa 
0143BP QECE A LDA # 和 0 01553 COFF A IFEQ 
1d40P Q P JSF LPPUT Q1554 ENDC 
Q141P 3 A LDA # ま ロ 1 01555 * 
ロ 143 5 P JSE LPPUT Q1555 IFEQ 
Q1443P QBDB A DATA01 LDA 0-X BLACK DATA EEAD | BSE 
01444P OEDA P JSR LPPUT | TST 
Q1445P QBEDD A LDA 0。X 01553P EEQ 
01445P OEDF ^A OFA 0.-Y 015BOP Q7SE 7 JMP 
01447P QEE1 P JSE LPPUT ELACK,GKAY ENDC 
0144BP OBEE は A LDA 0.X AGAIN SAME DATA 本 
Q144BP QREG P JSR LPPUT | LPPUTT EQU 
1450P QBEB A LDA QiX POINTER INCREMENT (BLACR) | Q PSHS 
Q1451P QBEB A OFA Q。Y POINTER INCREMENT (GEAY) | Q15B5P Q LDE 
01452P QBED P JSE LPPUT * | 015BEP EITE 
Q1453P A CMPX 2。S 100 BYTES END : BEQ 
01454P 2 2 8 BNE DATA01 NO,CONTINUE | が LDX 
Q1455P 8 Aa PULS  Y,X Y,X CONE BACK A LPLOOP PSHS 
0145EP QBFE EE A LDB BLKN0,Y EVEN ELOC ド | Q1570P 次 LDX 
Q1457P QEFA C5 A EITE  #o1 01571P 01B2 P JSE 
Q1458P QBFC 26 Q700 BNE キ す 4 NO0,ODD ロ 1573 10 Aa PULS 
Q145 ヨ P QEFE 8D 076E ESR PCRLF LINEFEED OUTPUT 1F A LEAX 
* 26 07CB BEQ 
* NEXT BLOCK Q1575P C2 A LDE 
Q7on 5C INCB Q1575P LSEE 
Q701 C1  A1 A CMPE  #151 ALL BLOCE END ED 07 ヨ 4 BCS 
0703 102R FF43 QB4A LENE HDLOOP NO,CONTINUE 15 07EE ERA 
S5P Q707 BD  Q7  Q710 ESE LFP1.5 1/ INCH LF PITCH SET. キネ 
Q14GBP Q7OB BE  QC Aa LDA #FF FORNM FEED 07A ヨ P'LPPUT EQU 
14B7P QZQE ED ロ 7AH P JSE LPPUT Q7A ヨ 3 4 1 PSHS 
0Q14BBP Q7QE 4F CLEA | q15 Q7AE DE 02 A LPPUTO LDE 
014B ヨ P 070F 38 DATAQ5 RTS | 01583P Q7AD 54 LSRB 
01470 * nu15 07AE 25  FB 07AB BCS 
01471 0710 P LFP1.8 EQU # ESC+A+ 12 97EO 20 。 OC 0C7BE ERA 
01472P 0710 BE 1B A LDA NESC *1E キ 
01473P Q712 8D 75  Q788 ESE LPPUTT Q7BE2 PLPPUTX EQU 
01474P 714 27 。 F ヨ 07OF BEQ DATAo5 ptE! A PSHS 
Q1475P Q715 BR 41 A LDA きり A A | Q7E4 P LPPUT1 EQU 
01476P 0718 BSD BEF 0783 ESF LPPUTT | に 
0Q1477P 071A BB  QC A LDA 1 っ 12 DOTS PITCH SET. | 人 IFEQ 
01478P Q71C 20 BB 0Q7B ヨ ERA LPPUTT 01 TST 
Q147 ヨ 1 01534P ENE 
014BQ Q71E P EYHLMD EQU # TINE DILAY. n1535 ENDC 
01481P Q71E BE 18 A LDA #24 AEOUT 50 MICEO SEC. 01535 キ 
014B2P 0720 4A DLYLOP DECA 3 CYCLE. Q1538P Q7E ヨ B DE  Q2 A LDE 
Q1483P 0721 26  FD  Q720 ENE DLYLOP 3 CYCLE. 01539P LSEB 
1 は 0723 P BYHL EQU * BUSY CHECK AND HALT SET 01BOOP 07BC 25 F5 07E4 BCS 
01485P 0723 ヨ 5 05 Aa LDA SBSIN EEADY? Q15o1 O7BE PLPPUT2 EQU 
0725 2B FC 0723 BNI EYHL NO CONTINUE 01BQ2P 07BE 37  Q1 A STA 
0727 1A 40 A ORCC  #*dQ FIRQ IS MASKED UNTIL HALT RESET .+・ | | Q1BO3P 07CO CE 0O A LDBE 
07z ヨ BE 8BO A HLSET LDa # ま 0 ロ HALT SET Q1Bo4P 07CE D7 oo A STB 
072E ヨ 7 05 A STA SESOUT IRQFEQ PRESEEVED 0o16Q5P 07C4 CB 4Q A LDE 
014 ヨ 0P Q72D 3 04 A PSHS B O1SOBP 0Q7CB D7 00 A STB 
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# Q1507P 07C8 35 84 A LPRTS PULS BE,PC EE COME EACK. 
n1BOB キネ 
HLTRTS | 1B0 ヨ 07CA P DINPUT EQU ネ 
SESIN Q161QP Q7CA 34 32 Aa PSHS AuYJX 1X=COPY DATA(ELACK OR GRAY) BUFFER 
HLTOVE ADDFESS. 
EPC n1511 キ IY=HAED COPY EUFFER TOP ADDRESS. 
Q1B12 ACCA=COLOR DATA. 
Q1513P 07CC BD P JSR BYHL HALT SET 
ま HALT RESET Q1514P 07CF SE A LDX #SHARED COMPAND SET 
ACCA SAVE 01515P 07D2 SB A DIN10 LDA #GETE1 GET ELOCR 1 
#$ あ 0 IRQREQ PRESERVE Q1B1EP 07D4 A7 A STA SMCHD,X 
SESOUT HALT RESET Q1S17P Q7DS EC に A DINzQo LDD PUIX,Y PUIX STORE 
#$BF FIRQ MASK RESET ロ 07DA ED 93 A STD に 
Aa Q7DC EC  A3 ヨ 0oCE A DINSO LDD PUIY,Y PUIY STORE 
すす TINE DILAY 07EO ED 05 A STD 5:X 
する A ヨ OOCD A DIN40 LDD PLIX。Y PLIX STOEE 
RETURN 07 A STD 7:X 
Q7ES EC 。A ヨ QooCF A DIN5Q LDD PLIY。Y PLIY STORE 
3 Q7EC ED 08 ヨ A STD 3。X 
SHARED SUE READY REQUEST. Q7EE 3 2 Aa PULS 4 COLOR DATA CONE EACK. 
EC] MSE=1 GE A CLE 11.X NUNEEE OF COLOF CLEAR. 
SHARED CLEE COLOE CODE INITIAL=BLACR 
nC A LEAU 132,X COLOR DATA STOEE TOP ADDEESS・. 
* 
1 | LCOLOR LSEA COLOE IS ON ? 
SHARED STATUS READ. | 04 97FC BCC NCOLOE NO OFF,NEXT COLOR 
#$7F STATUS GET. QE Aa 。 INC 11,X NUNEEE OF COLOF COUNT UP 
Co A STE 0」U+ COLOE CODE STOFE・. 
ま + : FOR NEXT STOEE. 
キ LF PITCH SET NCOLOR INCE COLOR CODE UP. 
#ESC QB Aa CNPE  #S ALL BITS CHECKED 
LPPUT LINEFEED PITCH F4 0Q7F5 BNE LCOLOR NOrCHECK,NEXT COLOR. 
1 3 
LPPUT 073A P DINPzO JSR HRESET HALT RESET 
# ESC+A+8 Q71E P JSE EYHLMD IF CONPAND END,HALT SET 
LPPUT BE/72 INCH PITCH | hnF】 人 LEAX 4。X DATA READ TOP ADDRESS. 
#7 7 SPACE 2o A PULS Y ELACE OR GEAY !: X->Y TRANSFER・ 
まま 2 SPACE CODE | A DINP3O LDA Q。X+ DATA READ FROM SHARED. 
LPPUT | Aa STA OiY+ キ STOEE DATA TO ELACK OR GEAY・ 
| Aa CMPX 。#SHARED+104 100 BYTES END ? 
LFIN1Q E ENE DINP3Q 
P JSR FREDYEQ SUE READY REQUEST. 
| P JSR HRESET HALT RESET 
A PULS  Y,PC Y:HARD COPY EUFFEF TOP ADDRESS・. 
CR LF Q165Q * 
#LF | n1651 QE1C P CPEUFC EQU 3 U : ADDRESS,A : LENGTH. 
| CSF Co A CPEUFL CLF 。U+ Q CLEAR 
FH_CPM ASSEMELE WHEN FN_CPNM=Q。 E 48 DECA 
Q1B54P F 2B FE 081C ENE CPEUFL ALL END 
n1E55P 1 3 ヨ RTS RETUEN 
FBASIC ASSEMELE UMHEN FEASIC=0・ hh キミ キト ミコ 1 本 まま キキ 
LPPUTX # 
AEORTF P SCREEN EQU * SCEEEN IMAGE COPY・ 
LFETS RETUEN A TST AEORTF AEORT ? 
3 | F7D7 noon LENE ABETCHE 
LFP1.5 | 02 A LDE NHTLPIN 
AETCHE AEORETED. LSEE BUSY ? 
2 BCS SCREEN YES,BUSY 
キ CR LF A LDY RCEDEA』X GET COPY BUFFER TOP ADDRESS・ 
#LF A LDE RCECDT,X ++ 
FM_-CPM ASSEMELE WHEN FM_CPN=Q A STE SINMAX ++ SAVE DISPLAY COLOR. 
人 A LDE #1 
A STE ELKNO,Y E=1-8 SET 
FEASIC ASSENELE WHEN FEASIC=Q Aa STE BLACK+ ヨ ヨ 。Y A=1-25 SET 
LPPUTX ま 
AEORTF QS4Q P YLOOP EQU キ 
LFRTS RETURN AB 0Q0BS A LDEI BLACK+3 ヨ 。Y GET A 
AETCHE | DECE (@-1) 
QB A LDA # 8(A-1) 
MUL 
ま | * Y CORDINATE SET 
B A ヨ QooCE A STD PUIY,Y PUIY SET. 
MTLPIN 1 Qna07 Aa ADDD  #7 
せま 
LPRTS =1 STD PLIY,Y PLIY SET 
# ま FFFF * ま X CORDINATE SET 
X | XLOOP EQU ネ 
| AEOUT 1 SEC LDA # 
TIMER LDE 1 
X DECE 80 (B-1) 
ー11X MUL 
LPRTS 2Z=1 A ヨ QOC ヨ A STD PUIX,Y 
MTLPIN OO0dF A ADDD  #7 ヨ 
A ヨ QQCD A STD PLIX,Y 
LPLOOP ま ELOCK ADDRESS HAS EEEN COMPUTED 
LPPUT2 | QB P JSK SDINP ELOCK DATA INPUT. 
| OSEF P JSR MODIFY DATA MODIFICATION. 
キ | 0 ヨ 4D P JSE PEOUT PRINTEE OUTPUT. 
E A ヨ 0QCS A LDA BLKNO,Y 
MTLPIN INCA 
15 ヨ EP Ad STA BLKNO,Y 
LPPUTO 015 ヨ 7P 087B 8 Q ヨ A CMPA  #B 
LPPUT2 : D7 9Q853 BNE XLOOP 。X : CONTINUE 
| o1 A LDA #1 X:CONTINUE . 
* LP ONE EYTE OUT. 01700P 087E A7  A ヨ 00C8 A STA ELKND,Y_X:RESET 
] E SAVE Q1701P 5 AB QQB3 A LDA BLACR+ ヨ ヨ Y GET Y CORDINATE 
* 01702P INCA 
Q1703P Ad 00BS A STA BLACR+ ヨ ヨ ,Y 
FEASIC ASSEMELE MHEN FEASIC=Q. Qu1704P OBSE 81 1A に 1 CHPA #25 ALL END 
AEORTF STOP REY ON? Q17Q5P OBBD 2R BE1 QOS4Q ENE YLOOP  Y : CONTINUE 
LPRTS Q170GE ま ALL END 
Q1707P OBBF ED 0710 P JSR LFP1.5 
01708 ま JSE PCRLF 2-LINEFEED ++ ・ 
MTLPIN Q170 ヨ キ JSR PCRLF ++ 
BUSY ? ロ 1710P 08 ヨ 2 4F CLRA NORMAL RETURN 
LPPUT1 Q1711P 0833 38 RTS 
ネ 01712 ネ 
PDTOT DATA PUT 01713 P SDINP EQU ト く DATA INPUT 
きま 00 STROEE PULSE 01714P 0834 3 は A PSHS 。Y 
MTLPOT 1715P 1 P JSR EYHL HALT SET 
名 ロ 171BP A LDX #SHARED COMMAND SET 
MTLPOT 2=Q Q1717P Q A SDIN10 LDA #GETE1 GET BLOCR 1 
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に STA SHCND,X 民 JSR 
ヨコ A LDD PUIX』Y PUIX STORE A LDA 
Aa STD 導く n7A ヨ P JSE 
5 A LDD PUIY,Y PUIY STOEE nn A LDA 
各 STD 54X ロ 7A ヨ 肛 JSE 
ヨ noCD a LDD PLIX,Y PLIX STOEE # 
Q7 A STD 7 AB QOEd A BITOUT LEAX 
A ヨ 0OCF A LDD PLIY。Y PLIY STOEE 5n A LDE 
pEI A STD コ 、X BQ A NEXLPD LDA 
* ロ 7aA ヨ P JSR 
* ま ++ LDD #* ま 701 7 COLORS ELUE n1 DECE 
*++ STD 18dQP 0 ヨ 7B ENE 
キ ++ LDD 3 RED,PUEPLE Q1841P OOCB A LDA 
キ ま ++ STD 018d2P Aa CMPA 
*++ LDD GREEN,LIGHT ELUE BE BNE 
*++ STD P JSR 
*++ LDD YELLOM,MHITE NOCELF RTS 
*++ STD P BIINIT EQU 
FFE5 A SINMAX ++ GET SCREEN STATUS.。 01848P O ヨ 8F SG oO1 A LDA 
Q2 A PSHS A ++ PUSH IT. 0184 ヨ P 0 ヨコ 1 ヨ 7 03 合 STA 
QC LDA #12 ++ SET GET BLOCK1 COLOR CODE TAELE 01850 * 
ADDEESS . Q1851P 0O ヨ 83 OF 01 A CLE 
CLEE ++ SET COLOE CODE. 01852P 03 ヨ 5 BB 40 A LDA 
ロ 174QP SDIN11 LSE 。S ++ SHIFT 1 BIT. 018B53P 03 ヨ 7 7 00 A STA 
01741P BCC SDIN12 ++ IS IT Q 7 YES,SEIP IT. 01854 * ネ 
Q17 STE AX ++ STOEE COLOF' CODE. 01855P 03 ヨ 3 4F CLRA 
Q1743 INCA ++ COLOR NUMBER +1 0185EP 03 ヨ A 39 RTS 
Q1744P SDIN12 INCE ++ NEXT COLOR CODE. 01857 CRT HARD 
Q1745P OB A CMPE  #8 ++ ALL COLOR END ? 01858 Qoo0Q A BLACK EQU 
Q174EP F4  Q8Co ENE SDIN11 ++ NO,NEXT COLOR. Q1853 OOE は A GRAY EQU 
ロ 1747P 0C Aa SUBA  #12 ++ CALC SET UP COLOR NUMEER. 018B0 00CB A BLKND EQU 
Q1748 QE A STA 11、X ++ STORE SET UP COLOR NUMEER. 018R1 * ま 
0173P 1 A LEAS 1.S ++ AJUST STACK. 018B2 Q0C ヨ A PUIX EQU 
Q175Q キネ 018653 QoCE APUIY EQU 
Q1751P Q73A P JSR HEESET HALT RESET 01BE4 3 
Q1753 071E P JSE EYHLMD IF COMNAND END,HALT SET. Q18G5 QaCD APLIX EQU 
Q1753P QBD8 30 Cd A LEAX 4.X% 0185S QOCF APLIY EQU 
1754P QBDA 3 Ad OOan LEAY BLACK,Y 0187 キ 
Q1755P BQ A SDIN3Q LDA 0。X+ DATA READ。 0186S FBFC A ESRES EQU 
01755P AQ A STA 0Y+ STORE DATA 0186 ヨ FBFE A ROWENT EQU 
Q1757 FCD4 A CMPX 。#SHARED+B4 8O BYTE END ? Q1870 Qoon A IFEQ 
F7 。 Q8DE BNE SDIN3O 01871 OPT 
074 ヨ P JSR REDYRQ SUE READY REQUEST. 01872 * 
073A P JSR HERESET HALT RESET. TTL 
AQ Aa PULS YiPC * ま 
3 Q1875A FEQQ OFG 
QBEF P MODIFY EQU * DATA MODIFICATION 01875 FEoQ A BOTENT EQU 
01764P 20 A PSHS 。Y 01877A FEOO 20 QB FEOE EEA 
017B5P A4 A LEAU OiY Y->U キ 
0176EP A ヨ OOon A LEAX BLACK』Y DATA BUFFER ADDRESS. FC7F A BOTSTK EQU 
A3 OOB4 A LEAY GRAY』Y RESULT OF MODIFICATION. 0100 A IPLADR EQU 
0A A LDA #10 COUNT=10 FEQ2 7E FEB1 A FESTOR JMP 
02 A DTLOOP PSHS A COUNTER SAVE. FE05・7E  FF5E A DMRITE JMP 
0177QP CLRE FEQOE 7E  FF5E Aa DREAD  JNP 
01771P 85 A DTLOPX LDA BX FEOE A STARTS EQU 
01772 20 0 ヨコ 24 BSE SHIFT 018B5A FEOE BE  FD A LDA 
01773P QA A ADDB  #10 01B8BA FEOD 1F  EB A TFR 
01774P 5o A CMPE  #SO 01887A FEOF 10CE FC7F A LDS 
01775P FS Qoo BNE DTLOPX 0188B FE13 A ROMVET EQU 
0177BP 10 A PSHS  X X SAVE 01883A FE13 DE  Q4 A LDE 
01777P 08 A LDB fB 01830A FE15 C5 oz A BITBE 
01778P C ヨ no5A A LEAX BLACK+ ヨ 0。U RESULT BUFFER. 0Q1831A FE17 2 05 FE1E BNE 
Q177 ヨ P 80 A DTLO10 LDA ュ X+ 01832A FE13 BE FEFC A LDX 
Q178QP AQ A STA 0。Y+ Q1833A FE1C 20 23 FE41 EKA 
01781P DECE 018 ヨ 4 3 
01782P F9 09812 BNE DTLO1o Q1835 FE1E A DISKV EQU 
Q17ESP 10 A PULS X X COME EACK 0183SA FE1E 35  Q5 A LDA 
01784P 01 A LEAX 1.X X INCREMENT 018 ヨ 7A FE20 44 LSEA 
0178B5P 02 A PULS Aa COUNTER COME EACK. 1 8 。 FE3B BCS 
017BBP DECA no5 A LDBE 
01787P DE nosFD BNE DTLOOP CONTINUE 04 A LRETRY PSHS 
01788P AQ A PULS  Y,PC RETURN 01301A FE27 BE FE51 A LDX 
01758 ヨ ・ 01 ヨ 02A FE2A 8BD DC FEOB BS 
017 ヨ 0 0d24 P SHIFT EQU ネ 01303A FE2C 35 04 A PULS 
017 ヨ 1P QB24 48 ASLA Q1 ヨ 04A FE2E BE 010Q A LDX 
2 C ヨ 0o5A A ROL BLACK+30。U 1TH BYTE 01 ヨ 05A FE31 4D TSTA 
ヨ 3P ASLA 01 ヨ 0BA FE32 27  QD FE41 EEQ 
017B4P Cg oo5E A ROL BLACK+ ヨ 1。U 2TH BYTE 01907A FE34 8 0A A CMPA 
Q175P ASLA 01 ヨ 08A FE3B 27 3 FE3E BEQ 
017BBP C3 oo5C A ROL BLACK+ ヨ 24U 3TH BYTE 01 ヨ 0 ヨ A FE3B 5A NONDSK DECB 
017 ヨ 7P ASLA 01810A FE3 ヨ 2 OE FE4E ENE 
01738P Cg oo5D A ROL BLACK+ ヨ 3。U 4TH BYTE 01811A FE3E BE  FBFE A NONDS2 LDX 
Q17 ヨ 3P ASLA Q1 ヨ 12A FE3E 4F CLEA 
01BOQP Cd oo5E A ROL BLACK+ ヨ 4。U 5TH BYTE 01813A FE3F 37 1D STA 
に 8 ASLA 01314A FE41 4F SYSJMP CLRA 
OH3E BB  C ヨ OO05F A ROL BLACK+ ヨ 5。U B TH BYTE Q1 ヨ 15A FE42 1F BB A TFR 
Q18O3P OH2 中 ASLA 0181BA FE44 BE 84 A JMP 
01804P 0 ヨ 43 BB CB OOEOA ROL BLACK+ ヨ BU 7 TH BYTE 01317 * ネ 
Q18Q5P Q ヨ 47 ASLA 01818A FE4B 34 04 A LRETZZ PSHS 
: dB Cg ooe1 A ROL BLACK+ ヨ 7U 8 TH BYTE 0131 ヨ A FE4E BE FE5 ヨ A LDX 
GadC : RTS 01320A FE4BE 8BD  B5 FEO2 BSR 
ネ 01321A FE4D 35 04 A PULS 
pd4D P PROUT EQU ネ 01322A FE4F 20  D4 FE25 BRA 
QB ヨ 4D AB  A ヨ 00C8A LDA BLKN0。Y FIRST BLOCK OF LINE ? 01923 ネ 
351 4A DECA 01824 FE51 A BOTRCE EQU 
QO ヨ 52 26 0OD QB51 BNE NOTFST NO,NOT FIRST. 01925A FE51 QA A FCE 
Q54 BD ロ Q758 P JSR LFINCH LF PITCH SET 0182EA FE52 oo Aa FCE 
0357 CB 03 A LDE # SPACE 03 PUT. 01327A FE53 0100 A FDB 
01815P QB5 ヨ 8 20 A LDA まま 20 01328A FE55 oo Aa FCE 
Q181SP O ヨ 5E BD 07A3 P SPCLOP JSR LPPUT 01929A FE5G 01 Aa FCE 
01817P Q ヨ 5E 5A DECE ALL END ? 01830A FE57 ao Aa FCB 
01818P 085F 25 FA  Q35BE BNE SPCLOP NO。CONTINUE 01931A FE58 0o A FCE 
0181 ヨ * 01332 ネ 
0182Q 0g61 P NOTFST EQU ネ 01933 FE5 ヨ A RETRCB EQU 
018B2 * LDA BLKN0。Y GET BLOCK NO. 01334A FE5 ヨ 08 A FCE 
* ま CMPA #1 01335A FE5A Qoon A FDB 
キ BEQ ESCOUT A FE5C Qooo A 
ま CMPA #5 A FE5E 000Q A 
キ BNE BITOUT 01 ヨ 3EA FESO 0Q A FCE 
1BE A ESCOUT LDA NESC BI-PEINT MODE SET. 01 ヨ 37 ENDC 
07A ヨ P JSR LPPUT 01 ヨ 3 FFFF 人 IFEQ 
4C A LDA 上 ESC L 01340 ENDC 
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GET A DATA ネ 
PEINT OUT a FREESTE EQU 3 SEEK TEACK 0. 
ALL DATA END A LDU #CURTRK 
NO,NEXT LP DATA・ | 人 き LDA FCEUNT,X 
A REESEN EQU * 
LAST BLOCK OF LINEP 人 a ANDA #$03 UNIT SELECT. 
A CLE As TRACK ADDRESS Q SET. 
CR LF A LDE DDRIVE 
RETUEN に OFA きま GOQ 
* ネ BEIOS INITIAL SETTING | A STA DDRIVE 
# ロ 1 SPEAKER SITCH ON | 1 ES CME15 
BELL | LDA DDFIVE 
BPL CME15 
LPDTOT DUMMY DATA=Oo TSTE 
きす 0 STROEE="H' BNI Z1nno 
MTLPOT DUMMY OUTPUT LDA きろ 
z5oo  JSR TM1S 
NORIMAL END. DECA 
ENE Z50n 
COPY MORK ztoon LDA # ま 0A RESTORE COMMAND (V=O) 
$0Q ELACK DATA BUFFER OFFSET。 ERA CMEXEC BRANCH COMIAND EXECUTION 
Et GRAY DATA BUFFER OFFSET., キ 
$C8 CRT DATA BLOCK NO. SEEK EQU * ネ SEEK TEACE 
ESRE DFESEL DEIVE SELECT 
C ヨ PUIX ADDRESS ECS CME15 
CE PUIY ADDRESS LDU #CURTRK 
LDE DSTDRV 
CD PLIX ADDRESS | LDA BU 
$CF PLIY ADDRESS | STA DTFACK 
回 LDA FCETRK,X DESTINATION TRACK LOAD. 
$FEFC 。 BASIC RESTART ADDRESS. DON'T INIT. Q CMPA BiU 
* ま FEFE BASIC START ADDRESS. FRON INITIALIZE . Q EEQ CME11 NON SEEK ACTION 
EOOT ASSEMELE WHEN EOOT=Q | Q STA BU NEW TRACK ADDRESS SET. 
し | 回 STA DDATA TRACK NO IN DATA REG 
| 加 LDA まま 1E SEEK COMMAND SET (V=1) 
FEASIC MODE (NO 0) BOOTSTRAP LOADER | Q CHEXEC EQU キ COMMAND EXECUTION 
STA DCID COMMAND STORE 
FEQQ 加 LDA # 3 --> 
# FEASIC EOOT PROGRAN. CME02 DECA TINE OVER ? 
STARTS FEC5 BEQ CHE25 YES,TIME OVER. 
| A CMEO5 LDY #$CBOO ABOUT Q.5 SECOND 
* ま FC7F A CME10O LEAY  -1.Y 
ま Q10Q | FEA3 BEQ CMEQ2 
FRESTR A LDE DDREQ READ DRQ,IRQ 
RDMRIT A BITB  #$ ま 0 IRQREQ ? 
RDREAD FEAA BEQ CME1Q 。EUSY,LOOP 
3 A LDE DSTAT MAKE SURE 
# ま FD FF53 A JSR TMzoM 
AiDP DIRECT PAGE=FD. . CME11 CLRA 
#EOTSTK STACR SET。 001--Q0O000 
* 17 ooon FEBD CME15 LBSR  *#+3 
STOPF nn1--01 ヨ ヨ 8 
0 STOP KEY PRESSED ? Go00 FECO LESR まま +3 
DISKV DISK CODE LOAD TRY. Qzo01A RTS 
ESRES YES,JUMP TO MARM START ENTRY. | 02002 * 
SYSJP | 1 0A A CME16 LDA #$ ロ A NOT READY 
02 FEC7 ERA CHE3Q 
* TRY TO READ DISK CODE. OF A CME25 LDA #$OF TIME OVER ERROR 
SESOUT | o1 CMESO SEC 
| RTS 
NONDS2 * 
#5 RETRY COUNTS=5 SET. FECA A FREADY EQU * ま 
け 18 A LDE DSTAT 
#EOTRCE RCE_ADDRESS FOR BOOT. LSRE READY ? FDC READY CHECK 
DREAD FLOPPY READ ROUTINE. 04 FED3 BCC YESRDY 
B GET RETRY COUNTS * FORCE INTEREUPT FDC NOT READY・ 
#IPLADR 
926198 EE Ca Da A LDE 吉 2 FORCE INTEREUPT CONMMAND. 
02015A 18 A STE MD 
ANY ERROR ? と 
02015 *+ FDC READY 
0 NDLIREA GOOEETERK 02017A FED3 6 1E A YESRDY LDA DDATA 
NONDS2 02018A FED5 43 COMA 
02013A FEDE 37 1E A STA DDAaTA 
LRETzz Qzo20A FEDS SD EQO FEEA BSR CME15 
ROMENT 2021A FEDA ヨ 1 1B A CMPA DDATA 
Q2022A FEDC 2B DE FEBE3 BNE CME11 
3 2023A FEDE CE Ao0o A LDU #$AOOO 5000 --> AOOQ 
3 02024A FEE1 33 5F A RDYCHK LEAU -1jU TIMEDOUT? 
ADP DP=Q 02025A FEE3 1183 QOoQ A CMPU  #O 
OX 0 TO EACH ENTEY。 02026A FEE7 27 OB FEEF BEQ TIMOUT YES TIMEOUT Z=1 ZERO. 
02027A FEEB DG 18 Aa LDE DSTAT 
由 Q2028A FEEB 2E F4 FEE1 BMI RDYCHK 2Z=O NON ZERO SET。 
#EETECB Qzo2 ヨ A FEED CE  Q1 A LDE #1 
EESTOE 02030A FEEF 3 ヨ TIMOUT RTS 
E まま DRIVE SELECT 
LRETRY 3 
FEFO A DRSEL EQU 上 
キ 0 1p 人 a LDE DDRIVE READ CURRENT DRIVE。 
FDREAD RQNO FFE5 A STB DMOTOE 
Q STATUS は A ANDE 。#$03 MSB=MOTOR FLAG 1=ON Q=OFF、 
IPLADE DATA STOEE ADDEESS。 FFEQ A STE CRDRIV CURRENT DRIVE NO SET. 
n TRACK=o FFE1 A LDU #CUETRK CURRENT HEAD POSITION SAVE AREA. 
1 SECTOR=1 07 A LDA FCEUNT,X 
G SIDE=Q 03 A ANDA  #$03 DESTINATION UNIT SELECT. 
ロ UNIT=Q FFES A STA DSTDRV 
FFE5 A TST DMOTOR WAS ON 
3 17  FFzo BNI MASON TES,IT MAS MOTOR ON. 
FDREST RQNO * ND,MOTOR MUST BE ON AND MAIT 1 SEC AND CLEAR THE TRACK 
0,Q。0 * POSITION SAVE AREA. FORCE RESTORE ALL DRIVES. 
キ % 
Qz048A FFO ヨ BR 8BO A DVTCLR LDA # ま B ロ 
Q UNIT Q SET。 Q2043A FFOB 34 2 A RESTLP PSHS AiU DRIVE NO SAVE. 
9 評 98 | ME A JSR RRESEN CALL RESTORE ROUTINE. 
BOOT-1 A s00T=1 : BUEE y の A PULS AU DRIVE NO PULL DOMN. 
SSEMELE UHEN BOOT=1 : BUEELE MODE. OB2ARPE オ 2214 3 
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On53A FF13 81 に DC に 1 CMPA まま は ALL END 
Qu2Q54A FF15 2R  F4  FFOE ENE FESTLP NO,CONTINUE . 
Qu55A FF17 EE  FFES 合 LDA 
u5RA FF1A BBQ 人 OFA 
1D 人 STA DESTINATION DEIVE SET. 
Q3  FF2H EEA 
キキ 
FFEO A_ MASON CMPA DESTINATION=CUFERENT 豆 
C4  FF23 EEQ YES 
SQ に 1 OFA 
1D に 1 STA IT IS NOT SAME.DRIVE REG SET. 
ヨ F FECA CHEEDY ESE FREEADY READY CHECK。 
ヨ A FEC7 EEQ CME3Q NOT READY. 
FE CLC NORIMAL 
RTS 
キ 
0 ATM1S EQU キ 1 SECOUND TIMER= ヨ 85 
Q2Q70A FF3BQO CE 3 1 LDU # ま 3D ヨ 
QzO71A Fl 03 。 FFSE TM1S5 ESR TM1N 
OO72A FF35 5F 人 LEAU 。 -1』U 
OZQ73A FI 『 ロ QOQO 合 CMPU  #Q 
2 FE  FF33 ENE TIM1S5 
KTS 
キネ 
OSQ77A FF3E 10SE QQEO ATNM1N  LDY # ま DE ロ 1 MS TIMER 
OZO78A FF4 は 2 3 は 0Q2 人 A PSHS AaA 
D207 ヨ A FF4 は ヨ E  QQn A LDA MTLPOT 
020B0A FF4E 47 ASEA 
QOS081A FF47 25 。 Q4  FF4D ECS TM1N5 
02OB2A FF4 ヨ 108E 00 ヨ 3 人 LDY せま ヨ ヨ 
OSOSSA FF4D 31 3F ATM1M5 LEAY 。 -14Y DEC Y 
2Q8dA FF4F 2S FC  FFdD ENE TM1M5 
Q2QS5A FF51 35 82 A PULS AiPC 
0 る ネ 
OS2QE7A FF5S 3 は  Q4 A TM2OM PSHS 
02O8BA FF55 CB 14 Aa LDE #20 
02OSHA FF57 8D  E5  FF3E TM2OLP ESR TM1N 
DECE 
FE  FF57 ENE TIM2QLP 
2 E に 1 PULS EPC 
02084 キキ キキ ネネ キキ ネネ 本村 キキ キキ キキ 本 キキ まま 
020 ヨ 5 3 
02O03E FFSE A_RDMEIT EQU キ SECTOE WEITE. 
020 ヨ 7 FFSE A_RDREAD EQU キネ 
02QBSA FF5E BD FES5 1 JSR SEEK DRIVE SELECT ,SEEK TRACK 
CO2OBBA FFB1 SB 5A  FFED BNE DREAD7 
O2100 キ 
OS101A FFBS 1A50 A FDE NSKFIQ IRQOiFIRQ MASK。 (BZ2/01/2O) 。 
O2102 キ 
OZ103A FFB5 AB QB に 1 LDA RCESID,X 
Q2104A FFB7 4  Q1 A ANDA  #1 GET UNIT. 
QS105A FFE ヨ ヨ 7 1C 全 STA DSIDE 
Q210RA FFSE AE 0Q5 1 LDA RCESCT ,X 
02107A FFED A STA DSECTR SECTOE SET 
OZ21QSA FFEF 人 A LDA RQN0,X GET REQUEST NO. 
A CMPA  #FDREAD DREAD 『 
FFSD BEQ DREADX YES ERANCH DREAD. 
合 LDA 半 ま AG WRITE CONMHAND SET 
QE112A FF77 : 1 STA DCMD 
QE113A FF7 ヨ A LDY RCEDEA」X 
OZ114A FF7C A DuMEIT1 LDA 0Y+ DATA GET 
Qz115A FF7E DE A DMREITS LDE DDFGQ DRO 『 
2 の FFSE EPL DMEIT5 NO 
A STA DDATA DATA STOEE 
Q2118A FI FF7C ERA DuEIT1 
Q211 ヨ キキ 
02 品 DuEHT5 ASLE EXTEACT COMMAND END TO MASE. 
F5  FFZE EPL DMREIT2 
ES  FFEE ESE TM1N 
14 。 FFA1 ERA FMEND 
* 
0 よみ ドキ キキ キネ キキ キキ まま キキ キキ 
FFSD A_HREADX EQU キ SECTOR READ. 
1 LDA せま READ COMMAND SET 
1 STA DCIND 
A LDY RCEDEA,X 
A DEREAD1 LDE DDEQ DEG " 
FF ヨ E EPL DREAD5 NO 
全 LDA DDATA LOAaD DATA 
9A FF ヨ A 合 STA 0。Y+ 
5A FF ヨ C 2O FF ヨ 4 EEA DREAD1 
ネ 
DREAD5 ASLE EXTRACT COMMAND END TO MSE. 
FF ヨ 4 BEPL DEEAD1 
A RMEND LDE DSTAT ERROR 呈 
FFA7 ENE DFEAD5 
Oz141A FFA5 』F CLEA 
OZ142A FFAR 3 ヨ RTS 
0 18 キ 
02144A FFA7 BE QA A DREADE LDA せま 0A 
Quz145A FFA ヨ C5 SO A EITE  # ま SO NOT EEADY 
0214BA FFAE SE 10 。 FFED ENE DREAD7 
OZ147A FFAD 4C INEA ま OE 
0Z14gA FFAE C5 40 人 EITE  # ま 40 WRITE PROTECTED 
ne143A FFEO 2B  QE  FFED ENE DREAD7 
Q2150A FFB2 4C INCA ま QC 
Quz151A FFES C5 1# 合 EITE  # ま 1 は FECOFD NOT FOUND,LOST DATA ? 
QuZ152A FFE5 2R QB  FFED ENE DREAD7 
Q2153A FFB7 4C INCA まま 0D CRC ERROR 7? 
Qs154A FFES C5 OB A EITE  # ま OB 
Oz155A FFEA SR  Ql FFED ENE DREAD7 
OS15RA FFEC 4C INCA ま OE DELETED DATA NMARK_ DETECTED ! 
0O2157A FFED 1A  Q1 DREAD7 SEC SET CAREY FOR DRSEL ERROR INTERFACE. 
Q215BA FFBF 3 ヨ FTS 
0215 ヨ キ 
4 キ ま BOOT EOIH END ADDRESS=$FFDF 
キキ 
OZ1E2A FFFE ORG まま FFFE 
021S3A FFFE FEQQ 人 A FDE BOTENT BEOOT ENTEY ADDRESS・. 
021E は END 
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柳 要 


FM-8 の ブー ト ROM(MB8516) は 図 1 の と お り 4 分 割 
され て 使わ れ て いま す . メイ ン ・ メ モリ 上 に どの BANK が 
現われ る か は , 本 体 背 面 に ある ディ ッ プ ・ ス イッ チ ( 図 2) 
の 9 番 , 10 番 の 設定 に より ます . 

FM-8 の ディ ッ プ ・ ス イッ チ の 設定 と メモ リ ・ マ ッ プ の 
関係 を 図 3 に 示し ます . 

表 1 か ら も わか る と お り , ディ ッ プ ・ ス イッ チ の 切り 
え に よ り , F-BASIC ROM/RAM, ブー ト ROM の BAN 
K の 両方 が 切り 替わり ます . 

バブ ル ・ モ ー ド , DOS モ ー ド と は それ ぞ れ , ブー ト R 
OM BANK 1 , BANK2 が メイ ン ・ メ モリ ・ マ ッ プ に エン 
トリ する モー ド で あり , .$ 0000 一 $FC7F は 連続 RAM 領 
域 に な り ま す . これ ら の モー ド に お いて は , シス テム ・ プ 
ログ ラム (OS,F- BASIC V2.0, etc) は すべ て 外部 記憶 装 
置 よ り メ モリ 上 に ロー ディ ング され な けれ ば な り ま せん . 

シス テム ・ プ ログ ラム を バブ ル ・ カ セッ ト か らら ローディ 
ング する 場合 が バブ プル ・ モ ー ド で あり , フロ ッ ピ ー デ ィ ス 
タク か ら ロ ー デ ィング する 場合 だが DOS モード で す . この 呼 
び 方 は 便宜 的 な も の で あり , 正しく は ミニ FD モ ー ド と 呼 
ぶ べ きか も し れ ま せん . 

園 シ ステ ム の 起動 

FM-8 に お ける シス テム の 起動 は 、 図 4 に 示す と お り 3 
段階 で 行なわ れ ま す . ブー ト ROM 内 に は プー ト ・ ス トラ 
ッ プ ・ ロ ー ダ が 格納 され て お り , 外部 記憶 に は I PL と シ 
ステ ム ・ プ ログ ラム が 格納 され て いま す . ブー ト ・ ス トラ 
ッ プ ・ ロ ー ダ は TI PL プロ グラ ム を 読み 出し , I PL プロ 


グラ ム は シス テム ・ プ ログ ラム を 読み 出し , シス テム ・ プ 
ログ ラム に コン トロ ー ル が 渡さ れ , シス テム が 起動 し ます . 


プー ト ・ ス トラ ッ プ ・ ロ ー ダ は 固定 的 な プロ グラ ム で あぁ あ 
り , 様々 な シス テム に 対応 する の は シス テム ご と に 作成 さ 


$8000 二 BSFBFF $FE 
メモ リ 属 性 プー 





00 二 $FFDF 
ト ROM BANK No 


れる IPL プ ログ ラム で す . IP 上 L プ ログ ラム は その 記憶 
され る 場所 ,。 バイ ト 数 が 固定 的 に 定め られ て いま す . 
⑳ バ ブル ・ モ ー ド 昌 ユ ニッ ト 0 の バブ ル ・ カ セッ ト 

昌 ペ ミー ジ 0 一 ペー ジ 15 の 16 ペ ー ジ 

還 512 バ バイ ト (32X16 バ イト ) 


@DOS モ ー ド m ユ ニッ ト 0 の ディ スケ ッ ト 
還 ト ラッ ク 0, サ イド 0, セク タ 1 ュ ユー2. 
昌 512 バ イト (256X 2 バイ ト ) 

プー ト ・ ス トラ ッ プ ・ ロ ー ダ は 上 記 の 場所 より IPL プ 


ログ ラム を 読み 出し , $300$4FF に 格納 し , $300 番 地 
に 分 岐 し ます . 以上 が バブ ル ・ モ ー ド と DOS モ ー ド の 概 
要 で す . 

プ ブート ROM の 


図 3 FM-8 メ モリ ・ モ デル BANK ア ドレ ス 





0000 





























いざ) に で さ ぐ ) で 


BANK 2 BANK 8 





国 2 ディ ッ プ ・ ス イッ チ の 設定 
プ ブート ROMBANK の セレ クト 
F-BASICROM/RAM の セレ クト 





on 症 | | | 画 |」」」 | 
想 還 
12345678910 


(裏面 より 見 た 場合 ) 










































ON 0 
oN OFF R AM 1 バ プ ル ・ モ ー ド | バブ ル ・ カ セッ ト の シス テム ・ プ ログ ラム の 起動 
OFF ON RAM | 2 5'DOS モ ー ド | F-BASIC V2.0(5") や ミニ FDOS の 起動 
OFF OFF RAM 3 8'DOS モ ー ド | F-BASIC V2.0(8") や 標準 F DO S の 起動 
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バブ ル ・ モ ー ド , DOS モ ー ド に 
お ける IPL プ ログ ラム の 作成 


IP 上 L プ ログ ラム 作成 の ポイ ント は 次 の 3 つ で す . 
⑩⑯ デ ィ ス ク ま た は バブ ル 上 で の シス テム ・ プ ログ ラム の 格 

納 場所 
@ メ イン ・ メ モリ 上 で の シス テム ・ プ ログ ラム の 格納 場所 
(ディ スク の 場合 ) ブー ト ROM 内 の ディ スク ・ ア クセ 

ス ・ ル ー チ ン の 利用 

バブ ル の アク モス ・ ル ー チ ン は 特に 用 意 き され て いま せん 
が , 以下 に 示す バブ プル の プ ブート ・ ス トラ ッ プ ・ ロ ー ダ の リ 
スト を 参照 すれ ば 比較 的 簡単 に 作成 する こと が で きま す . 

⑳, @ は シス テム ご と に 定まっ て くる こと で あり , ゅ は 
FM-8 の ハー ドウ ェ ア に 依存 し ます . フロ ッ ピ ー デ ィ ス ク 
の アク セス ・ ル ー チ ン は 少々 複雑 で す が , ブー ト ROM の 
中 に 用 意 さ きれ て いま す . 

プ ブー ト ROM の ルー チン の 使用 方 法 は , 基本 的 に BIOS 
コー ル の 方 法 と 同一 で す . し か し な が ら , BIOS の 正式 な 
エン トリ ・ ポ イン ト か ら の エン トリ で は な い の で , 1 PL 
プロ グラ ム に お いて 次 の こと を 追加 し て 行なわ な けれ ば な 









プー ト ・ ス トラ ッ プ ・ ロ ー ダ 
(外部 記憶 より IPL プ ログ ラム を J 
メイ ン ・ メ モリ ー に ロー ディ ング 












IPL 
外部 記憶 よ リ シ ス テム プログラム) 
(を メイ ン ・ メ モリ ー に ロー ディ シグ 








シス テム ・ プ ログ ラム が 動作 し 、 
シス テム が 起動 する 


















り ま せん . 
⑱@ レ ジス タ の セー プ (破壊 さん て は 困る レジ スタ を 保存 す 
の 
@DP レ ジス タ を $FD に セッ ト す る . 
上 記 の こと は ディ スク の 場合 の こと で す の で , バブ ル の 図 5 |P ヒ し プロ グラ ム の フロ ー チ ャ ー ト 
場合 は アク セス ・ ル ー チ ン を すべ て 作成 し な けれ ば な り ま = 
せん . 


プー ト ROM の ディ スク の アク セス ・ ル ー チ ン の エン ト 
リ ・ ア ドレ ス は 次 の と お り で す . 





スタ ッ ク の セッ ト 






$ FE02 リス ト ア ・ ル ー チ ン 
$FE05 セク タ ・ ラ イト ・ ル ー チ ン 
$FE08 セク タ ・ リ ー ド ・ ル ー チ ン 





DP レジ スタ 
1 一 -$FD 

















ディ スク の TI PL プロ グラ ム の フロ ー チ ャ ー ト は 図 5 の 
通り で す . 

で は , バブ プ ブル ・ モ ー ド と DOS モ ー ド の IPL プ ログ ラ 
ム の 実例 を リス ト 1, 2 に 示し ます . どちら の 場合 も F-BAS 
IC を 起動 する も の で す . 


=| とく レ 」 
最後 に 
IPL プ ログ ラム , シス テム ・ プ ログ ラム が で き 上 が っ 
だ た とき, それ を バブ ル ま た は ディ スク に 書き 込ま な けれ ば 
な り ま せん が , それ は 専用 の ユー ティ リティ を 作成 し て 行 
な うか , また は BIOS コー ル に より , 物理 的 に ペー ジ ・ ラ 
イト また は セク タ ・ ラ イト する こと に より 行なえ ます . 
以上 に , バブ プ ブル ・ モ ー ド と DOS モ ー ド に つい て 概要 お 
よび 実例 を 示し まし た . し か し , 実際 に IPL プ ログ ラム 
を 作成 し て , リセ モ セット か ら シ ステ ム を 立ち 上 げ よ うと する 
場合 は TPL プ ログ ラム を 詳細 に トレ ー ス し , 動作 を 理解 
する こと が 肝要 で す . 
そこ で ,。 バブ ル ・ モ ー ド と DOS モ ー ド の ブー ト ROM 
の デモ セン プル ・ リ スト を リス ト 3, 4 に 示し ます . また 
8DOS モ ー ド の リス ト を リス ト 5 に 示し ます の で 参考 に 
し て くだ さい . な お , ROM モ ー ド に つい て は 『EFM-8 活 
用 研究 ,』 の BIOS の リス ト を 見 て くだ さい . 





BIOS 
RCB セ ッ ト 














$FE08 サ プル ー チ | X レ ジス タ : RCB の アド レス 
ン ・ コ ー ル (セク タ ・ リ ー ド ) 
アキ ュー ムレ ー タ 
復帰 
全 セ クタ 終了 ? 


yeS 








DP レジ スタ ー0 










シス テム ・ ブ ログ 
ラム の エン トリ へ 
分 岐 
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リス ト 1 バブ ル ・ モ ー ド の IPL 例 ( バ ブル より F-BASIC を 起動 ) ) EE 


TTL Eubble BASIC IPL program Ver 1.0n 
OPT SYM 。NOGEN 
GSQQ ORG まま QGOQ IPL program Start 





キキ 
ま IPL prograsm by NE。 
EUZZER EQU *03 Euzzer status Reg. 





HALT EQU ま Q5 Sub-system halt flag., 
EDATA EQU ま 1Q Date FReg・ 
Gu1 1 ECMD EQU ま 11 Command Re&g. 
ロ O1S ESTAT EQU ま 12 Status Re&g. 
QQ1 時 EPGADH EQU ま 1 Page sddress Reg. 
nn15 02 EQU ま 1 は Page count Reg。 


ま Program Start 
内 


START EQU キ 
LDA # 和 まま FD 
TFER 全 。DP DPE is ま FD 
LDX まま FFFF 
EUSY EQU 党 
LEAX ー1。X Over load『 





IKE'NI EEG EEILERR Yes』 bubble error! 
LDA ESTAT Eubble resdy 
LSRA 
u3 ロ 7 ECS BUSY Nonouwu busy。 
LDU 唱 EASIC losdirig start sddres5s・。 
LDX 1 Eubble Iomding start pge・. 


STX EPGADH Store to sddress FR'eg. 
LDX ト : こ に に Eubble logmding pages・. 
STX EPGCTH Store to cournt FReg. 
LDA #1 Eubble read commanid set。 
STA ECMD 
EEAD1Q EQU キ 

LDA ESTAT Status Reg. load. 

032F EMI READSQ Commard fimished 





5 KWI EITA せま Can read 

7 Fg Q31 EEGQ FREAD1Q No,can"t。 

ド 1u LDA EDATA Load data FReg. 

Cu STaA sU+ Store data & addres5 UP・ 
SNI F タ 2 NIC が | ERA EEAD1Q 





READSQ EQU キ 
LDA ESTAT Commard firiished 
BEPL READ1Qn No。 Continue! 
EITA せま Any eFFOr 
ENE EELERER Yes error。 
ANDCC  # ま AF 
CLEA 
TFE 人 DP DPE clear. 
JIMP [まま FEFE] Jump to BEASIC hot stgrt。 





ま Print error mesSsa&e 








キ 
INIEC TI EELERER EQU キネ 
1 LDA せま 1 
NIC STA EUZZER Buzzer on。 
FE ELOOP EEA LOOP No end loop・ 
SQ END START 








昌 曲 リス ト 2 DOS モ ー ド の IPL 例 (5' ディ スク より F-BASIC を 起動 ) ) 還 還 5 


NAM BASIPL 
TTL IPL OF 40 ド RAM MODE SYSTEN 
OPT NOMEM ,OEJ NOG 
OSIOQ ORG まま 00 
Qu300 2ZO 18 。  Q31A LENTEY BRA STAFET 
キ 








ロロ DCSIZE EQU 13 DISK CODE SIZE. 
BEIGQ DCSADR' EQU sic1MIMI DISE CODE STAET ADDFESS. 
OU3O0Z IPLRCE EQGU キ 
QA FCE 1Q FEAD SECTOFE。 
QuQ FCE 1 STATUS。 
BEOQ FDE ま ESBQO DISE CODE STAET ADDEESS. 
| NM FCE る DISE CODE START TRACE 。 
| Qu1 FCE 1 DISE CODE STAET SECTOER. 
Qu FCE り DISK CODE START SIDE. 
BINI FCE 回 UNIT 90. 
キネ 
DSQA IDECE EQU キ ID FEAD. 
QA FCE 10。 ロ 
03A1 FDE IDEUF 
On FCE 0。3。0。0 TRACE Q。 SECTOR ヨコ 。 SIDE 0。 
キ 
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リス ト 2 DOS モード の IPL 例 (5' デ ィ ス ク よ り F-BASIC を 起動 ) 








0312 08 RESRCE FCE 8 RESTORE. 
0313 Qp RME B 
031 ヨ QQ FCE Q UNIT 0. 
キ 
STAET LDS # ま 3Q0 
LDA # ま FD 
TFR ADP 
LDX #IDRCE | 
| 0 ヨ 78 ESR DCREAD READ ID | 
LDX 3 
LDD 5 
CMPD 。#*!S*25B+*Y SYSTEM 
fiE に に ENE IPLERE NO. 
| LDA 2.X 
CMPA  #?S 
0 ENE IPLERE NO. 


LDE #DCSIZE YES。. 

LDX #IPLRCE EEAD DISR CODE. 
RDLOOP PSHS BE 

JSE FDREAD READ DISR CODE・ 




















TSTA 
0S4A EEQ EEDOK 
CMPA  #10 DRIVE NOT READY 『 
Q33 ヨ BEQ IPLERR YES。 
378 ERA DCREAD RETEY。. 
| REDOE  LDD # 計 100 
ADDD 2 ッ 5X 
STD 2。X FENEU RAM ADDRESS. 
LDA 5,X 
INCA 
CMPA  #15 CURRENT SECTOR+1 》 1 部 
QSB5 ELE NEMSCT NO。 
TST B』X YES。 SIDE C 
Q3B 1 EEQ SIDINC YES. 
INC 4X RENEW TRACK NO。 
CLR B。X CHANGE OF SIDE *SIDE=Q 
FCE ま SC CMPX # 。SRKIP INC_B,X 
SIDINC INC B』X CHANGE OF SIDE :SIDE=1 
LDA #1 
NEMSCT STA 5,X RENEM SECTOR NO. 
PULS 
DECE 
ENE FDLOOP 
CLRA 
TFE 人 DP 
LDX #DCSADF' 
LDA # 和 ま FF 
FEFE JIMP [EASENT] 
ネ 
DCEEAD LDE #5 
FETEY PSHS E 
PSHS X 
LDX #RESRCB 
JSER RESTOR 
| PULS X | 
CNPA #10 DRIVE NOT READY 
03 ヨ ヨ EEQ IPLERR YES. 
JSER FDREAD 
PULS BE 
TSTA 
03A0 BEQ RETRTS 
ココ 2 CMPA #10 DEIVE NOT READY 
03 ヨ 4 27 03 03 EEG IPLERR YES。 
OSHR 5A DECE 
O3 ヨ 7 2B  E1 037A ENE RETRY 
キ 
03 ヨ 3 85 紀 1 IPLERR LDA せま 1 
O33EE EZ  FDQ3 STA EELL 
033E 20 。 FE  Q33E BRA キネ 
ネ 
03A0 3 RETETS RTS 
キ 
ま SYSTENM FLAG 
FDQ3 EELL EQU ま FDQO3 
FBFE BASENT EQU ま FBFE 
| FEOS FDREEAD EQU ま FEO0B 
FEQ2 RESTOR EQU ま FE02 
キ 
OSA1 IDBUF EQU ネ 
D30Q END LENTRY 
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リス ト 3 バブ ル ・ モ ー ド (BANK 1 ) ア セン ブル ・ リス ト 還 還 還 昌 昌 昌 昌 間 





TTL 5 INCEH BUBBLE PHDE(NH 1) BHT STRRF LHRDER (B2 03 01)- 


内 
+ 
* ロ RG $FEOOQーーーーーー-| FnRPL EXEFUTI ロ IN 
ゅ 
* ロ RG EEOO-ーーーーーー DEBUGING 
内 
FEoo RG *FEQQ 
FEOO 。 R BOTENTERU  * FN- 日 BHT FRIGRRM BUBELE PDE.(N 1 
FEQOO 20 09 FEOB BRR STRRTS 
* 
FCTF R BHTSTK ERU *FCYF STACK PINTER SET 
0300 RIPLRDR ERU *0300 
+ 
FEQ2 YE FESH  R RESTGRJWF RRESTR 
FE05 YE 。FF61 R DMRITE JPF RDMRIT 
FEOB ?E  FF61 人 DRERD JMF RDRERD 
* 
FEOH R STRRTS ERU  +* 
FEOB CE  FFC3 RA LDD #NNMIRTI NMI UECTOR SET 
FEOE FD  FFFE RA STD FNMI 
FE11 B6  FD R LDR # 和 SFD 
FE13 1F BB 人 TFR 。 frDF DIRECT PAGE=FD. 
FE15 BE  FFFF Ra LDX #$FFFF 
FE1B 30 1F R TIMDLY LERX  -1:X RBnUT 0.5 SEC DILRY. 


FE1R 26 FC FE1B BNE TImDLY 
FE1C BE  FFFF R LDX #$FFFF 
FE1F 30 1F R BUSY LERX  -1hX 
FE21 27 32 FE55 BEGI BELERR 
FE23 96 12 R LDa BSTaT 
FE25 44 LSRR 
FE26 25  F7 FE1F BCS BUSY 
FE2B CE 0300 Ra LpU #$0300 
FE2H BE Qooo R LDX #0 
FE2E 9F 14 R LnP STX BPGRDH 
FE30 BE 0010 R LDX #16 
FE33 9F 16 | STX BPGCTH 
FE35 B6 0O1 R LDa #1 
PE3C9P。 届 R STR BCD 
FE39 96 12 R RERD10 LDa BSTaT 
FE3B 2B OR FE47 BI RERDzo 
FE3D B5 zo R BITR  #$20 
FE3F 27  FB FE39 BER RERD1O 
FE41 96 10 R LDR BDaTR 
FE43 7 ECO R STa ・U+ 
FE45 2O  F2 FE39 BRR READ10 
FE47 96 12 R RERD2O LDR BSTRT 。 CME? 
FE49 2R EE FE39 BFL RERD10 
FE4B B5 0z R BITR  #$02 ERROR ? 
FE4D 26 06 FE55 BNE BBLERR 
FE4F 4F CLRR 
FE5O 1F BB R TFR RxDP 
FE52 YE 0300 R JP IFLRDR 
キ ! 
FE55 人 BBLERR ERU * 1 
FE55 B6 81 R LDa #$ 日 1 
FE5T 97 03 R STA BELL 
FE59 2O FE FE5S9 BRR * 
円 
TTL 5 INCH FD DRIVER PHIDULE(F-ERSIF : RnM-EBRSED PIDE.) 


m 
エエ エエ エエ エエ エエ エエ エミ エエ エミ エエ エエ エエ エエ ナミ エエ エエ ミナ キナ エナ エミ キキ キキ エエ ナオ エ で 】 
ポ 


***ww TYPFE 1 に HMPMRND 


ネ 


FESB R _RRESTR ERU ka SEEKTRRCK Qi 
FESB CE FFE1 は | LDU ~ #EURTRK、 
FESE 6 0P R LDR REBUNT ,X 

* BUG に HRRE に CTIHN 2 ーー〉 25 UERSIHN BZ01/11 SHURCE UPDRTE. 

FE60 R_RRESEN ERIU * RRESEN LRBEL PHSITIHN MRS CHRRECTED. CLR RU 一 〉 RNDR 03 
FE6Q 4 03 は 1 RNDR 革 03 UNIT SELE に T 
FE62 6F E6 1 ELR RU TRRCEK _RDDRESS 0 SET 
FE64 D6 1D は 1 LDH DDRIVE 
FE66 BR 0 1 HRR #$BO 
FE6 昌 9? 1D 人 R STR DDRIUE 


FE6R _BD 4 に FEBB BSR CIE15 
FE6 に 96 1D は 1 LDR DDRIUE 
FE6E 2Ra 4D FEBD BEPL CME16 
FE7YO_5D TSTH 
FEP1。 2 08 FEYB BPI Z1000 
FEY3 B6 02 R LDR ご 
FE?5 BD FF3F RR Z5Q00 JSR TM15 
FE 4R DECR 
FE7Y9 26 FR FEY5 BNE Z500 
FEYB 6 OR RR Z1Q00 LDR 革 OR RESTHRE CHNNIRND ( り =O) 
FEYD 20 1R FE99 ERR CMEXE に BRRNCH CHIYMRND EXECUTIHN 
ポ 
FEYF R SEEK ERU SEEK TRACK 
FEYF BD 7B FEF に SR DRSEL DRIVE SELECT 
FEB1 25 3 FEBD BC5 EYE16 
FEB3 CE FFE1 月 LDU #EURTRKC 
FEB6 F6 FFEB | LDB DSTDRUV 
FEB9 RG に 5 は | LDR BU 
FEBH 9 19 R STR DTRRCK. 
FEBD RG6 Q4 介 LDR RCEBTRKsX DESTINRTIHN TRRCK: LHRD 
FEBF R1 C5 介 CMPR BU 
FE91 2? 24 FEH7 BERI CEPE1 1 NHN_ SEEK RCTIHN 
FE93 6 品 介 STR BiU NEM TRRCK RDDRESS SET 
FE95 97 1H は STR DDRTR TRRCK NH _IN DRTR REG 
FE97Y B6 1E は 1 LDR 1E SEEK。 EQIIMRND SET (いり =+) 
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リス ト 3 バブ ル ・ モ ー ド (BANK 1 ) ア セン ブル ・ リ スト 








門 
ポキ 





FE99 CMEXEC EBU * CnMMRND EXECUTInN 
FE99 97 1 R STR DCMD FCnPMMRND ST ロ RE 
FE9H B6 03 a LDR  #3 
* 
FE9D 4 CMEO2 DECR TIME HUER ? 
FE9E 27 "31 FED1 BER CME25 YES。TIME ロ VER 
FERO 10BE CBOO 人 CMEO5S LDY #$sCBOO RBnUT 1.4 SECND 
FER4 31 3F R CME10 LERY  -1:Y 
FEA6 27  "F5 FE9D BE CME02 
由 
FEAB D6 1F R LDB DDRR RERD DRR,IRG 
FEAR C5 40 a BITH  #$40 TRGREGI や 
FEAC 27  F6 FEA4 BER ” CME10 BUSY,LnnP 
FEE D6 18 R LDB DSTaT MaKE SURE 
Ne 
FEBO BD  FF56 Aa JSR TMzoM 
= 
FEE3 C5 18 R BITH  #$1B CRC,SEEK ERRIR ? 
FEB5 26 OB FEBF BNE ” CME2O ERR ロ R ロ CCURED 
FEBY 4F CME11 CLRR 
FEBB BD "0Q2 FEBC CME15 BSR *+4 
OO FEBC BSR ャ エン 
RTS 
内 
Bo R CME16 LDB  #tsBO 
QR R CME2O LDR #SOR NT RERDY? 
Bo 人 BITB  #$BO 
COE FED3 ENE CME3O YES 
0C LDR #$0F SEEK ERR ロ R 
10 人 BITH  #$*10 
QB FED3 BNE CME3QO YES 
op R LDR #$OD CRF ERR ロ R? 
| 人 BITH  #S*OB 
02 FED3 BNE ” CME30 YES 
OF 人 CME25 LDR #SOF TIME HUER ERRCR 
01 CE30 SEC 
RTS 
* 
FED6 FRERDYERU  +* 
FED6 D6 18 R LDR DSTaT 
FEDB 54 LSRB RERDY ? FDC RERDY CHECK 
FED9 24 04 FEDF BCC YESRDY 
* FORCE INTERRUPT FDC NaT READY 
FEDB C6 DO に LDH #$DO FRCE INTERRUPT CMND 
FEDD DY 18 a STB DCMD 
* FDC READY 
FEDF 96 1H R YESRDY LDR DDRTA 
FEE1 43 CMR 
FEE2 97 1B R STR DDaTA 
FEE4 BD  D2 FEBB BSR 。 CME15 
FEE6 91 1B a CMPR DDRTR 
FEEB 26 CD FEBT BNE CME11 
FEEA CE 5O0O 8a LDU #$500O 
FEED 33 5F R RDYCHK LEAU  -1jU TIME ロ UT? 
FEEF 1183 OO00 Ra CTPU  #O 
FEF3 27 06 FEFB BE TIPQUT YES TIMEUT Z=1 ZERO 
FEF5 D6 18 R LDB DSTaT 
FEF7 2B F4 FEED BI RDYCHK  Z=O NON ZERQ SET 
FEF9 C6 0Q1 R LDB  #1 
FEFB 39 TinUT RTS 


re ッッ ャ DRIUE SELECT 
DRSEL EmU + 
*FDH MSKFIR FIRRIIRGI MRSK. (BZ/O1/20) 

LDB DDRIUE RERD CURRENT DRIVE 

STB DM ロ TnR 

RNDB  #$03 MSH=MHTHR FLRG 1= ロ N 0= ロ FF 

STB ERDRIU CURRENT DRIVE N ロ SET 

LDU #CURTRK CURRENT HEAD PHSITI ロ N SQUE PRER. 

LDa RCBUNT,X 

RNDR  #$03 DESTINRTIQN UNIT SELECT 

ST DSTDRU 

TsT DMnTnR MAS ロ N 

EMI MRSHN TES,IT MRS MIHT ロ R IN. 
* N ロ MT ロ R PUST BE ロ N RND MAIT 1 SEC RND CLERR THE TRACK PSITI ロ N SRVE 
ャ RER。 FRCE RESTURE RLL DRIUES 
* 


DUTCLR LDR も BO 


FEF ヒ に 


FEFE D6 1D 
FEEE,。EP FFE5 
FFO1 FE4 03 

FF03 FPP FFEO 
FFO6 CE FFE1 
FF09 6 07 

FFOH B4 03 

FFOD Hr FFE 
FF10 YD FFE5 
FF13 2H 17 FF2 


口 や や や や や や や や や や 


FF15 B6 BO 


FF1? 34 42 RESTLP PSHS 人 っ U DRIUE Nn SRVE. 

FF19 BD FE60 JSR RRESEN CRLL RESTHRE RIHUT INE. 
FF1C 35 42 FULS 朋 う U DRIVE NH FULL D ロ MIN 
FF1E 4 に TNCR 


FF1F B1 B4 
FF21 26 F4 FF3 


CMPR #$B4 RLL END ? 
BNE RESTLF _ NECHNTINUE 


や や や や や 


FF23 B6  FFEB Ra LDa DSTDRVu 
FF26 BR  BO ロ RR #$BO 
FFzB 97 1D a STR DDRIUE DESTINRTI ロ N DRIVE SET 
FFeA 20 09  FF35 BRA CHKRDY 
内 
FFeC B1 ”"FFEO MRSHN CMPR CRDRIU DESTINRTI ロ N=CURRENT ? 
FF2F 27  Q4  FF35 BERN CHKRDY YES 
FF31 BR  BO 人 ロ RR #$BO 
FF33 97 1D STR DDRIUE IT IS NnT SRNE.DRIUE REG SET 
* 
FF35 BD 9F FED6 CHKRDY BSR FRERDY READY CHECK 
FF3Y 27 "03  FF3C BER NTRDY NT READY 
FF39 1 ビ FE FLC N ロ RMaL 
FF3B 39 RTS 
* 
FF3 に 1 0Q1 NTRDY SEC NaT RERDY 
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リス ト 3 バブ ル ・ モ ー ド (BANK 1 ) ア セン ブル ・ リ スト 








FF3E 39 RTS 
+ 
FF3F R TM1S ERU * 1 SECHUND TIMER=985 
FF3F FE 03D9 人 LDU せ $03D9 
FF42 BD 0 ロ 9  FF4D TW1S5 BSR TI1m 
FF44 33 呈 R LERJ  -1:U 
FF46 1183 QoQo 3] CMFU  #O 
FF4R 26 _ F6  FF42 BNE TM15S5 
FF4F 39 RTS 
FF4D 10BE QQ99 R TMIM  LDY #$99 1 MS TIMER 
FF51 31 3F RTMIMW5 LERY 15Y DEF Y 
FF53 e6 FC  FF51 BNE TM1h5 
FF55 39 RT5 
FF56 34  Q4 R TeOM FPSHS 
FF5B C6 14 R LDB # ご 0 
FF5R BD  F1  FF4D TI2OLF BSR TmM1h 
| FF5C 5R DEFB 
| FF5D る FE  FF5R BNE TMeoLP 
| FF5F 35  B4 R FULS BiF に 
トト トト トト トト て トト トト 
] し: 
FF61 RR RDMRIT ERU * SEFTHR MRITE 
FF61 RR RDRERD ERU に 
FF61 BD FEYF 3] JSR SEEK DRIUE SELECT ,SEEk TRACK 


FF64 ご 5 FFCC 


BNE DRERD? 


FF66 1 人 50 2! FDE ISKFIR  IREsFIRR MRSK。 (BZ/01 /20 ) 。 
ャ 
FF68 RG6 06 1 LDR REBSIDsX 
| FF6R 4 Q1 R RNDR 1 GET UNIT 
FF6F 9 1 に R STa DSIDE 
FF6E RG 5 月 LDR REHSET 。X 
FPP 1 人 STa SECTR SECTIR SET 
FFY2_R6 B4 介 LDR RRINHsX RET RERIJEST NH 
FFY4 B1 QA 41 EPR #FDRERD DRERD 
FFY6 gm 18 FF30 HE DRERDX YES :BRRNCH DRERD) 
FFYB B6 RO 朋 LDR #$RO MRITE CIMRND SET 
FFYR_ 97 1 は | STR DCPD 
FFTE 1QRE 0g 1 LDY REBDER:X 
FF7F_R6 RO RR DMRIT1 LDR 05Y+ DRTR_RET 
FFB1 D6 1F R DMRIT2 LDE DDRRI DRR 
FFB3 2 04 FFB9 BFL DURIT5 NH 
FFB5 97 18B 朋 ST DDRTR DRTR STQRE 
FFB7 20 F6 FFF BRR DMRIT1 
FFB9 58 DMRIT5 SLB EXTRRCT CHWIRND END T ロ ISH 
FFBR ご F5 FFB1 EFL DMRIT2 
FFBE BD EF FF4D ESR TIM1I 
FFBE 8O 14 FFR4 ERR RMEND 
・ 
ドナ エナ エナ エエ ドド イミ エエ エト ミト エミ ミエ エエ ナミ ナナ エミ すす キャ す すす トキ キキ ミエ ナナオ: 
ャ 
FF20 R DRERDX EEU 宮 SECTHR_ READ 
FF90 B6 B0 人 LDR 0 RERD EPRND SET 
EPS る 中 診 18 人 STR DCID 
FF94 10RE 0g 人 LDY REBDEBRX 
FF97 D6 1F R DRERD1 LDE DDRGI DRSI 
FF99 2R 06 FFR1 BFL DRERDG 。NQ 
FF3H 96 1BH 1 LDR DDRTR LHRD DRTR 
FF3D RY RO 1 STR 0Y+ 
FF9F 2QO F6 FF97 ERR DRERD1 
* 
FFR1 5B DRERD5 RSLH EXTRRCT CMIRND END TH ISE 
FFR2 2 F3 FF37 BFL DRERD1 
FFR4 D6 18 R_ RMEND LDBE DSTRT ERRHR 
FFR6 26 0g FFRR BNE DRERD6 
FFRB 4F FLRR 
FFR9 39 RTS 
FFaR _B6 OR R DRERD6 LDR OR 
FFRC C5 B0 介 BITB #$BO NnT_ REDY 


FFRE 26 10  FFCO BNE DRERD 
FFBO 4F INCR *OB 
FFB1 CE 40 R BITH  #$40 MRITE PRQTECTED ? 
FFE3 26 OB  FFECO ENE DRERDY 
FFB5 4 に INCA *OE 
FFE6 C5 14 a BITB  #$14 REC ロ RD NT FnUNDrLnST DaTR ? 
FFBB 26  Q6  FFCO ENE DRERD" 
FFBR 4 に INCR *OD CRF ERRHR 
FFEB C5 CB Ra BEITH  #$QB 
FFBD 6  O1  FFECO ENE DRERD 
FFEF 4 に INCR *OE DELETED DRTR MRK DETECTED 
FFEO 1 0O1 DRERD7 SEC SET CRRY FR DRSEL ERR ロ R INTERFRCE 
FFC2 39 RTS 
+ 
FFC3 3B NrIIRTI RTI Dn NnTHING 
* BHT RC END DDRESG=$FFDF 
FFFE RG *FFFE 
FFFE FEoO  R FDE EnTENT BnnT ENTRY RaDDRESS 
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時 時 4 DOS モード (BANK2) ア セン ブル ・ リ スト 


FEoo ロ RG s*FEoo 





TTL 呈 INEH HIS MHDE(NH. ご ) EHHTSTRRF_ LHDER (BZ 03 Q1). 


Pa 












FEQQ R BHTENT EGRU * 呈 INEH HIS CDE. 
FEQO 2Q 09 FEQOB BRR STaRTS 
FCF R BHTSTK. ERIU 
| 0300 内 IFLRDR ERU | 
| FEQ2 YE FE6BH R RESTHR JIPF' 
FEO55 YE RTS R DMRITE JP 9 
FEOB "YE FFP1 R DRERD JP RDRERD 
] FEQB R STRRTS ERMU に 
FEOB に に FFD3 介 LDD #NMIRTI NMI VECTQR SET. 
FEQE FD FFF に R STD FNII 
FE11 B6 FD は 1 LDR #$FD 
FE13 1F BB 41 TFR RDF' DIRE に ET FRGE=FD. . 
FE15 R DISkV ERU * TRY TH RERD IFL EDE. 
10EE FCTF 41 LDS #BHITSTk | 
96 05 R LDR SESHUT 
44 < 
と に] g| FE4D FDERR 
BE FES3 R LDX #HHTRCE REH _RDDRESS FHR BT. 
BD 109 FE33 BSR DRERDZ _ FLIFPFY RERD RCUTINE. 
4D TSTR RNY ERRR " 
g| と Ya FE4D BNE FDERI 
BE FESB 朋 LDX #BHITR に に 
BD QB FE33 HGR DRERDZ 
4D TSTR RNY ERRHR 
記 1F FE4D BNE FDERR 
1F BB 1 TFR RDFP' DF=Q 
YE 0300 は 1 JIP' IPLRDR 
FE33 R DRERDZ ERU * 5 TIMES RETRY. 
FE33 CE6 05 R LDE 5 
FE35 34 04 RR XXRERD PSHS RE 
FE37 BD 5F FEQB IGR DRERD 
FE39 5 04 は 1 FULS HB 
FE3H 4D STR 
1 FES じ る 7 03 FE41 BE XXRTS 
FE3E SR DECB 
FE3F" 26 01 FE42 BNE ZXRTRY 
FE41 39 XXRTS RTS 
N 
FE42 R ZXRTRY ERU に 
FE42 34 14 RR FSHS X ゝ 日 
FE44 BE FE63 41 LDX ##RETRCB 
FE47P BD E9 FEQg BSR REST ロ R 
FE49 35 14 1 FULS Xi 
FE4B_ 20 EB PE ちら BRR XXREARD 


* 
FE4D 86 B1 R FDERR LDR #$ 日 1 
FE4F 37 03 R STR EELL 
FE51 20 FE FE ぇ ERR * 


* 
BHTRCE ERU 旧 








FE53 介 
FE53 OR は ! FCB FDRERD  RRNO 
FE54 0 朋 FCB 9 STRTU5 
FE55 0300 R FDB IFLRDR DRTR STHRE RDDRESGS、 
| FE5" 00 人 回 TRRCK 
FESB 01 人 R 1 SECTHR=1 
FE QO 代 0 5IDE=Q 
FESR 0O R 0 UNIT=0 
* 
FESB R BHTREC ERMU La 
FES5B QR 1 剛 FDRERD RENO SET. 
FE5C QO 8 FCB 0 STRTUGS. 
FESD 0400 R FDB IFLRDR+$100 DRTR STIRE RDDRESS. 
FESF QO 人 FCBE 0 TRRCK:=0 
FE60 02 R FCE 用 SECTHR=2 
FE61 00 人 FCB 0 IDE=Q 
FE62 00 R FCB 9 UNIT=O 
* 
FE63 OB RR RETRCB FCB FDREST 
FEG64 QQOQOO 1 FDB Ox00 
FE66 介 
FEG6B R 
FE6R 朋 FCBE 0 UNIT=0O 
TTL INEH FD DRIVUER IDULE(F-BNSI に : RHM-BRSED MHDE. ) 
で で です で エエ エエ エエ エエ エエ エエ テア エエ エエ よさ トト よ エエ イエイ エエ エト 
ャ 
*r*rr TYPE 1 CHMMRND 
内 
FE6E R_RRESTR ERU キ SEEK TRRCK 0。 
FE6E CE PF ビ 3 は 1 LDU #CURTRK 
FE6E R6  Qr R LDR RCBUNT・X 


* HUG に HRRE に TIHN ご ーー〉> 25 VERSIHN BZ01/11 SHUREE UPDRTE. 








FEYQ R_RRESEN ERU * RRESEN LREEL FTHIGITIIN MRS CHRRECETED. ELR RU 一 > RNDR #$03. 
FEYQ_B4 03 は] RNDR #03 UNIT SELECT- 
FEY2 6F E6 介 FLR RsU TRREK、 DDRESS 0 SET. 
FEY4 _D6 1D 3! LDBE DDRIVUE 
FEY6 BR BO 人 R HRR #$ も 0 
FE7YB 37 1D 2] 5TR DDRIUE 
FE _BD 4 に FECB BSR CME15 
FEYE 96 1D 人 LDR DDRIUE 
FEYE ZN 4D FECD BEFL CME16 
FEBQ SD TSTB 
FEB1 2B QB FEBBH EYI Z1000 
FEB3 B6 ge 月 LDR ご 
FEB5 BD FF4F R Z5QQO JSR TIM15 
FEBB 4 人 DEFS 
FEB9 26 FR FEB5 BNE Z5QO0 
FEBH _B6 GR R Z1000 LDR OR RESTHRE EHPYIRND (いり =0)) 
FEBD 2O 1 FER9 BRR CPMEXEL BRRNCH CHIMYRND EXEEUTIHN 
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リス ト 4 DOS モード (BANK 2 ) ア セン プル ・ リ スト 





FEBF 
ES 過 
FE33 
FE96 
FE39 
FE9H 97 
FE9D 
FE9F 
FER1 27 
FER3 7 
FER5 97 
FERP 


FER9 97 
B6 


4 人 


っ の 
に 4 


10BE 
31 


っ の 
g7 


De 
C5 
FERC 2 
D6 


ED 


C5 
26 
4F 
BD 
BD 
F 39 





E6 
B6 
FE5 
26 
86 
E5 
FED9 26 
B6 
E5 
FEDF 26 
B6 
1R 
39 


D6 
FEEB 54 
FEE9 2 


FE6 
D? 


36 
43 
6 記 
BD 
1 
FEFB 82 

CE 


11 昌 3 
@? 
D6 
2B 
E6 
39 


FFOE De6 
FFOE FY 
FF11 CE4 
FF13 FY 
FF16 CE 
FF19 6 
FF1B B4 
FF1D BY 
FF2O_?D 
FF23 2H 


FF25 
FF2P 
FF29 
FF2E 
FF2E 
FF2F 
FF31 


6 
34 
BD 
35 
4 に 
B1 
26 


FF コ 3 
FF36 
FF38 
FF3a 


Be 
BR 
9? 
20 


FF3C 
FF3F 
FF41 
FF43 


B1 
2? 
BR 
97 





FEBF 
7B 
1 
FFE1 
FFEB 
ES5 
19 
Q4 
E5 
24 
5 
1H 
1E 


FER9 
18 
03 


31 
FEBO0 
3F 
F5 


1F 
40 
F6 
18 


FF66 


18 
OB 


0g 
00 


0 
OR 
0 
OE 
QE 
10 
QB 
0D 
QB 
02 
QF 
Q1 


FEE6 
18 


Q4 


DO 
18 


1BH 


1B 
Dz 
1H 
ED 
5QQQ 
5F 
OQ0QQO 
Q6 
18 
F4 
01 


FFOE 


1D 
FFE5 
03 
FFEO 
FFE1 
rd 
03 
FFEH 
FFE5 
17 


B0 
42 
FEYQ 
42 


4 
F4 


FFE 晶 
B0 
1D 
09 


FFEQ 
04 
B0 
1D 





門 


R SEEK 。 ERU  * 
FFQF ISR DRSEL 
FECD BES CME16 
還 LDU #CURTRK 
R LDBE DSTDRu 
A LDR BiU 
人 STA DTRRCk 
A LDR RCBTRKx 
人 CFPR BU 
FEC マ EER CME11 
R STA BuU 
R STR DDaTA 
R LDR  #SIE 
内 
・ 
R CMEXEF EBU  * 
R STR DcmD 
LDR #3 
内 
CE0z DECA 
FEE1 BE CME25 
R ENEO5 LDY #sCBOO 
R CME1O LERY 。 -1Y 
FEAD EER CNEOz 
* 
R LDE DDRR 
Ra BITB  #*40 
FEB4 BE CME10 
R LDB DSTaT 
由 
人 JSR TMaom 
円 
R BITB  #s18 
FECF BNE CME2Q 
CNE11 FLRR 
BSR *+4 
FECC BSR FE 
RTS 
内 
R CME16 LDB  #*BO 
R CME2O LDR #$OR 
R BITB  #$BO 
FEE3 ENE CME3O 
R LDR  #5OC 
R BITB  #s10 
FEE3 ENE CME3Q 
R LDR #sOD 
RA BITE  #$OB 
FEE3 BNE CME3O 
R CE25 LDR ##5OF 
FE30 SEC 
RTS 
* 
R FRERDY ERU  * 
LDE DSTaT 
LSRB 
FEEF BCF YESRDY 
・ FnRCE INTERRUFT FDC 
R LDB #sDQO 
R STB DCWD 
・ FDC RERDY 
R YESRDY LDR DDaTA 
EnWR 
R STR DDaTA 
FECB BSR 。 CME15 
R EPR DDRTR 
FECT BNE CME11 
R LDU #s5Q0O 
人 RDYCHK LERU  -1:U 
還 CfFU  #Q 
FFOB EER TIM ロ UT 
還 LDB DSTRT 
FEFD BI RDYCHK 
a LDE #1 
TIMnUT RTS . 
*rrwrrr DRIUE SELECT 
R DRSEL ERU  * 
*FDE PSKFIRI FIRGIRG 
R LDE DDRIVE 
R STB DPQTOR 
R RNDH  #$03 
R STE CRDRIO 
人 LDU #CURTRK 
R LDR RCBUNT, 
R RNDR  #$03 
人 STR DSTDRV 
a TST DMTOR 
FF3C BI MRSN 
・ Nn,M ロ TnR MUST BE ロ N 
* RER. FIRCE RESTURE 
人 DUTCLR LDR #$BO 
R RESTLP PSHS arU 
R SR RRESEN 
R PULS axU 
INCR 
R CPPR 。 #sB4 
FFaT BNE RESTLP 
> 
a LDR DSTDRV 
人 ロ RR #$BO 
Ra STR DDRIVE 
FF45 BRR CHKRDY 
内 
R MRSDN CPPR CRDRIU 
FF45 BER CHKRDY 
人 ロ RR #$BO 
Ra STA DDRIVE 


SEEK TRRCk 
DRIUE SELECT 


X DESTINRTIN TRRCK: LHRD. 


NHN SEEk。 RCETIIN 

NEM TRRCK。RDDRESS SET 
TRRCEK。 NH _IN DRTR REG 
SEEK に HMIRND SET ( り =1) 








CRND EXECUTIHN 
CPMRND STURE 


TIME ロ UER ? 
YES。TIPE VER. 
RBUT 1.4 SECnND 


RERD DRG:IRE 
IRSIRERI ? 
BUSY。LUO ロ PF 
IKE SURE 


CRE。SEEK ERRR 
ERRR HEEURED 


NT _RERDY ? 


YES 
SEEK ERRHR 


YES 
CRE ERRHR ? 


YES 


TIIME HUER ERRIHR 


RERDY ? FDC RERDY CHECK.。 
NHT RERDY. 


FIRCE INTERRUPT に HIIYRND. 


TIME Q ロ UT ? 


YES TIMEHUT Z=1 ZERQ. 


Z=0 NHN ZER ロ SET. 


ISK. (2Z01/ ご 0) 。 
RERD CURRENT DRIUE- 


ISB=IMITHR FLRG 1=HN 0= ロ FF. 
EURRENT DRIVE NC SET. 

CURRENT HERD PHSITI ロ IN SRVUE RRER 
X 

DESTINRTIIN UNIT SELECT. 


MAS _ ロ N 

TES,IT MRS MTR IN. 

RND MRIT 1 SEF RND CLEAR THE TRRCK PHSITI ロ N 
RLL DRIUES. 


DRIUE NQ SRVE 
ERLL RESTHRE RUT INE 
DRIUE NH FULL DQMN. 


RLL END ? 
NEHNT INUE. 


DESTINRTI ロ N DRIVE SET. 


DESTINRT IN=CEURRENT 
YES 


IT IS NnT SRNE. DRIUE REG SET. 


SRVE 
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リス ト 4 DOS モード (BANK 2 ) ア セン ブル ・ リ スト 








FF45 
FF47 
FF49 
FF4B 


FF4C 
FF4E 


FF4F 
FF5g 
FF54 
FF56 
FFS5R 
FF5C 


FF5D 
FF61 
FF63 
FF65 


FF66 
FF6B 
FF6A 
FF6C 
FF6D 
FFGF 


FFY1 
FFY4 


FFY6 


FFYB 
FF7R 
FFYC 
FFYE 
FFBO 
FFB2 
FFB4 
FFB6 
FFBB 
FFBR 
FFBC 
FFBF 
FF91 
FF93 
FF95 
FF9 


FF99 
FF9R 
FF9C 
FF9E 


FFRO 
FFR2 
FFR4 
FFRP 
FF9 
FFRBE 
FFRD 
FFRF 


FFB1 
FFEZ 
FFB4 
FFBG6 
FFEB 
FFB9 


FFEA 
FFBC 
FFBE 
FFCO 
た FE1 
FFC3 
FFC5 
FFC6 
FFCB 
FFCR 
FFCB 
FFCD 
FFCF 
FFDO 
FFDz 


FFD3 


FFFE 
FFFE 


BD 
2? 
1 に 
39 


1R 
39 


EE 
8BD 
33 
11B3 
26 
39 


10BE 
31 
26 
39 


34 
C6 
BD 
SR 
26 
35 


BD 
26 


R6 
4 
に YA 
R6 
97? 
R6 
B1 
2? 
B6 
97 
1Q0RE 
R6 
D6 


る 
97? 
20 


5B 
gR 
BD 
20 


Be 
に Ya 
108E 
D6 
2R 
396 
87 
20 


5B 
28 
pe 
26 
4F 
39 


B6 
E5 
26 
4 に 
に 5 
26 
4 に 
じ 5 
26 
4 に 
C5 
26 
4 ヒ 
1 
39 


3H 


9F 
03 
FE 


01 


FF4F 
03D9 
09 
SF 
pooo 
F6 


0099 
3F 
FE 


04 
14 
F1 


FBH 
B4 


FFY1 
FFY1 
FEBF 
5A 


1R50 


06 
01 
1 に 
05 
1 
8B4 
OR 
1 日 
RO 
1 
082 
RO 
1F 
04 
1H 
F6 


F5 
BF 
14 


FFRO 
0 
18 
082 
1F 
06 
1B 
RO 
F6 


F3 
18 


08g 


OR 
BO 
10 


40 
QB 


14 
06 


QB 
01 


01 


FEQ0O 


FEE6 
FF4C 


ご や や や 


ユ 
所 
や や や や や ご や や や や や や や や 


FF91 
FF5D 
FFB4 


や や や や や 


FFB1 


や や 


FFRY 


FFA7 


FFHR 


FFDQ 
FFDO 

代 
FFDO 


月 
FFDO 


人身 


+ 

CHKRDY BSR 
BE 
CLC 
RTS 

= 

N ロ TRDY SE 
RTS 

内 

Tn1S  EgU 
LDU 

T1S5 BSR 
LEAU 
CPU 
BNE 
RTS 


TM1N LDY 

TIM1M5 LERY 
BNE 
RTS 

ャ 

TI2OI1 PSHS 
LDB 

TM20LP BSR 
DECB 
BNE 
PULS 


FRERDY RERDY CHECK< 
NTRDY NT RERDY 


NRIRL 
NT RERDY. 
* 1 SECOUUND TIIWER=985 
#$03D9 
TM1N 
ー1U 
#0 
TM1S5 


#$99 1 MS TIMER. 
pyY DEC Y 
TI1I5 


H 
#20 
TM1I 


TIM2OLP 
BF ビ 


トド エエ エエ エエ エエ エエ エエ エナ エエ エエ エエ エエ エエ エエ エエ エエ エエ エエ エコ 


RDMRIT EGU 
RDRERD ERU 
JSR 
BNE 


FDB 


LDR 
RNDR 
STA 
LDR 
STR 
LDR 
CMPR 
BE 
LDR 
STR 
LDY 
DMRIT1 LDR 
DMRIT2 LDB 
BPL 
STR 
BRR 


DMRIT5 RSLBH 
BFL 
BSR 
BRR 


* 


ャ 
DRERDX EEU 
LDR 
STR 
LDY 
DRERD1 LDB 
BFL 
LDR 
STR 
BRR 


DREADS RSLE 
BFL 

RMEND LDBE 
BNE 
CLRR 
RTS 

ャ 

DRERD6 LDR 
BITB 
BNE 
INCR 
BITB 
BNE 


* SECTQR MRITE. 

由 

SEEK DRIUE SELECT SEEK TRRCK 
DRERD? 


MSKFIQ  IRRxFIRR MRSK. (B2/01/20 ) 。 


RCBSIDX 

#1 ET UNIT. 

DSIDE 

RCHSCT 。X 

DSECTR SECTQR SET 

RRNHsX RET RERUEST NGCL 
#FDRERD DRERD ? 

DRERDX YES ・BRRNCH_DRERD. 
#$RO MRITE C ロ IND SET 
DCPD 

RCBDBR・X 

0:Y+ DRTR GET 

DDREI DR ? 


DMRIT5S Ni 
DDRTR DRTR ST ロ RE 
DMRIT1 
EXTRRCT C ロ IMRND END TH IMRSB, 
DMRIT2 
TIM1I 
RMEND 
ドミ エナ エエ エエ エエ エエ ナナ ドナ エエ ナオ エナ エナ エエ エエ エエ エエ ナナ エエ エエ エエ エナ エナ] 
* SECTQR RERD 
日 0 RERD CMIRND SET 
DCMD 
REBDBRX 
DDRRI DR 
DRERDG NG 
DDRTR LRD DRTR 
0Y+ 
DRERD1 
EXTRRCT CMRND END Tn IMSB 
DRERD1 
DSTRT ERR ロ R ? 
DRERD6 
OR 
#$B0 NT RERDY 
DRERD 
OH 
も 40 MRITE FRHTEETED ? 
DRERDY 
0C 


INCR 
BITB 
BNE 
TNC 
BITH 
BNE 
INCR 
DRERD7 SEC 
RTS 
に 


NMIRTI RTI 


14 RECEHRD NT FQUND,L ロ ST DRTR ? 

DRERD? 
SOD CRC ERRODR ? 

#$0 日 

DRERD? 
SOE DELETED DRTR MRRK DETECTED 
SET CRRRY FUR DRSEL ERRIR INTERFRCE 


DC _NQTHING 


* BT RCM END DDRESS=*$FFDF 


* 
HRG 
FDB 


sFFFE 
BnTENT BT ENTRY DDRESS. 
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| FEoQ RG *FEOQ 
内 
TTL BB INCH 。 ロ S MDE(N ロ 3) BnnT STRRF LADER (BZ 03 <zO). 
円 
FEQOO BTENT ERU  * FN-B BT FRnGRAP ロ S PDE (N ロ 3) 
FEOO 2O 15 FE17 BRR STRRTS 
> 
O2EF R BHTSTK ERU *O2EF STRCK PHINTER SET 
Q3OO 人 IPLRDR ERU *0300 
OZFO 人 BHTRCH ERU $O2FO RCB DDRESS. 
FEO2 7E FEB2 R DRLOCK JWP RDRLOC DR LUCK (B INCH) 
FEO5 7YE FE97 Ra SETM ロ D JP RSETP PDE SET (B INCH) 
FEOB YE "FEB6  R DISK2 JWP RDISK2 DISK2 SENSE (B INCH) 
FEOH YE FEDC R RESTRB JPF RRESTX REST ロ RE (B INCH) 
FEOE TE FEF1 R MTSDEN JP RMTSDE SINGLE DENSITY SINGLE SECT ロ R MRITE (B INCH) 
FE11 YE "FEFR  R MTDDENJPIFP RMTDDE DnUBLE DENSITY SINGLE SECTOR MRITE (日 INCH) 
内 
| FE14 YE  FFD3  R DMRERRJMP XDMRER DMR DERDLQCK ERRR 
* 
FEOE R RDSDENERU MTSDEN SINGLE DENSITY SINGLE SECTR RERD (B 1INCH) 
FE11 R RDDDEN ERU MTDDEN DCUELE DENSITY SINGLE SECTUR RERD (日 INFH) 
+ 
FE17 Ra STRRTS ERU  * 
FE17 CE  FFDY 8a LDD #NMIRTI NMI UECTR SET 
FE1R FD  FFFC RA STD PFNMI 
FE1D B6  FD 人 LDR #tsFD 
FE1F 1F BB R TFR 。 RrDF DIRECT PRGE=FD 
* 
FE21 人 DISKU ESU  * TRY TO RERD IPL CODE 
FE21 10FE O2EF 8R LDS #BTSTK 
FE25 96 05 人 LDR SHS ロ UT 
FE27 44 LSRA 
FEz2B 25 4R FEY4 BCS FDERRX 
FE2R RFDBnnTERU  +* 
+ 
* 日 INEH FL ロ PFY INITIRLIZE 
* 
* IF THE FOMER ロ N RESET ロ R RESET SIGNRL CAUSE FD INITIRL SET ,THE F ロ LLCMING 
+ STEPS RRE NHT NECESSRRY FR THIS PR ロ GRRI. 
2 
・ LDD Ho INITIRLIZE C ロ MRND SET 
* LBSR RERSET 。 SELECT CPMRND REG 
FE2R 7F  FFE9  R ELR 。 LSIZE SECT ロ R LENGTH=12B BYTE 
* CaLL SETMQD 
内 
* LDX #SMDRCB 
* BSR RSETM ロ CaLL SETPM ロ D RUTINE 
ャ TSTA ERR ロ R CHECK 
* BNE FDERRX ERR ロ R ! 
* DR RERISTER INITIRL SET. 
内 
* RCR,ICR・DCR SET 
* LDa #ZOOO01000 PCR DRTR FRTRRN : CH3 TXEN3=1 
* STA DPCR PCRSET 
* LDR #%OO001000 DCR DRTR PATRR : 4 CHaNNEL PDE 
* STA DPQDCR 
* CLR DICR 。#XOQOOOOO00 RLL CHRNNEL IRE MASK.。 ICR SET 
内 
* TRACK_ 0,SECT ロ R 1 - 4,UNIT 0O,SIDE Q GET 
ャ 
FE2D BE  Q2FO 8R LDX #BHTRCB RCH RDDRESS FR EnT 
FE30 B6 =g a LDR  #34 BB INEH FLHFPY SINGLE DENSITY SECTHR RERD. 
FE32 7 8B4 A ST RRN ロ iX RERUEST 
] FE34 に に 0300 介 LDD #IPLRDR DMR _BUFFER RDDRESS SET. 
FE37 ED Cg R STD RCEDBR,X 
FE39 CE OoQ1 人 LDD #*QOO1 TRACK=0 SEFTR=1 
FE3C ED 04 人 R STD REBTRK:X TRREK SE に THR SET。 
* LDD #$0 SIDE=O UNIT=O 
FE3E 5F CLRB RSSUYE RCCR=O。CLERR RCCB, CC D = $OOQO 
FE3F ED 06 R STD RCBSID,X SIDE,UNIT SET 
内 
* FLnFFY DISK RERD ( 5 TIMES RETRY ) 
了 
FE41 R CNTRED ERU  +* 
FE41 C6 05 R LDR  #5 RETRY CUNT=5. 
FE43 34 14 介 XXRERD PSHS BuX 
FE45 BD ” CY FEOE ISR RDSDEN に RLL SINGLE DENSITY SECT ロ R RERD. 
FE47 35 14 財 FULS BuX 
FE49 4D TSTa N ロ RMRL ? 
FE4R 2?Y 13 FE5F EER RERD ロ K YES NRRL 
FE4F B1  QC a CMPR  #12 FLHPFY HRRD ERRR マ 
FE4E 26 24 FE74 NE ” FDERRX NN RECHUERBLE ERRUR 
e 
* ERR ロ R CCURED 
了 








| FE5O 5a DECB 





318 


1O 


リス ト 5 8'DOS モ ー ド (BANK 3 ) ア セン ブル ・ リ スト 


























FES3 27 @1 FE74 BER FDERRX ERRHR_RETURN. RETRY CHUNT HUER 
内 
* 。 EXECUTE RETRY 
ャ 
FE53 34 14 人 FSHS BX 
FE5S BE FEYR 人 LDX RETRCB 
FES5B 1 OOB1 FED に LESR RRESTX CRLL RESTHRE 日 INCH 
FES5H 35 14 に は] PULS BX 
FE5D 20 E4 FE43 BRR XXRERD 
FESF R RERDHk ERU La 
FE5F EE 0g R LDD RCEBDBRX 
FE61 に 3 OOBO 人 RDDD # せ 12 日 RDD SECTHR LENGTH, 
FE64 ED 02 朋 STD RCBDBRX 
FE66 6 に 05 R INC RCEBSCT,X SECTHR=SEFTIR+1 
FE6B _E6 05 は | LDB RCBSETX 
FE6R に 1 05 R CIFB # ら 5 SECTHR_ 12:354 RERD 
FE6 に 25 D3 FE41 BL ロ ENTRED CHNTINUE 
FE6E 4F ELRR 
FE6F 1F BB 1 TFR RxDP DF=Q 
FEY1 YE 0300 R JIP IPLRDR 
FEY4 R FDERRX ERU * 
FEY4 ヨ 6 1 Ra LDR $ 日 1 FD ERRIR. 
FEY6 97 03 人 STR BELL LET RING RN RLRRIY 
FE7B 20 FE FE 日 BRR キ SnFT HRLT. 
ャ 
素 SP に に ) 
*IDRCH FCH 29 REN ロ =29 : SETIM ロ D 
介 FCBE 0 5TRTU5 
* FCBH 1 FRE HNE TRRCk、RERD IDE 
* FCBE 0 12B / SECTIR 
ャ 
FEYR R_ RETRCE FCH に 1 INCH RESTHRE RERUEST NQ. 
FEYB 人 FDB 0x00 
FEYD は | 
FEYF R 
FEB1 1 FCB 0 UNIT 0 
TTL B INCH FD DRIUER PMIDULE.(R FRRT ロ F HIS)(B2 03 20) 
に 
**w 日 INEH FL ロ FPY DISK DRIUER IIHDULE. 
ャ 
* RERISTER DESCRIPTI ロ N 
ャ 
* (MRITE) 
* _RRR ERU 5FD3O) RERISTER RESERVUE REGISTER 
* RDR ERU_RRR+1 REGISTER DRTR REGISTER. 
* MDR ERU_RRR+ ど DRTR RERISTER. 
* 。。。 ERU_RRR+3 RESERUED. 
内 
* (RERD ) 
w* SSR ERU_RRR+Q0 IFDC SYSTEM STRTUS_ REGISTER. る 
* FSR ERIU_RRR+1 FD に (MEBB ヨ 66 ロ R_ MEBB76) STRTUG REGISTER 
* RER ERU_RRR+2 DRTR_REGRISTER. 
* 。。。 ERIU_RRR+ コ RESERUED 
円 
* IFD に SYSTEIY STRTUS REGISTER. 
* B7: IFDC REDY 
* B6-H5: RESERUED 
* B4: TRRNSFER RCKNHMLEDE 
* 3: DMR _ERRHR 
* B2: DRTR ERRIR 
* B1: に EHPMPIRND ERRIR 
* BO: FDD ERRHR 
ネ 
* (IFDE 1NTERNRL_ REGISTER ) 
に 
0000 R CPMDREG ERU 0 FRND_ REGISTER 
OOO1 R TRKIRER ERU 1 TRRCK: REGISTER 
QO02 R SSREG ERU ご SECTIR STRRT_ REGISTER 
OQ003 R SEREG ERU き 3 SE に CTHR END REGISTER 
0004 RR SIDREG ERU 4 SIDE REGISTER 
Q0005 R DNSREG ERU 号 DENSITY REGISTER 
QOQ06 R DRUREG ERU 6 DRIVUE REGRISTER 
R DLEREG ERU Me DERR LHCEK。 RERISTER 
骨 ERESET ERU B ERRHR_RESET 
0009 RR SF ロ IRMT ERU 9 SECTHR _ FIRMRT DRTR 
QOOR 内 SECEDRT EgU 10 SECETIR LENGTH DRTR 
OOOB R MHDREG ERU よる IDE SET REGISTER 
由 
* (SECETHR LENGTH) 
キ 51INGLE DUELE 
* 0 * 12BZ2ZE 。 | 、。、、 ビ ュ ュ デー ラド 
* キ 1 s 256/15 256/26 
9 512/ 晶 1 と /15 
3 ー ニー ジ ーー ビー 1024/8 
w 
トナ すす で す エエ す エト エ す すす すす エエ す すす すす キャ すす エト す すす すす すす 
* (IFD に EHPMMYRND DESCERTFTI ロ N) 
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内 





ooo0o 。。 ZINIT EmU  o IFDC INITIQLIZE 
Qoo1 人 ZFnRMT ERU 1 MRKE SHFT SECTHR FORMRT 
QO02 ZSEEK EmU っ 2 SEEK TRACK 
oo003  zZL ロ RD EmU 3 RERD SECTHR (FLHPPY --〉 IFDC BUFFER) 
OO4 ZSRUE EsU 4 MRITE SECT ロ R(FLHPPY <-- IFDC BUFFER) 
oO05 。 人 ZRERDF ERU 5 DRTR GET(FRHGRRP TRRNSFER ) FMB <-- IFDC 
oo06 R ZMRITP ERU 6 DRTR PUT(FRHGRRM TRRNSFER) FMB --) IFDF 
OOo0Y 人 ZRERDD ERU ゃ DaTR BET(DMR TRRNSFER) FMB <-- IFDC 
OOOB Ra ZMRITD ERU  B 晶 DaTR FUT(DYR TRRNSFER) FIB --〉 IFDC 
CO09  。 R ZLDRDF EsU 9 DIRECT RERD SECT ロ R (PRnGRRT) FMB <-- FLFPY 
OOOR 人 ZMTSUF ERU 1o DIRECT MRITE SECT ロ R(PR ロ GRRY) FMB --> FLFFY 
ooOH a ZLDRDD EsU 11 DIRECT RERD SECTR (DMR) FMB <-- FLIFPY 
OOOE a ZMTSUD ERU 12 DIRECT MRITE SECT ロ R(DIYR) FMB --〉 FLHPFY 
OOOD RFDTEST ERU 13 FLOFPY DISK SEEK TRACK ロ PERRTIUN. 
夫 
oooQ 。 人 SINGLE ERU  Q SINGLE DENSITY 
Qoo1 人 DUELE ERU 1 DnUBLE DENSTTY 
了 
OO03 人 DMRMTP ERU OOQOQ0011 HALT BRSTE MHDE, DDRESG=DDRESS+1,MEPYHRY TH I/ ロ 
OOO2 Ra DMRDF ERU を 00Q000010 * rT/ ロ Tn MEM ロ RY 
内 
+ DH ロ R LnCK RIUTINE(B INCH FL ロ PPY ) 
w 
FEB2 RIRDRLIC ERU  +* 
* LESR SPACT STRCK FIINTER SRUE & IFDC RCTIUE CHECK 
FEB2 10FF FFER  R STS SPSRUE STRCK P ロ INTER SRUE 
FEB6 R6 Or a LDR RCBUNT,X GET UNIT NG 
FEBB_B4 03 RNDR  #03 H7-B2 CLERR 
内 
FEBR 6D oz R TST RCBLOC,X DR LCK ? 
FEBC 2 02 FE9O BER DRQPEN N ロ ,DnnR UNLnCk 


w 


FEBE BR B0 人 HRR #$B0 YE5DHR LHCK. 
FE90 C6 OP RR DRH ロ PEN LDH #DLCEREG SELECT DIR LHCK REGISTER, 
FE92 1? OOF4 FFB9 LBSR REGSET 
FE95 4F ELRR NORIRL RETURN 
FE96 39 XXRTS RTS 
1 


* RERD PIDE SET RUUTINE(B INCH FLOFPFY ) 


w 
FE9? R RSETIMU ERU * 

キ LBSR  SPRCT STRCEK PHINTER SRVUE & IFDC RETIVE に HECK. 
ャ 

FE97 10FF FFEAR 人 STS SFPSRUE STRCK PHINTER SRVE 

FE3E 6 02 1 LDR RCBIIHD,X 

FE3D B1 FF 1 FMPR #$FF MHDE SET ? 

FE9F ど 05 FER6 BE SETLN NH:DIN*T SET THE MDE 


3 


* FLHPFY DISk: RERD IDE SET 


1 


FER1 C6 OB | LDE #MHIDREGR SELEET MDE SET REGISTER. 
FER3 17 OOE3 FFB9 LBSR REGSET 
FER6 R SETLN EGU SECTHR LENBTH SET 
FER6 RG 03 は 1 LDR RCBSLN,X 
FERB _B1 FF 1 CMFR #$FF SECTHR_ LENGTH SET 
FERR を? Q8 FEB4 BE SETRTS NH ロ :DHN*T SET THE MDE 


3 


* FLHPPY DISK SECTHR LENGTH SET 


キャ 


FERC C6 OR 人 LDH #SECDRT _ SELECT SECTHR REGISTER 

FERE 17 OODB FFB9 LBSR REGSET 

FEB1 Br FFE9 R STR LSIZE SECTIR LENGTH MEI _RRER. USE RT RERD/MRITE. 
FEB4 4F SETRTS ELRR NHRIRL RETURN 

FEE5 39 RTS 


1 


* DISK2 SENSE RIUTINE(B INCH FLUPPY) 


3 





FEB6 R RDISK2 EQU * 
・ LBSR SPACT STACK PINTER SRUE & IFDC ACTIUE CHECK 
FEB6 10FF FFEA Ra STS 。SPSRUE STRCK PHINTER SRVE 
FEBR R6 0O7 R LDR RCBUNTX GET UNIT NQ 
FEBC B4 03 R RNDR  #$O3 HB7-BZ CLEAR 
FEBE BR 40 人 RR #$40  。 D ロ ロ R ロ PEN/CLOSE BIT INHIBIT 
FECO C6 0 R LDB #DLCREG SELECT DR LHCK REGISTER 
FEC2 17 00OC4 FFB9 LBSR REGSET 
* 
FEC5 96 31 R LDR  FSR 
* 
FECY E6 07 R LDB RCBUNT:X 
FEC9 CE4 03 R RNDE  #$03 BY-B2 CLERR. 
FECB C1 03 人 RDLIF CMPB  #3 
FECD 2Y  Q4 FED3 BER DK2BIT 
FECF 4 LSLA 
FEDO 5C INCB 
FED1 20  FB FECB BRR RDLnnP 
ゅ 
FED3 5F DK2BIT CLRB RSSUME DISK っ 
FED4 4D TSTa DISK 2 ? 
FED5S 2R  Q1 FEDB BPL FLGSET YES DISK る 
FED 5C INCB Nn、NHT DISK 2 
FEDB EY oe R FLGSET STH RCBDK2,X MEDIR FLRG SET 
FEDR 4F CLRA 
FEDE 39 5 RTS 
+ REST ロ RE (SEEK TRRCK Q) RUTINE (B INEH FLFPY ) 
ゅ 
FEDC R RRESTX ERU ・ ま 
+ LBSR SPACT STRCK P ロ INTER SRUE & IFDC RCTIUE CHECK 
FEDC 10FF FFER Ra STS ”。 SPSRUE STACK P ロ INTER SRUE. e 
FEEO 6  Q" LDR RCBUNT,X UNIT Nn SET 
FEE2 C6 CO6 a LDE #DRUREG 
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FEE4 1 OO FFB9 LBSR REGSET 
* MHEN SEEK TRRCK 15 EXECUTED MITH UERIFY。THIS FEHDING 15 ESSENTIRL 
* ELRR DENSITY=Q 
キャ LDB せ DNSREG 
し LESR REGSET 
FEEY F に 人 LDD #0*256+TRkREG TRRCK NH=O:TRREK。 RERISTER SELECT 
FEER 1 FFB9 LBSR REGSET SEEK TRRCK 0 
FEED B6 人 LDR #Z5EEK 
FEEF 20 如 | FF1E BRR ENTRST 
* SINBLE DENSITY SECETIR MRITE (B INEH FLQFPFY) 
FEF1 R_ RMTSDE ERU ャ * 
し BSR SFRCT STRCK。FHINTER SRUE & IFD に RETIUE に HELK.- 
FEF1 10FF FFER 3! 5T5 SFSRUE STRCK、PHINTER GRUE。 
FEFB お の QOB4 FFY に LBSR STSDEN SET SINGLE DENSITY. . 
FEFB 2Q 06 FFQ0Q0 BRR MTE ロ PIN BRRNEH MRITE SECTHR CIMN PRHGRRI 


ャ 
* D ロ UELE DENSITY SECTIR MRITE (B INCH FL ロ PPY ) 


ネ 


FEFR R RMTDDE ERU に 





3 BSR SFPRCT STRCK PHINTER SRUE & IFDC RETIUE に HECK: 
10FF FFER 介 STS SF'SRUE STRCEK. PHINTER SRUE 
BD ?F FFYF BSR STDDEN SET DHUELE DENSITY 
BD 61 FF63 MTEHIN BSR PRRSET SET DISK PRRRIETER 
8BD 由 FF3g SR SETDIMR DMR _RDDRESS & CHUNTS SET & IRRxFIRGI IMRSK、 
ャ 
R6 LDR RRNHxX ET RERUEST NG 
5 日 1 EPR #10 5 INEH FLHFFY SEETHR_RERD 『 
27 BE REDCIMD YES 
1 CEIFR 34 日 INEH FLHFFY 弓 INBLE DENSITY SECTIR RERD " 
に Je BER REDCYD YES 
1 EMFR # コ 5 B INEH FLHPPY DHUBLE DENSITY SEFTCIR_RERD 
1g BE REDCMD YES 
* 
* MRITE SECTIR ( RERNH=9.32 HR 33 ) 
* 
FF12 CE6 03 1 LDE #DRMTF DMR CHNTRHL REGRISTER SET 
キ STR に 3EHCR MEMRY TH LIZ ロ 
FF14 8B6 OF は ] LDR #ZMTSUD DIRECT MRITE SECTIR CHIMRND (DR) 
FF16 2QO 94 FF 1 に BRR DIRENE _ BRRNEH DR _ENRELE 


* RERD SEETHR ( RRN ロ =1034 nHR 35 ) 


3 





























FF18 R REDCPD ERU ま 
FF1 ヨ C6 0 ご 41 LDB #DRRDF DR CHNTRHL _ REGRISTER SET 
STR に 3 に HER 1/Z ロ TH MEIPRY 
mw 
FF1R _B6 1 41 LDR #ZLDRDD DIRECT RERD SECTIR ECIMRND (DIR) 
FEF1E 9 る らき RR DMRENB STE に 3 に CHCR 
FF1E 5F ENTRST CLRE SELECT FIND REGISTER. 
FF1F 97 31 R STR RDR FnRND SET. 
FRFZ21 DD7 30 1 STB RRR DR _ STRRT. 
* DR STRRT NEED 10 ICERH SE に 
+ 
FF23 96 30 DSCEk。 LDR SSR ET IFDC SYSTEI STRTUS _ REGISTER. 
FF2G 2 F に FF23 BI DSCK 。 MRIT FHR IFDL BUSY、 
* 
FF2T 96 30 内 MTDL ロ F LDR SSR RET IFDC SYSTEM STRTUS_ REGISTER 
PP る 9. る FC FF2Y BFL MTDLHF IF BUSY:BRRNEH MTDLI ロ PF'- 
+ 
し LDR SSR GET STaTU5 
FF2H B4 QF 介 RNDR #%QOOO0O1111 RNY ERRHR 
FF2D 1026 00B7 FFBEB LENE ERRHRF YES,」 ERRHR _HCEURED. 
* ELRR FHR_ DMR_ END NIRIRL__ RETURN. 
FEF3Lt 39 RTS RETURN 
* 
内 
トナ エエ エエ ネエ エエ エエ エナ エエ エナ エナ イト すす すす で ドド で で ドド ャ で] 
ャ 
* 。 DMR _PRRRYETER SET 
+ 
移 1. DR _RDDRESS SET 
内 
* ご ど . DMR _BYTE CHUNTS SET 
3. IRR & FIRR MRSk 
内 
に も も エ エエ エエ エエ エエ エエ エエ エエ すす すす で すす すす すす すす すす イド リト) 
内 
oe R SETDMR_ERU LM 
由 E に 朋 LDD REBDER。X ET SEETHR BUFFER DDRESS 
DD 1 STD FH3RDR  DMQ ADDRESS SET. 
RS り ロ FFE9 1 の LSIZE ES DRTR GET. 0=1 ご 日 1 =256 ご =51 ご 」 コ =10 ご 4 
に =0 SECT ロ R =1 ご 日 * 
FF3Q 1 pt 財 1 SECTHR LENGTH=12 有 * ご へ N 
FF3 に 49 BEK:I RHLR LNGGi CE 2 =RCF 
FF3D 5D TSTB -NGGET PRKE 2^N  (N=RCC B) 
FF3E ご ? 03 FF43 BES XPMULTI 
FF40 5R DECB 
FF41 2Q0 F9 FF コ に BRR BEK:I 
内 ご AN 
ロ RE BE=128 
FF43 R XPMULTI ERU 人 
FF43 C6 0 介 LDB #12 晶 ET 12 ヨ IN REC B 
FF45 3D MUL SEETHR LENGTH=RCCR*RCEB (ご へ ^N*12B ) 
FF46 DD 4E 月 STD FEH3BCER SET DMR _ BYTE CHUNTS 
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FF4 D6 54 介 LDB DMRFCR 
FF4R FE4 dd RNDB せま 7 
FF4F ER QB HRBE 半 $OB 
FF4E Dr 54 STBH DRFCER 


1 
は 1 
朋 
FF5O_D6 28 代 LDH DIRICR 
FF52 に 4 0 は ! RNDB #$0P 
FF54 CR QO 人 HRE #$00 
FF56 DY に っ) R STB DRICER 
人 
代 
人 
R 
介 


FFSB D6 56 
FF5R CE4 7 
FFS5C CR OB 
FF5E Dr 56 


LDH DRDCER 
RNDB # せ 77 
HRH 半 $OB 
STB DIRDCR 


3 


FF60 1850 FDB MSKFIR  IRRFIRR MRSK。 


ポ 


FF62 39 RT5 RETURN 


ャ 
し も も も も た す エエ エエ エエ エエ エエ エミ すそ キ で すす すす キキ す すす すそ そそ デミ で すす: 
ポ 


* 。 IFDC FRRRMETER SET RHUTINE 
ポ 

* 。 INFUT 一 一 、X=RCE RDDRES5 

* 

* 。 LUTFUT 一 - 、X=RESERUED 

w 


に し も いい も むと も エ エ エエ エド エミ エエ ミド す キト で すす すす すす すす で ミミ で すす すそ よさ で ) 
ホ 





FF63 R PRRSET ERU la 
FF63 R6 Q4 は | LDR REBTRK:。X TRRCK。 NH RET. 
FF65 C6 01 | LDR #TRKREG _ SELECT TRRCK REGISTER 
FF6Y BD egO FFH9 BSR REGSET 
FF69 6 05 1 LDR REESET。X SEETHR NCI SET 
に LDBE SSREG SE に THR STRRT REG SELEFT 
FF6H 5C INEB 
FFG6 に BD 1H FF ヨ 9 BSR REGSET 
FF6E 5E TNCBH SECTHR END REG SELECT. 
FFGF BD 1 FF89 BSR RERSET 
FFP1 6 06 介 LDR REBSID:X RET SIDE DRTR 
キ LDB SIDREG SELECT SIDE REG 
FFP3 SE INCEBE 
FFY4 BD ルル 誠 FFB9 BSR REGSET SIDE SET 
FFY6 6 OP に 1 LDR RCBUNT:X RET DRIUE N ロ 
FFYB_E6 06 介 LDBE #DRUREG SELE に ET DRIUE REG 
FFYR 2O OD FFB9 ERR RERSET UNIT SET 
* 
FFYC R STSDEN ERU * SINGLE DENSITY SET 
FFYE B6 0O R LDR INGLE 
FFYE BC 1 FCB SKIF2 EMFX は : SKIF 2 BYTE 
1 
FFYF R STDDEN ERU ka DUELE DENSITY SET 
FFYF 6 01 | LDR #DHUBLE 
FFB1 CE6 05 1 LDBE #DNSREG SELECET DENSITY REGISTER 
FFH3 2QO 04 FFH9 BRR REGSET DENSITY SET. 


3 


STREK PHINTER SRUE & IFDC RCTIUE に HECK: 
FFB5 R SFPRCT ERU 4 
LERU らら 5 STRCEK PHINTER SRUE. 
INC SFSRVE SFSRUE=SFSRUE+2 
EXEEUTIHN GRH TH FHLL ロ MING STEF 
IFDC RETIVE CHECK. 
EHPYN _RHUTINE 1 


REGISTER RCTIUE CHECK RIHUTINE 


FF5 R RETIUE EEMU 3 
LDR 55 
STR RDR 55 FRTRRN RETIUE CHEIk: 
EMFR _ RDR 
BNE NHNR に T 
Is1 
STR RDR RR_PRTRRN RETIUE CHECK. 
EMFR _ RDR 
BNE NHNRCT 
ELRR 
RTS NRIYRL_ RETURN.。 IFDE RCTIUE. 


人 


FFB5 RR_NHNRCET ERMU キ 
FFB5 86 OR 人 LDR #10 DISK NHN RURILRELE ERRUIR. 
FFB7_ 20 34 FFBD BRR ERRRTS RETURN TH BIHS MRIN FRIIGRRN) 
3 
* EHPMHN RIHUTINE と 
* 


* RERISTER DRTR SET RUTINE 


REGISTER DRTR 
REGISTER_NQ 





FFB9 Ra 


IN に SF'SRUE どー-BYTE INCERERSE FHR _RDJUSTMENT HF SFRET ITSELF 


SUBRHUTINE に RLL. 
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リス ト 5 8'DOS モ ー ド (BANK3 ) ア セン ブル ・ リ スト 











FFBD 34 
FFBF 4F 
FF9Q BD 


FF32 8B6 
FF34 BD 
FF36 36 
FF9B B4 
FF9R_ 26 
FF9C_ 35 


FESE EE 
FFR1 10BE 
FFR5 31 
FFR7Y 
FFR9 30 
FFRE 2 
FFRD 2O 


FFAF 1F 
FFB1 DB 
FFE3 F4 
FFB5 る 

FFE7 39 


FFBB 4 
FFBR @ 


FFEC 4 に 
FFED C6 
FFEHF_D 
FFE1 10FE 
PEES 89 


FFE6_D6 
FFCB 8B6 
FFER 
FFEE 
FFGE 
FFCF 
FFD1 2 
FFD3 86 





FFD5 20 


FFD7 QD 
FFD9 


FFDE 3B 


FFDD 
FFDD 
FFDE 
FFDF 


FFFE 
FFFE 


83 内 
30 朋 
FFBD 1 
16 月 
QE FF9E 
0 は | 
QB FF9E 
30 代 
QF 朋 
1 に FFHB 
96 朋 
FF9E 月 
QOQ04 人 R 
FFFF | 
コロ ド 仙 
06 FFRF 
1F 1 
DB FFB5 
Fg FFR1 
9 1 
30 昌 
BO 月 
EE FFR5 
FFBEB 31 
09 1 
QR FFC6 
QB 月 
30 月 
FFER 朋 
FFC6 1 
31 代 
OR 介 
0 R 
EF PFFBD 
40 は ] 
ER FFBD 
QO に は 1 
E6 FFBD 
FFD 介 
56 は 
F8 FFD3 
Be 朋 
03 人 
20 朋 


FEQQ R 


3 
幅 
ャ 
+ 
内 
幅 
円 
円 
R 


3 
キ 


ST 

STB 
IFDF READY 
IF NRMRL 


RE に 月: 日 メニ FI 


DYEKO ERIU 


FPSH5 

ELRR 

BSR 
FECH 


*RDYEK1 ERSIU 


3 


ドコ 
ホ 


"SHS 
LDR 
BSR 


FULS 


RDR 
RRR 


に HELCK.。 


REGISTER DRTR SET 
RERISTER SELECT. 


ーー RETURN BY RTS 
IF RBNIRIMRL -- RETURN TI BIHS PIN 


RESEUED 


1 


RssX 


CKLI ロ PF' 
SKIF ら ご 


* 
RBX 
# せ BBO 

EKLI ロ IP 


#%0QQQ11 
ERRIHRP' 
人 >:X ュ FE 


FD BUSY (RERDY=O) に CHECK:。 


EMFX 本 : SKIF ご ー-BYTES 


FD RERDY (RERDY=1 ) に HECK.. 
SURE RERDY 

GET STRTU 
11 RNY ER 
YES ERRIR 


5 
ら 





IFDC RERDY-BUSY, ロ NLINE に HECK. RUTINE. 


EKLP ロ PF EEIU 


LDX 


CKL ロ FO LDY 
FEKLHF1 LERY 


BNE 
LERX 
BER 
BRR 


CKLHP2 TFR 


ネ 
円 
ャ 
* 


EHRBH 
RNDBH 
BNE 
RTS 


4 
#$FFFF 
ー35Y 
CKLHP ご 
ー1 XX 
NHNRCT 
FEKLHPO 
RsB 
SSR 
#$B0 
FEkLHP1 


IFDC ERRHR _HRNDL ING 


INPUT --- B 


ERRHRF ERIU 


ネ 


RNDR 
BNE 


LDR 
INCR 


ERRRTS LDBE 


STE 


RETMRN LDS 


ポキ 


RTS 


FDERR ERU 


LDE 
LDR 
EITB 
ENE 
INCR 
BITB 
HNE 


XDAER LDR 


ャ 


に 


FER。 TCR・DCR 


IHS IMRIN 


円 
#%OOOO10I 
FDERR 


#1 


#ERESET 
RRR 
SF'SRUE 


ャ 
FSR 
#10 
#$BO 
ERRRT5 
#$40 
ERRRTS 
1 ご 


SET- 





ポ 
3 


BRR 


NMYI_UEFTIR 


NIRTI ERU 


3 


w 


円 


日 


TST 
BI 
RTI 


ERRRTS 


SET 


+ 
DERDLk 
XDYRER 


RBHUT 1. ご 35 * 4 TIINES 


TIME FVER " 
YES TIWE HUER.。 SET DISK。 NHT RERDY ERRHR _NI 


EER デー) RECBE 


BITP:ERURL 
NH,EHNTINUE 


RTS RDDRESS IS GRUED IN SFSRUE. 


ERR ロ R _ DETECTED. 
0D1 DMR _HR FDD ERRHR 
YES FDD HR DIR 


YE5S RCE FRRRYETER ERRHR. 
RCC R =1. 
ERRHIR _ FLAG RESET 


ET DIRECT_ RTS DDRESS TH BIHS IMRIN 


B INCH FLIFFY DISK。HRRD ERRHR 
RET FDF STRTUS REGISTER 
RSSUIWE DRIUE NT RERDY 

DRIUE NHIT RERDY " 

YES ぅ NHT RERDY 

REER ニ 11 RSSGUME MRITE PRETE に T。 
MRITE FRIT 2 
YES,MRITE PRHTE に T. 
REER=12 FLHFFY DISK HRRD ERRHR. 











HR DR _DERDLHCKk、 ERRHR 
DDhi。REEHRD NHT _FHUND・SEEk ERRIR CRE ERR ロ R LHST DRTR 


FRHEESS _RHUTINE. BZ/Z01/1B RDDITI ロ N. 
DMR _DERDLK。 マ 

YES・DIR_DERDLCICk.. 

NMEPRY FRRITY ERRUR 


BRT RIHIY PEPCERY STRIPF' 


HRG 
FCB 
FCE 
FCBE 


RESTRRT UE に 


HRG 
FDB 


sFFDD 
も B2 
03 
も ご 0 


TI ロ R SET. 


ま FFFE 
BuTENT 


YEaR 
TENTH 
DRY 
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- FM-8 活 用 研究 正誤 表 . 








去 6809 の 特徴 

p.6 イン デック ス ・ ス タッ ク ・ ポ イン タ 操 作 命令 
CP っ CMP 

云 拡張 版 K コ ン パ イラ 

p-18 高速 ソー ト ・ プ ログ ラム 





549 "MIDs (*GET MIDDLE VaLUE *#) 

SS59 "MIDMRK1=X13 MIDMRK2= ん 2 5 MIDMRK さ = テマ 

569 "IF MIDMRK2>MIDMRK さ THEN EXCANGEEADR (MIDMR 
K2) 。 ADR (MIDMRK さ ) ] ョ F エ 

579 "IF MIDMRK1>MIDMRK2 THEN EXCANBE[RDR(MIDMR 
K1) 。RDR (MIDMRRK2) ]sF エ 


589 " 。 IF MIDMRR2>MIDMRK さ THEN EXCANBE[ADR(MIDWR 
K2) 。RDR (MIDMRK さ ) ]sF エ 
599 * MID=MIDMRK2 


699 "RETURN 





六 p.31 スク リー ン ・ ア セン プラ 











p-104 360…… LOCATE60.12……… っ LOCATE60、 20 





テテ レビ 黒板 
p-111 マシ ン 語 ダン プ ・ リ スト 


7D84 FC っ 7C 
凛 フ ロー チャ ー ト ・ ジ ェ ネ レー タ 
PD。124 360……… LEFT$S (L$, 1) 三 "12EM"…… 
っ LEFT$(L$,.3) ニ YREM"…… 
TEX 丁 CONVERTER 
p-139 改良 点 
78E0 EE EGEF 
去 AUTO- 2001 
px147 GMTST (ブログ ラム こり スト 








1979 TQS=" "sFUR 1=G TO 15:D=PEEK(FM+1) = イキ リキ 
FNS(D) : AY (J) =Y (J) +Di AX(T)=X(T)+D: IF (D く 32)+(12 
7=D)+(247<D) THEN TS=TS+" 。" siNEXT ELSE TS=TS+CHR$ 
(D) :NEXT 

1199 IF (J MOD 4=@) THEN PRINT 

191 の 6 LUCRTE 61+HX ギ 2。 さ +HY+HY\4: IF (DX くさ 2)+(127=D) + 
(247 く D) THEN 8="。! ELSE S=CHR$(D ) 

1999 FR 1=9 TO 15:QX(T)=9:QY(1I)= の kNEXT: ZS= の is RET 
URN 





2615 IF 人 Q$=" リ フリ THEN BUSUB 2819:HQRDC: GUSUB 11999 
sFHR J=9 TO 4:PRINT 拉 2sNEXT JiGOUTU 99 
2624 IF 人 Q$= リ フリ THEN HARDC: GUTU 99 











支 2PASS DISASSEMBLER 

p.43 $6780 一 $74FFE ま で は , アセ ンプ ブ プラ ・ ダ ンプ ・ リ 
スト (p.37 一 p.38) の $4780 一 $54FEF と 同じ で す . 

式 6809 デ バッ ガ 


p.45 コ マン ド 表 S セ ー プ ブ  S フ ァイル 名 , 先頭 アド レス , 


最終 アド レス , 実行 開始 アド レス 
p.47 DAD4, 74E4 番 地 09 を 06 に 訂正 . 
去 マ シン 語 デ ー タ < 配列 変換 ルー チン 





去 日 本 語 ワ ー ド ・ プ ロ セ ッ サ の 制作 
p-160 1370 行 &H3020…&:H3021 
1410 行 &H4720 一 SH4728 
1460 行 &H2576-- ぐ H2577 
テグ ラフ ィ ッ ク 花 札 こ いこ い (初版 ) 
p-210 ダン プ ・ リ スト 
563C 一 563E 番 地 は 7B、63、C6 
云 汎 用 |/O ポ ー ト の 製作 (初版 ) 
p-218 の 右側 下 か ら 4 行 め は 『 究 あき ベー ク 』 です. 
PSG カ ー ド の 製作 
p.226 PSG カ ー ド 回 路 図 (下図 ) 
※SUPER TRACER (初版 第 2 版 ) 
p.48 び 主 な 特色 た だ の 特色 "の と ころ で 上 か ら 1 行 め 
彫 EA ま 1 (EA) 両 スタ ッ ク の TOP 1WORD は 
上 EEA. EA ま ,S お よび U 両 スタ ッ ク の トッ プ 2 バイ ト は, 


PSG カ ー ド 回 路 図 
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全 回 路 図 集 〔 初 版 〕 
0:325R5 ラ 2 ジブ プリ ジ タ / リ ニー アザ 』 ・p-326『A/D 変 換 』 
| 























・p.-328『 拡 張 バ ス /Z280 カ ー ド ・ コ ネ ク タ 』 ・p.328『 抜 張 バ ス /Z80 カ ー ド ・ コ ネ ク タ 』 
+5V | + 5V 
3.3k 
M48 
CM 89 CN4 *RESETB (1-C10) 



















*RESETB (1-C10) 





*IRQ (1-D1) 







*IRQ (1-D1) >MDATA BUS(1-G1) > MDATA BUS(1-G1) 







* NMI (1-D1) * NMI (1-D1) 
*FIRQ (1-D1) *FIRQ (1-D1) 
GH (1-D1) GH (1-D1) 
BAB (1-B10) BAB (1-B10) 


BSB (1-B10) 
*REFREQ (1-E1) 

REFGRNT(1-E1) 

REFCK (4-B1) 
RWB (1-C10) 


BSB (1-B10) 
*REFREQ (1-E1) 

REFGRNT(1-E1) 

REFCK (4- 昌 1) 
RWB (1-C10) 













Z80%(1-A8) 
*RESETB(1-C10) 
*IRQ (1-D1) 







Z809(1-A8) 
*RESETB(1-C10) ーー 
*IRQ (1-D1) 








ABBRE 器具 (1-D1) M-ADDRESS BUS * NMI (1-D1) 
1-F 

EB(1-CI0) 
*MRDY (1-E2) |%1<qB(t-B10) 


5V 
QB (1-B10) 
EB (1-C10) 




















*SHALTST(12-B8) 


SRwB(H5)(D9)(12-B2)(12-B5)(17-D8) 

















M12 
MB74LS00 





M2 
MB74LS02 







*SHALTST(12-B8) 





SRwB(H5) (D9)(12-B2)(12-B5)(17-D8) 











TP9 峡 = っ ーー と 
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・p.335『 共 有 メ モリ 』 








M55 M67 
MB8114NM MB8114NH 


填 5V+5V 











・p.337『CRTT 同 期 制 御 』 


R85 
3.3k 


Mi61 
MB74LS86 


*SBLANK(16-H2)(16-B7)(19-A2) 


SCASSEL(16-F9) 


M180 
SN74S02 


SVDHALT(12-A7) 
M161 


MB74LS86 
(E10)*SVSYNC ※SCSYNC(19-E6) 


※SHSYNC(19-D6) 


R36 
3.3k 


CX2 


MI161 


M187 SCASSEL(16-F9) MB74LS86 
12 
5 | テー *SBLANK(16-H2)(16-B7)(19-A2) 


M180 
SN74S02 
6 





(E10)\*SVHALTREO 
SVDHALT(12-A7) 


MB74LS86 
(E10)*SVSYNC ) ーー ※SCSYNC(19-E6) 


※SHSYNC(19-D6) 
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MESOJE TL 


INFORMAIIONs 





< ラ ゝ カセット ・ サ ービス 
誌 に 掲載 され て いる プロ グラ ム は , コム パッ ク 
より カセ ッ ト ・ テ ー プ て 販売 いた し ます . 












































































































































































































































| Jl つ 3 Eb ー | | 掲載 | 定 価 
日 5 判 プ ッ グ 型 パ ッ ケ ー ジ 客 病身 層 前 
品名 | 機 名 | 
番号 | | ( 前 ) 
608 | ズ ズ 慕 秀久 Ver.2.0 FM-S | 本 格 的 日 本 語 ワ ー ド ・ プ ロモ ッ サ Y9.800 5 | 実戦 株 式 チ ャ ー ト 週 足 , 年 足 を 表示 し , 株 の 動き を 阿 測 する "83.2 \3.000 
813 | 撤 枯 ドコ ン パ イラ FNL/8 | 6809 の 特徴 を 生か し た 称 数 型 コン バイ ラ Y4.500 | 243 | 」 人 ボー カー ゲー ム |「 提 が 4 く な る 本 を 参 作 54 ま し た | - | Y3.000 
829 | エディ タ ・ ア セン ブラ V.2.0 |FM7/8 | フル RAM で 動く 《 エ ディ タ が 強化 され た アセ \4.500 ミニ を ア ィ ス ア セン プラ L 3 の 移植 版 '81.12 \3.000 
840 |F-BASIC EXPANDER IFM-7 | FM-8 用 を FM-7 に 移植 近日 発売 262 | クラ フィ ッ ク 麻 錠 ( 漠 字 R 0 M 便 用) | 254 の 漠 字 ROM 版 "41.12 | \3.000 
CD-1019| サウ ンド ・ エ ディ タタ Ver.2.0 FM-7/8 PSG 用 楽 符 入 力 音楽 演奏 プロ グラ ム 近日 発売 | 286 | ケラ フィ ッ ク 花 札 こ いこ い ドッ ト 単 仁 の 色 指定 を 使い 画面 は 感動 的 ー \3.000 
o 287 | グラ フ 作 成 プ ログ ラム 技術 者 学生 に "82.1 Y3.000 
P ケ ー ス バッ ケー ジ 288 | 日 本 語 ワ ー ド ・ プ ロ セ ッ サ Nol | 漢字 wl.12 | ws 
28: ト 語 ・ ッ サ Nal | 漢字 ROM と K-505 を 使用 81.12 | \3.000 
290 | スネ ー キ 移植 版 ー Y3.000 | 
| 307 | ALL CAST STAR TREK | 本 物 そっ くり の キャ ラク タ / \3.000 
308 | マシ ン 語っ DATA 文 作成 アロ グラム | マシ ン 語 が BASIC の DATA 文 に / \3.000 
_316 | カラ ー バ ター ン ・ エ ディ キャ ラク タ を 自在 に 作っ て … Y3.000 
244 | 地 左 最大 の 作戦 地 克 基 地 に 攻め 込む へ ビ を や っ つけ ろ ー Y3.000 319 | SPACE FIGHTER 気分 は 戦闘 機 乗 り "82.3 Y3.000 
246 | プラ ッ ク ・ ホ ー ル 3-D グ ラフ ィ ッ ク ・ プ ブロ グラ ム ー Y3.000 320 | ザ ・ 麻 省 好評 の ザ ・ 麻 浴 を FM に 移植 / T12 Y3.000 
254 | グラ フィ ッ ク 麻 倫 パイ の 人 色 ま で ソック リリ. 麻 竹 ゲ ー ム の 決定 版 81.12 | \3.000 341 | 日 本 語 ワー ド ・ プ ロモ セッ サ No2 | 漢字 ROM 付 の シス テム で 文書 作成 | "82.4 Y3.000 
255 | 簡易 モニ タ F M-8 に 使い 易い モニ タ "81.12 \3.000 358 | 購 基 研修 プロ グラ ム PC-8001 の 移植 版 ー \3.000 
253 | 逆 ア セン プラ L3 版 を 移植 コ \3.000 359 | 易 占 プロ グラ ム PC-8001 の 移植 版 志 Y3.000 
289 | 平安 京 エ イリ アン 移植 版 ー \3.000 114 | フロ ー チ ャ ー ト ・ ジ ェ ネ レー タ 人 の アル ゴリ ズム も 簡単 に 理解 で きる * \3.000 
310 | Z80 カ ー ド 閣 Z80 の 送 ア セン プラ ・ プ ログ ラム "82.2 \3.000 384 | SPACE TRASEPORTER 相手 を お びき よせ て … \3,000 
317 | FM-8 有 象 無 旬 いろ いろ な ソフ ト が 入っ て ます Y3.000 385 | Submarine WARS 絵 を 見 る よう な 美しき さ / \Y3.000 
309 | 音声 入出 力 プ アロ グラ ム F M-8 が 言葉 を し ゃ べ る \3.000 457 | BLACK JACK ドッ ト ・ グ ラフ ィ ッ ク を 使っ た 本 格 派 ー \3.000 
339 | NF-BASIC コ ン バ ー タ PC の 筐 富 な ソフ ト を FM に / \3.000 245 | 源平 五目 | 自 と 黒 の チッ プ が と 表 で 攻防 戦 ー \3.000 
427 | サウ ンド ・ コ ン パ イラ 効果 音 、 音 楽 用 デー タ の 編集 に / 82.6 Y3.000 340 | SPACE SHOOTER 侵略 者 を 撃ち 落と せ / "82.4 Y3.000 
126 | 江 字 SYMBOLXNBASIC 徴 洛 漢字 を SYMBOL 文 で 拡大 し ます "82.6 \3.000 598 | Auto Plot グラ フ 作 成 の ツー ル FM 活 研 | \3,000 
591 | 2 パス セン プラ ラベ ル 付 で 318 の ソー ス を ジュ ネ レ ー ト | FM 活 研 | \3.000 598 | AUTO-2001 FM.8 好評 の AUTO-2001 の FM 版 で す FM 活 研 | \Y4.500 
592 | 6809 デ バッ が MZ の S.R.D を 目標 に 作っ た デバ ッ ガ か FM 活 研 | \3.000 579 | UFO WARS 現われ て は 消え る UFO を 没 て T13 \Y3.000 
593 | 6809 ト レー サ プロ グラ ム 開 発 の 強力 な ツ FM 活 研 | \3.000 580 | アニ メ 付 アナ ログ 時 計 朝 が つら いあ な た に 利 織 Y3.000 
594 | Z80 コ ミュ ニケ ー タ 6809 と Z80 の 汎用 入出 力 ルー チン FM 活 研 | \3.000 623 | シー ソー ゲー ム シー ソー を 使っ て 風船 割り *82.10 Y3.000 
595 | Z80 モ ニタ Z80 カ ー ド を 1202 活 か す ツ ー ル FM 活 研 | \6,500 635 | 金星 基地 SOS 金 時 基地 を 守る の は 君 の 暗算 力 ? T14 Y3.000 
596 | テレ ビ 黒 板 パタ ー ン 作成 用 ツ FM 活 研 | Y3.000 636 | THE 女 学 生 下校 編 オオ カミ に 抽 ま ら な いよ うに T14 Y3.000 
609 | F-BASIC EXPANDER F-BASIC と モニ タ の コマ ンド を 扱 張 "82.9 Y3.000 694 | 基盤 プロ グラ ム 棋譜 の 登録 . 再生 が で きる T14 Y3.000 
622 | スク リー ン ・ ア セン プラ 逆 ア モン プラ キア セン プラ FM 活 研 | \3.000 828 | キン チョ マン (キー 版 ) 宇宙 人 撃退 に は 役 点 剤 キン チョ ルン 1 を 83.5 Y3.000 
625 | ウォ ー ク ・ ゲ ー ム 転ば な いよ うに 、 間 の 中 を 歩く = \3.000 CD1020| ALIEN FALL 衝撃 波 を 避け エイ リア ン を 繋 つ 778 活 研 | \3,000 
641 | 独立 モニ タ フル R AM で 王 く モニ タ | 82.11 | \3.000 CD-102I| SUPER MONITOR | モニ タ + ア セン プラ + 逆 アモ ンプ ルオ トレ ー ス | 7/8 活 研 発売 
642 | 3 次 元 迷 路 3 次 元吉 路 は 2 次 元 達 路 に 飽き た 人 用 \3.000 CD-102| スー パー パタ ー ン ・ エ ディ タ | 上 下 左 右 の パタ ー ン が 一 度 に 見 られ ます 7/8 笑 研 | 近日 発売 
693 | イエ ロー サ プ マ リン PCG カ ー ド が あれ ば 音 も 出 ます T14 Y3.000 CD-1023| BASIC ANALYZER カラ ー リ スト , 変数 リス ト な ど デ パック 用 778 活 研 | 近日 発売 
695 | CRASH オー ル ・ マ シン 語 の ハイ レゾ ゲー ム T1H \3.000 CD-1024| 日 本 語 ワー ド ・ プ ロモ ッ サ | BASIC+ マ シン 語 で 横 60 文 字 ま で 使え ます 7/8 活 研 | 近日 発売 
7HH | MEMORY CHANGER フル RAM で 動く チェ ッ ク ・ サ ム エ デ ィ タ | "82.12 \3.000 CD-1025| 戦車 最前 戦 誠 戦 還 隊 に か こま れ た . 敵 を 没 不 で きる か / 還 \3.000 
760 | ザ ・ キ ュー ティ 1 Mr I/0 の キュ ー テ ィ 狩 り "83. 1 \3.000 
762 | 変数 リス ト アバ パック, 改造 に 便利 な 変 族 の リス ト を / "83.1 Y3.000 
775 | ALL RAM DISK BASIC | DOS モ ー ド で DISK BASIC を / Y3.000 
777 | THE 女 学 生 道草 編 落ち て くる リン ゴ を 受け る | \3.000 
796 | FM ラリ ー サ プ CPU を 使う 高速 ゲー ム Y3.000 - | # 
125 | U-MIONITOR モニ タ を 朱 張 し て プレ ー ク ・ ボ イン \3.000 















































支 お 求め は 全国 の 有名 書店 , マイ コン ・ シ ョ ッ フ へ . また は 直接 , コム パッ ク ま で お 申し 込み くだ さ い . (部 送 手数 料 ! 本 500 円 , 2 本 以上 ! 本 増す ご と に 100 円 増 ). 
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編集 後記 


環 M 活 用 研究 第 2 弾 『FM-7/8 活 用 研究 』 っ と 出 た 
と みな さん お 思い で し ょ う ね . 私 も や っ と 出せ た と 思っ 
て いま す . な に せ , 記事 を 選ぶ の に 時 間 を 取ら れ , 雑用 
に 時 間 を 像 か れ て も う 大 変 な 騒ぎ で し た . 

た ぶん , 読者 の みな さん は サブ CPU の 使い 方 が わか ら 
ず , その 利用 法 の 詳し い 説 明 を 欲し が っ て いる と 思い ま 
そこ で 今回 は その 方 面 の 記事 を 多く 載せ まし た の で 
参考 に し て くだ さい . 

本 誌 の 進行 を 無視 し て , エン ジン ・ ル レーム で は サブ CPU 
の 使い 方 を 着 々 と “も の ” に し て いま す . 本 誌 に は 問 に 
合 :Q ま = で し た か ど ち で つや る な 
これ は KK コンパ イラ co で 達成 し て いま す . 

K コ ン パ イラ は FM の 強力 な 味方 で す . K コン パイ ラ の 
女 法 が わか ら な いと 思う 方 , FM の 文法 書 と 見 比べ て くだ 
さき さい. あまり 変わ ら な いで し ょ う . 

ディ スプ レイ ・ サ プシ ステ ム の 使い 方 が わか ら な い 方 , 

誌 の プロ グラ ム を 解析 し て くだ さい . 必ず ディ スプ レ 
褒 敗 4 シス テム の 使い 方 が 理解 で きま す . 初め は ^ 猿 ま 

で も 良い じゃ な いで すか . それ で わか れ ば , 後 は 焼 
ci に 

小さ な プロ グラ ム , “RANDOM BOX” も 良く 見 て くだ 

きい (本 当 は ここ も , マシ ン 語 ほ ア セン プル ・ リ スト に 
し た か っ た だ た). ここ に も 思わ ぬ 発 見 が ある は ず で す . 

本 誌 は K コ ン パ イラ を 重視 し て いま す が , これ は K コ 
ン パ イラ の RUNTIME ル ー チ ン が 小さ いた めで す . 800 バ ヾ 
イト 足ら ず の RUNTIME ル ー チ ン な ん て 。 そう ざら に あ 


半 


ょ いも の が で き て いま す . 





ら だ の 衣 沈 2 まる ば それ まで で す が 。 で SOS Re ラジ 
2 シン ジン ミ ーッ ・ サ フッ レー ネン を (まい ば 休 グン 
ィ ッ ク も 簡単 に 扱え ます (K コ ン パ イラ で ここ まで 扱え 
る よう に し た ユー ザー の みな さん の 力量 に は 感嘆 いた し 
ます ). どの 行 に サブ ルー チン を 使っ て も か まわ ず , ラベ 
ル 名 だ け と な る た めで すね . 

くれ ぐれ も 注意 し まし ょ う 。 KK コシ ッ マ イラ は ラベ ル 名 
も し く は 関数 名 で 使い , 行 番号 で は 動き ませ ん ./ ま た ., 
変数 名 の チェ ッ ク も お 忘れ な く . 

本 誌 で は ある メー カー の ブリ ンタ だ け に な っ て し まい 
まし た が , 他 の メー カー の も の で も コン トロ ー ル ・ コ ー 
ド を 換え る こと で 動作 する は ず で す . 同じ メー カー の も 
の で も コン トロ ー ル ・ コ ー ド の 達 い で 動作 し な い の で す 
か ら . 

(Ki) 

圏 何 を する 。 情熱 や 能力 を 持ち 続け る こと は , 事 を 
衣 3 な 要因 だ と 思い ます . それ だ け で な く 向 
ト 上 させ なく て は , と お っ し ゃ る 読者 諸氏 も 多い で し ょ う 
が 、 何 十 年 単位 で 考え る と , な か な か 難し いこ と と 思い 
ませ ん か . 

1 冊 の 本 を 作る に し 4 電  Se 
だ さま ざま な トラ ブル は 起こ る し , イラ イラ が 続 

ゝ だ たり, 体調 を 衣 し た り で , エネ ルギー を 常に 充満 させ 
2 それ が 長 」 場 と も ちな れ ば 
な お の こと で す . 

さて , 本 書 の 出来 は ば ぼう で し ょ うか . 本 の 出来 具合 の 
評価 は , 読者 と 編集 者 と の 間 で どの よう な ひら き が ある 
の か と 考え て み ま し た . た と えば 1 つの 間違い を , 前 者 
は な ん だ こん な 間違い を し て と 思い , 後者 は と て も ここ 
まで 目 が 届か な か っ だ と 思う の で は な いで し ょ うか ( い 











り ま せん . 基本 サブ ルー チン し か サポ ー ト し て いな いか いわ け を し て いま す ). (Y。) 
0 別冊 
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富士通 の 興 準 パソ コン <FM-7> 


価格 が 手頃 、 と 話題 集中 。 全 国 の 青少年 も ビジ ネス マ 


感激 の ソフ ト が ます ます 充実 

く FM-7> で 使え る 2 ソフ ト が どん どん ふえ て いま すれ いろ 
いろ な ゲー ム や 、 ホビ ー、 ビ ジネス 、 教育 、 話題 集中 
の ワー ブロ な 市 販 の ソフ ト は も と より 、 く FM-8> 用 の 
流通 ツ ソフ ト も を の 多く が その まま 使え まし か も 、 本 体 
内 に 実装 きれ 、 盛 り 沢 山 の 機能 を サポ ー ト し て いる F- 
BASIC に より 、 ブ ログ ラミ ング も 実に 容易 で も 
簡易 言語 が つい て 〈 る 

うれ し いこ と に く FM-7〉> に は 簡易 言語 が 標準 装備 さき 
れ て いま す 家庭 で は 住所 録 や 家計 簿 、 ま た オフ ィ ス 
で は 各種 資料 の 作成 な ど 実 に 幅 ひ ろ 〈 利 用 で きま す 
作 表 や 計算 、 検 索 や 分 類 、 フ ァ イ リ ング な ど が 自由 自 


発売 以来 う ク ライ マッ クス の 連続 で も 
豊富 な 機能 の ハー ド に 尋 礁 ます ます 充実 する ソフ ト に 感激 。 ハ ー ド が いい か ら 、 ソ フト も いい 。 


ン を 、 大 い に 盛 りあ が ら せ て いま すれ 


在 。 デ ー タ を 大 きい 順 か ら 6 並 べ か え た り ( ソ ー ト 機能 )、 
必要 な 条件 に 合っ た デー タ だ け 拾 いび し た 0 り (サー チ 
機能 ) し て 、 表 形式 の ファ イル に まとめ る こと が で きま す 
@ お 手持 ちの カラ ーTV に 接続 可能 で す 。 (オフ "ショ 
ン の TV アダ フタ を 使用 )。 

@ サ ウン ド 機 能 で で ゲー ム 効 果 音 や 8 オク ター ズ 三 
重 和 音 ま で の 音楽 演奏 60K。 

@ カ ラー グラ フィ ッ ク 画 面 は 640 X200 ド ッ ト の 高 分 解 
能 。 ドッ ト 毎 に 8 色 ま で 色 指定 で き 、 パレット 機能 で 
色 交換 も 簡単 で 

人 @ 漢 字 ROM カ ー ド (オプ ショ ン ) を 装着 すれ ば 日 本 
語 ワ ー ジン ロ と し て も 使え ます 


先端 技術 が 夢中 に させ る 興奮 パソ コン 。 
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ビジ ネス 用 途 を 大 きく 拡げ る 高級 パソ コン , EX \398.000 F'M- 紅 


(本 体 価格 ・ 簡 言語 ソ フト 人 
AD \338.000 

"MM し 中 全 (本 体 価格 簡易 言 語 ソ フト 付 ) 
人 0 000 


(本 休 価 格 ) 











富士 通 株 式 会 社 半導体 統轄 営業 部 〒105 東京 都 港 区 虎ノ門 2-3-13 容 (03)502-0161 

1 wt 人 @ 札 幌 営業 所 (011)271-4311 欠 東 北 営業 所 (0222)64-2131 人 @ 長 野営 業 所 (0262)26-8222 人 静岡 営業 所 (0542)54-9131 

NO 語 NNa 地 9 名 古屋 営業 所 (052)201-8611@ 大 阪 営業 所 (06344-1101@ 広 島 党 業 所 (082)221-2288@ 九州 党 業 所 (032)411-6311 2 
ー マイ コン スカ イラ ブ 

FM シリ ー ズ の ハー ド か ら ソ フト まで 一 挙 に 展示 実演 。 あな た の パソ コン の コン サル タン ト と し て ご 活用 くだ さい 。 


東京 ・ 虎 ノ 門 (03)591-1091/591-2561 人 東京 - 秋 茎 原 (03)251-1448/251-1449 大 阪 (06)344-7628 II 
341-0486 名 古屋 (052)221-6016 札幌 (011)241-4185 人 広島 (082)247-3949 人 仙台 (0222)66-8711 










雑誌 61473-56 


